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 | |
---|
13 | int Expand_gribhdr (GRIB_HDR *, long, char *); |
---|
14 | int prt_badmsg (GRIB_HDR *gh, char *errmsg); |
---|
15 | int make_grib_log (char *,char *,unsigned long,long,PDS_INPUT, |
---|
16 | grid_desc_sec,BDS_HEAD_INPUT,BMS_INPUT,float *,char *); |
---|
17 | int FTP_getfile (char *,char *,char *); |
---|
18 | int apply_bitmap (BMS_INPUT *,float **,float,BDS_HEAD_INPUT *,char *); |
---|
19 | int create_inpLambert (GEOM_IN,void **,char *); |
---|
20 | int create_inpLatlon (GEOM_IN,void **,char *); |
---|
21 | void create_inpPDS (DATA_INPUT,USER_INPUT,PDS_INPUT *); |
---|
22 | int create_inpPolar (GEOM_IN,void **,char *); |
---|
23 | void display_gribhdr (GRIB_HDR *hdr); |
---|
24 | void free_gribhdr (GRIB_HDR **); |
---|
25 | void gbyte (char *,unsigned long *,unsigned long *,unsigned long); |
---|
26 | void gbyte_quiet (char *,unsigned long *,unsigned long *,unsigned long); |
---|
27 | int grib_dec (char *,PDS_INPUT *,grid_desc_sec *,BDS_HEAD_INPUT *, |
---|
28 | BMS_INPUT *,float **,char *); |
---|
29 | int grib_enc (DATA_INPUT,USER_INPUT,GEOM_IN,float *,GRIB_HDR *,char *); |
---|
30 | float grib_ibm_local(unsigned long ibm_float); |
---|
31 | int grib_seek (char *,long *,int,GRIB_HDR *,char *); |
---|
32 | int gribgetbds (char *,short,BMS_INPUT *,grid_desc_sec *,float **, |
---|
33 | BDS_HEAD_INPUT *, char *); |
---|
34 | int gribgetbms (char *,BMS_INPUT *,int,unsigned long,char *); |
---|
35 | int gribgetgds (char *,grid_desc_sec *,char *); |
---|
36 | int gribgetpds (char *,PDS_INPUT *,char *); |
---|
37 | int gribhdr2file (GRIB_HDR *,FILE *,char *); |
---|
38 | int gribputbds (USER_INPUT,long,short,float *,BDS_HEAD_INPUT *, |
---|
39 | GRIB_HDR **,char *); |
---|
40 | int gribputgds (GEOM_IN,GDS_HEAD_INPUT *,void **,GRIB_HDR **,char *); |
---|
41 | int gribputpds(DATA_INPUT,USER_INPUT,PDS_INPUT *,GRIB_HDR**,char *); |
---|
42 | void hdr_print (char *,unsigned char *,int ); |
---|
43 | void init_dec_struct (PDS_INPUT *,grid_desc_sec *,BMS_INPUT *,BDS_HEAD_INPUT *); |
---|
44 | void init_enc_struct (DATA_INPUT *,GEOM_IN *,USER_INPUT *); |
---|
45 | int init_gribhdr (GRIB_HDR **,char *); |
---|
46 | void init_struct (void *, int); |
---|
47 | int inp2Grib_Lambert (void **,LAMBERT *,long *,char *); |
---|
48 | int inp2grib_Latlon (void **,LATLON *,long *,char *); |
---|
49 | int inp2grib_PDS (PDS_INPUT *,PDS_GRIB **,char *); |
---|
50 | int inp2grib_PolarSt (void **,POLAR *,long *,char *); |
---|
51 | int ld_dec_lookup (char *,char *); |
---|
52 | int ld_enc_config (char *,USER_INPUT *,char *); |
---|
53 | int ld_enc_ffinfo (char *, DATA_INPUT *,char *); |
---|
54 | int ld_enc_geomfile (char *,GEOM_IN *,char *); |
---|
55 | int ld_enc_ieeeff (char *,float *,int,char *); |
---|
56 | int ld_enc_lookup (char *,char *); |
---|
57 | int ld_grib_origctrs (char *,char *,char *); |
---|
58 | unsigned long grib_local_ibm (double local_float); |
---|
59 | void make_default_grbfn (DATA_INPUT,USER_INPUT,char *); |
---|
60 | int map_lvl (char *,DATA_INPUT *,float *,float *,char *); |
---|
61 | int map_parm (char *,DATA_INPUT *,float *,float *,char *); |
---|
62 | int pack_spatial (long *,unsigned short *,float *,float *, |
---|
63 | unsigned long **,short,long *,char *); |
---|
64 | void prt_inp_struct (PDS_INPUT *,grid_desc_sec *, BMS_INPUT *, |
---|
65 | struct BDS_HEAD_INPUT *,float **); |
---|
66 | void upd_child_errmsg (char *,char *); |
---|
67 | void w3ft33_(float *ain,float **out, int *nsflag); |
---|
68 | #else |
---|
69 | #define PROTOTYPE_NEEDED 0 |
---|
70 | |
---|
71 | int Expand_gribhdr (); |
---|
72 | int prt_badmsg (); |
---|
73 | int make_grib_log (); |
---|
74 | int FTP_getfile (); |
---|
75 | int apply_bitmap (); |
---|
76 | int create_inpLambert (); |
---|
77 | int create_inpLatlon (); |
---|
78 | void create_inpPDS (); |
---|
79 | int create_inpPolar (); |
---|
80 | void display_gribhdr (); |
---|
81 | void free_gribhdr (); |
---|
82 | void gbyte (); |
---|
83 | void gbyte_quiet (); |
---|
84 | int grib_dec (); |
---|
85 | int grib_enc (); |
---|
86 | float grib_ibm_local(); |
---|
87 | int grib_seek (); |
---|
88 | int gribgetbds (); |
---|
89 | int gribgetbms (); |
---|
90 | int gribgetgds (); |
---|
91 | int gribgetpds (); |
---|
92 | int gribhdr2file (); |
---|
93 | int gribputbds ( ); |
---|
94 | int gribputgds (); |
---|
95 | int gribputpds(); |
---|
96 | void hdr_print (); |
---|
97 | void init_dec_struct (); |
---|
98 | void init_enc_struct (); |
---|
99 | int init_gribhdr (); |
---|
100 | void init_struct (); |
---|
101 | int inp2Grib_Lambert (); |
---|
102 | int inp2grib_Latlon (); |
---|
103 | int inp2grib_PDS (); |
---|
104 | int inp2grib_PolarSt (); |
---|
105 | int ld_dec_lookup (); |
---|
106 | int ld_enc_config (); |
---|
107 | int ld_enc_ffinfo (); |
---|
108 | int ld_enc_geomfile (); |
---|
109 | int ld_enc_ieeeff (); |
---|
110 | int ld_enc_lookup (); |
---|
111 | int ld_grib_origctrs (); |
---|
112 | unsigned long grib_local_ibm (); |
---|
113 | void make_default_grbfn (); |
---|
114 | int map_lvl (); |
---|
115 | int map_parm (); |
---|
116 | int pack_spatial (); |
---|
117 | void prt_inp_struct (); |
---|
118 | void upd_child_errmsg (); |
---|
119 | #endif |
---|