source: trunk/WRF.COMMON/WRFV2/external/io_grib1/test_read_gribmap.c @ 3567

Last change on this file since 3567 was 11, checked in by aslmd, 14 years ago

spiga@svn-planeto:ajoute le modele meso-echelle martien

File size: 569 bytes
Line 
1#include <stdio.h>
2#include <stdlib.h>
3
4#include "gribmap.h"
5main()
6{
7  int center, subcenter, parmtbl, parm_id, dec_sc_factor;
8  int ret;
9  int idx;
10  Grib_Table_Info grib_table_info;
11
12  /*  get_grib_param_("gribmap.txt","TMN",&center,&subcenter,&parmtbl,&parm_id,&dec_sc_factor);
13   */
14  read_gribmap_("gribmap.txt",&grib_table_info,&ret);
15
16  fprintf(stdout,"%d:%d:%d:%d\n",grib_table_info.center,
17          grib_table_info.subcenter,grib_table_info.parmtbl,
18          grib_table_info.gribid);
19
20  get_grib_param_(&grib_table_info,"TMN",&idx);
21  fprintf(stdout,"idx: %d\n",idx);
22
23}
Note: See TracBrowser for help on using the repository browser.