source: lmdz_wrf/WRFV3/external/io_grib1/MEL_grib1/gribfuncs.h @ 1

Last change on this file since 1 was 1, checked in by lfita, 10 years ago
  • -- --- Opening of the WRF+LMDZ coupling repository --- -- -

WRF: version v3.3
LMDZ: version v1818

More details in:

File size: 4.2 KB
Line 
1#include <stdio.h>
2#include "grib.h"       /* all gribs structs */
3#include "input.h"      /* GEOM+IN, DATA+INPUT, USER_INPUT */
4
5/* check Compiler,  prototypes needed for ANSI-C */
6
7/*#if defined( __cplusplus ) || defined( __STDC__ ) || defined( __GNUC__ )*/
8/* Changed by Todd Hutchinson to force the need for PROTOTYPE */
9#if 1
10
11#define PROTOTYPE_NEEDED 1
12
13int Expand_gribhdr (GRIB_HDR *, long, char *);
14int prt_badmsg (GRIB_HDR  *gh, char *errmsg);
15int make_grib_log (char *,char *,unsigned long,long,PDS_INPUT,
16                grid_desc_sec,BDS_HEAD_INPUT,BMS_INPUT,float *,char *);
17int FTP_getfile (char *,char *,char *);
18int apply_bitmap (BMS_INPUT *,float **,float,BDS_HEAD_INPUT *,char *);
19int create_inpLambert (GEOM_IN,void **,char *);
20int create_inpLatlon (GEOM_IN,void **,char *);
21void create_inpPDS (DATA_INPUT,USER_INPUT,PDS_INPUT *);
22int create_inpPolar  (GEOM_IN,void **,char *);
23void display_gribhdr (GRIB_HDR *hdr);
24void free_gribhdr (GRIB_HDR **);
25void gbyte (char *,unsigned long *,unsigned long *,unsigned long);
26void gbyte_quiet (char *,unsigned long *,unsigned long *,unsigned long);
27int grib_dec (char *,PDS_INPUT *,grid_desc_sec *,BDS_HEAD_INPUT *,
28                BMS_INPUT *,float **,char *);
29int grib_enc (DATA_INPUT,USER_INPUT,GEOM_IN,float *,GRIB_HDR *,char *);
30float grib_ibm_local(unsigned long ibm_float);
31int grib_seek (char *,long *,int,GRIB_HDR *,char *);
32int gribgetbds (char *,short,BMS_INPUT *,grid_desc_sec *,float **,
33                BDS_HEAD_INPUT *, char *);
34int gribgetbms (char *,BMS_INPUT *,int,unsigned long,char *);
35int gribgetgds (char *,grid_desc_sec *,char *);
36int gribgetpds (char *,PDS_INPUT *,char *);
37int gribhdr2file (GRIB_HDR *,FILE *,char *);
38int gribputbds (USER_INPUT,long,short,float *,BDS_HEAD_INPUT *,
39                GRIB_HDR **,char *);
40int gribputgds (GEOM_IN,GDS_HEAD_INPUT *,void **,GRIB_HDR **,char *);
41int gribputpds(DATA_INPUT,USER_INPUT,PDS_INPUT *,GRIB_HDR**,char *);
42void hdr_print (char *,unsigned char *,int );
43void init_dec_struct (PDS_INPUT *,grid_desc_sec *,BMS_INPUT *,BDS_HEAD_INPUT *);
44void init_enc_struct (DATA_INPUT *,GEOM_IN *,USER_INPUT *);
45int init_gribhdr (GRIB_HDR **,char *);
46void init_struct (void *, int);
47int inp2Grib_Lambert (void **,LAMBERT *,long *,char *);
48int inp2grib_Latlon (void **,LATLON *,long *,char *);
49int inp2grib_PDS (PDS_INPUT *,PDS_GRIB **,char *);
50int inp2grib_PolarSt (void **,POLAR  *,long *,char *);
51int ld_dec_lookup (char *,char *);
52int ld_enc_config (char *,USER_INPUT *,char *);
53int ld_enc_ffinfo (char *, DATA_INPUT *,char *);
54int ld_enc_geomfile (char *,GEOM_IN *,char *);
55int ld_enc_ieeeff (char *,float *,int,char *);
56int ld_enc_lookup (char *,char *);
57int ld_grib_origctrs (char *,char *,char *);
58unsigned long grib_local_ibm (double local_float);
59void make_default_grbfn (DATA_INPUT,USER_INPUT,char *);
60int map_lvl (char *,DATA_INPUT *,float *,float *,char *);
61int map_parm (char *,DATA_INPUT *,float *,float *,char *);
62int pack_spatial (long *,unsigned short *,float *,float *,
63                unsigned long **,short,long *,char *);
64void prt_inp_struct (PDS_INPUT *,grid_desc_sec *, BMS_INPUT *,
65                struct BDS_HEAD_INPUT *,float **);
66void upd_child_errmsg (char *,char *);
67void w3ft33_(float *ain,float **out, int *nsflag);
68#else
69#define PROTOTYPE_NEEDED 0
70
71int Expand_gribhdr ();
72int prt_badmsg ();
73int  make_grib_log ();
74int FTP_getfile  ();
75int apply_bitmap ();
76int create_inpLambert ();
77int create_inpLatlon  ();
78void create_inpPDS ();
79int create_inpPolar   ();
80void display_gribhdr ();
81void free_gribhdr ();
82void gbyte ();
83void gbyte_quiet ();
84int grib_dec ();
85int grib_enc ();
86float grib_ibm_local();
87int grib_seek ();
88int gribgetbds ();
89int gribgetbms ();
90int gribgetgds ();
91int gribgetpds ();
92int gribhdr2file ();
93int gribputbds ( );
94int gribputgds ();
95int gribputpds();
96void hdr_print ();
97void init_dec_struct ();
98void init_enc_struct ();
99int init_gribhdr ();
100void init_struct ();
101int inp2Grib_Lambert ();
102int inp2grib_Latlon  ();
103int inp2grib_PDS ();
104int inp2grib_PolarSt ();
105int ld_dec_lookup ();
106int ld_enc_config ();
107int ld_enc_ffinfo ();
108int ld_enc_geomfile ();
109int ld_enc_ieeeff ();
110int ld_enc_lookup ();
111int ld_grib_origctrs ();
112unsigned long grib_local_ibm ();
113void make_default_grbfn ();
114int map_lvl ();
115int map_parm ();
116int pack_spatial ();
117void prt_inp_struct ();
118void upd_child_errmsg ();
119#endif
Note: See TracBrowser for help on using the repository browser.