1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293
|
C Copyright (C) 2008-2010 D. V. Wiebe
C
C CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
C
C This file is part of the GetData project.
C
C GetData is free software; you can redistribute it and/or modify it under
C the terms of the GNU Lesser General Public License as published by the
C Free Software Foundation; either version 2.1 of the License, or (at your
C option) any later version.
C
C GetData is distributed in the hope that it will be useful, but WITHOUT
C ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
C FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
C License for more details.
C
C You should have received a copy of the GNU Lesser General Public License
C along with GetData; if not, write to the Free Software Foundation, Inc.,
C 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
C
C Fortran 77 parameters for GetData. This file defines handy
C constants useful to Fortran programs.
@PARAMETERS@
C Externals
C Corresponding to gd_add_bit(3)
EXTERNAL GDADBT
C Corresponding to gd_add_carray(3)
EXTERNAL GDADCA
C Corresponding to gd_add_clincom(3)
EXTERNAL GDADCL
C Corresponding to gd_add_const(3)
EXTERNAL GDADCO
C Corresponding to gd_add_cpolynom(3)
EXTERNAL GDADCP
C Corresponding to gd_add_crecip(3)
EXTERNAL GDADCR
C Corresponding to gd_add_divide(3)
EXTERNAL GDADDV
C Corresponding to gd_add_lincom(3)
EXTERNAL GDADLC
C Corresponding to gd_add_linterp(3)
EXTERNAL GDADLT
C Corresponding to gd_add_multiply(3)
EXTERNAL GDADMT
C Corresponding to gd_add_phase(3)
EXTERNAL GDADPH
C Corresponding to gd_add_polynom(3)
EXTERNAL GDADPN
C Corresponding to gd_add_recip(3)
EXTERNAL GDADRC
C Corresponding to gd_add_raw(3)
EXTERNAL GDADRW
C Corresponding to gd_add_sbit(3)
EXTERNAL GDADSB
C Corresponding to gd_add_spec(3)
EXTERNAL GDADSP
C Corresponding to gd_add_string(3)
EXTERNAL GDADST
C Correpsonding to gd_alter_encoding(3)
EXTERNAL GDAENC
C Correpsonding to gd_alter_endianness(3)
EXTERNAL GDAEND
C Correpsonding to gd_alter_frameoffset(3)
EXTERNAL GDAFOF
C Correpsonding to gd_alter_bit(3)
EXTERNAL GDALBT
C Correpsonding to gd_alter_carray(3)
EXTERNAL GDALCA
C Correpsonding to gd_alter_clincom(3)
EXTERNAL GDALCL
C Correpsonding to gd_alter_const(3)
EXTERNAL GDALCO
C Correpsonding to gd_alter_cpolynom(3)
EXTERNAL GDALCP
C Correpsonding to gd_alter_crecip(3)
EXTERNAL GDALCR
C Correpsonding to gd_alter_divide(3)
EXTERNAL GDALDV
C Correpsonding to gd_alter_lincom(3)
EXTERNAL GDALLC
C Correpsonding to gd_alter_linterp(3)
EXTERNAL GDALLT
C Correpsonding to gd_alter_multiply(3)
EXTERNAL GDALMT
C Correpsonding to gd_alter_phase(3)
EXTERNAL GDALPH
C Correpsonding to gd_alter_polynom(3)
EXTERNAL GDALPN
C Correpsonding to gd_alter_recip(3)
EXTERNAL GDALRC
C Correpsonding to gd_alter_raw(3)
EXTERNAL GDALRW
C Correpsonding to gd_alter_sbit(3)
EXTERNAL GDALSB
C Correpsonding to gd_alter_spec(3)
EXTERNAL GDALSP
C Corresponding to gd_alter_protection(3)
EXTERNAL GDAPRT
C Alter a scalar parameter
EXTERNAL GDASCA
C Corresponding to gd_carray_len(3)
EXTERNAL GDCALN
C Corresponding to gd_parser_callback(3)
EXTERNAL GDCLBK
C Corresponding to gd_close(3)
EXTERNAL GDCLOS
C Corresponding to gd_copen(3)
EXTERNAL GDCOPN
C Check whether an entry contains complex scalars
EXTERNAL GDCSCL
C Correpsonding to gd_delete(3)
EXTERNAL GDDELE
C Corresponding to gd_discard(3)
EXTERNAL GDDSCD
C Corresponding to gd_entry_type(3)
EXTERNAL GDENTY
C Corresponding to gd_error(3)
EXTERNAL GDEROR
C Corresponding to gd_error_string(3)
EXTERNAL GDESTR
C Corresponding to gd_field_list_by_type(3) (sort of)
EXTERNAL GDFDNT
C Returns the maximum field name length
EXTERNAL GDFDNX
C Corresponding to gd_field_list(3) (sort of)
EXTERNAL GDFLDN
C Corresponding to gd_flush(3)
EXTERNAL GDFLSH
C Corresponding to gd_framenum_subset(3)
EXTERNAL GDFNSS
C Corresponding to gd_framenum(3)
EXTERNAL GDFNUM
C Corresponding to gd_fragment_index(3)
EXTERNAL GDFRGI
C Corresponding to gd_fragmentname(3)
EXTERNAL GDFRGN
C Corresponding to gd_bof(3)
EXTERNAL GDGBOF
C Corresponding to gd_get_carray_slice(3)
EXTERNAL GDGCAS
C Corresponding to gd_entry(3) for BIT fields
EXTERNAL GDGEBT
C Corresponding to gd_entry(3) for CARRAY fields
EXTERNAL GDGECA
C Corresponding to gd_entry(3) for complex valued LINCOM fields
EXTERNAL GDGECL
C Corresponding to gd_entry(3) for CONST fields
EXTERNAL GDGECO
C Corresponding to gd_entry(3) for complex valued POLYNOM fields
EXTERNAL GDGECP
C Corresponding to gd_entry(3) for complex valued RECIP fields
EXTERNAL GDGECR
C Corresponding to gd_entry(3) for LINCOM fields
EXTERNAL GDGELC
C Corresponding to gd_entry(3) for LINTERP fields
EXTERNAL GDGELT
C Corresponding to gd_entry(3) for MULTIPLY fields
EXTERNAL GDGEMT
C Corresponding to gd_encoding(3)
EXTERNAL GDGENC
C Corresponding to gd_endianness(3)
EXTERNAL GDGEND
C Corresponding to gd_eof(3)
EXTERNAL GDGEOF
C Corresponding to gd_entry(3) for PHASE fields
EXTERNAL GDGEPH
C Corresponding to gd_entry(3) for POLYNOM fields
EXTERNAL GDGEPN
C Corresponding to gd_entry(3) for RECIP fields
EXTERNAL GDGERC
C Corresponding to gd_entry(3) for RAW fields
EXTERNAL GDGERW
C Corresponding to gd_entry(3) for SBIT fields
EXTERNAL GDGESB
C Corresponding to gd_getdata(3)
EXTERNAL GDGETD
C Correpsonding to gd_frameoffset(3)
EXTERNAL GDGFOF
C Corresponding to gd_protection(3)
EXTERNAL GDGPRT
C Retrieve a scalar parameter
EXTERNAL GDGSCA
C Corresponding to gd_spf(3)
EXTERNAL GDGSPF
C Corresponding to gd_get_carray(3)
EXTERNAL GDGTCA
C Corresponding to gd_get_constant(3)
EXTERNAL GDGTCO
C Corresponding to gd_get_string(3)
EXTERNAL GDGTST
C Corresponding to gd_include(3)
EXTERNAL GDINCL
C Corresponding to gd_invalid_dirfile(3)
EXTERNAL GDINVD
C Corresponding to gd_madd_bit(3)
EXTERNAL GDMDBT
C Corresponding to gd_madd_carray(3)
EXTERNAL GDMDCA
C Corresponding to complex valued gd_madd_clincom(3)
EXTERNAL GDMDCL
C Corresponding to gd_madd_const(3)
EXTERNAL GDMDCO
C Corresponding to gd_madd_cpolynom(3)
EXTERNAL GDMDCP
C Corresponding to gd_madd_crecip(3)
EXTERNAL GDMDCR
C Corresponding to gd_madd_divide(3)
EXTERNAL GDMDDV
C Corresponding to gd_madd_lincom(3)
EXTERNAL GDMDLC
C Corresponding to gd_madd_linterp(3)
EXTERNAL GDMDLT
C Corresponding to gd_madd_multiply(3)
EXTERNAL GDMDMT
C Corresponding to gd_madd_phase(3)
EXTERNAL GDMDPH
C Corresponding to gd_madd_polynom(3)
EXTERNAL GDMDPN
C Corresponding to gd_madd_recip(3)
EXTERNAL GDMDRC
C Corresponding to gd_madd_sbit(3)
EXTERNAL GDMDSB
C Corresponding to gd_madd_spec(3)
EXTERNAL GDMDSP
C Corresponding to gd_madd_string(3)
EXTERNAL GDMDST
C Corresponding to gd_mfield_list(3) (sort of)
EXTERNAL GDMFDN
C Corresponding to gd_mfield_list_by_type(3) (sort of)
EXTERNAL GDMFDT
C Corresponding to gd_metaflush(3)
EXTERNAL GDMFLS
C Returns the maximum field name length for a meta field list
EXTERNAL GDMFNX
C Correpsonding to gd_malter_spec(3)
EXTERNAL GDMLSP
C Correpsonding to gd_move(3)
EXTERNAL GDMOVE
C Corresponding to gd_mvector_list(3) (sort of)
EXTERNAL GDMVEN
C Corresponding to gd_dirfilename(3)
EXTERNAL GDNAME
C Corresponding to gd_nfields_by_type(3)
EXTERNAL GDNFDT
C Corresponding to gd_nfields(3)
EXTERNAL GDNFLD
C Corresponding to gd_nfragments(3)
EXTERNAL GDNFRG
C Corresponding to gd_nframes(3)
EXTERNAL GDNFRM
C Corresponding to gd_nmfields(3)
EXTERNAL GDNMFD
C Corresponding to gd_nmfields_by_type(3)
EXTERNAL GDNMFT
C Corresponding to gd_nmvectors(3)
EXTERNAL GDNMVE
C Corresponding to gd_native_type(3)
EXTERNAL GDNTYP
C Corresponding to gd_nvectors(3)
EXTERNAL GDNVEC
C Corresponding to gd_open(3)
EXTERNAL GDOPEN
C Corresponding to gd_put_carray_slice(3)
EXTERNAL GDPCAS
C Corresponding to gd_parent_fragment(3)
EXTERNAL GDPFRG
C Corresponding to gd_put_carray(3)
EXTERNAL GDPTCA
C Corresponding to gd_put_constant(3)
EXTERNAL GDPTCO
C Corresponding to gd_put_string(3)
EXTERNAL GDPTST
C Corresponding to gd_putdata(3)
EXTERNAL GDPUTD
C Corresponding to gd_reference(3)
EXTERNAL GDREFE
C Correpsonding to gd_rename(3)
EXTERNAL GDRENM
C Corresponding to gd_rewrite_fragment(3)
EXTERNAL GDRFRG
C Corresponding to gd_raw_filename(3)
EXTERNAL GDRWFN
C Corresponding to gd_dirfile_standards(3)
EXTERNAL GDSTDV
C Corresponding to gd_uninclude(3)
EXTERNAL GDUINC
C Corresponding to gd_vector_list(3) (sort of)
EXTERNAL GDVECN
C Corresponding to gd_validate(3)
EXTERNAL GDVLDT
|