This file is indexed.

/usr/include/getdata.f is in libgetdata-dev 0.9.0-2.2.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

  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
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
C     Copyright (C) 2008-2014 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.

      
C     Error codes
C     Corresponding to GD_E_OK
      INTEGER GD_EOK
      PARAMETER (GD_EOK=0)
C     Corresponding to GD_E_FORMAT
      INTEGER GD_EFO
      PARAMETER (GD_EFO=2)
C     Corresponding to GD_E_CREAT
      INTEGER GD_ECR
      PARAMETER (GD_ECR=4)
C     Corresponding to GD_E_BAD_CODE
      INTEGER GD_EBC
      PARAMETER (GD_EBC=5)
C     Corresponding to GD_E_BAD_TYPE
      INTEGER GD_EBT
      PARAMETER (GD_EBT=6)
C     Corresponding to GD_E_IO
      INTEGER GD_EIO
      PARAMETER (GD_EIO=7)
C     Corresponding to GD_E_INTERNAL_ERROR
      INTEGER GD_EIE
      PARAMETER (GD_EIE=9)
C     Corresponding to GD_E_ALLOC
      INTEGER GD_EAL
      PARAMETER (GD_EAL=10)
C     Corresponding to GD_E_RANGE
      INTEGER GD_ERA
      PARAMETER (GD_ERA=11)
C     Corresponding to GD_E_LUT
      INTEGER GD_ELT
      PARAMETER (GD_ELT=12)
C     Corresponding to GD_E_RECURSE_LEVEL
      INTEGER GD_ERL
      PARAMETER (GD_ERL=13)
C     Corresponding to GD_E_BAD_DIRFILE
      INTEGER GD_EBD
      PARAMETER (GD_EBD=14)
C     Corresponding to GD_E_BAD_FIELD_TYPE
      INTEGER GD_EBF
      PARAMETER (GD_EBF=15)
C     Corresponding to GD_E_ACCMODE
      INTEGER GD_EAC
      PARAMETER (GD_EAC=16)
C     Corresponding to GD_E_UNSUPPORTED
      INTEGER GD_UNS
      PARAMETER (GD_UNS=17)
C     Corresponding to GD_E_UNKNOWN_ENCODING
      INTEGER GD_EUE
      PARAMETER (GD_EUE=18)
C     Corresponding to GD_E_BAD_ENTRY
      INTEGER GD_EBE
      PARAMETER (GD_EBE=19)
C     Corresponding to GD_E_DUPLICATE
      INTEGER GD_EDU
      PARAMETER (GD_EDU=20)
C     Corresponding to GD_E_DIMENSION
      INTEGER GD_EDM
      PARAMETER (GD_EDM=21)
C     Corresponding to GD_E_BAD_INDEX
      INTEGER GD_EBI
      PARAMETER (GD_EBI=22)
C     Corresponding to GD_E_BAD_SCALAR
      INTEGER GD_EBS
      PARAMETER (GD_EBS=23)
C     Corresponding to GD_E_BAD_REFERENCE
      INTEGER GD_EBR
      PARAMETER (GD_EBR=24)
C     Corresponding to GD_E_PROTECTED
      INTEGER GD_EPT
      PARAMETER (GD_EPT=25)
C     Corresponding to GD_E_DELETE
      INTEGER GD_EDL
      PARAMETER (GD_EDL=26)
C     Corresponding to GD_E_ARGUMENT
      INTEGER GD_EAR
      PARAMETER (GD_EAR=27)
C     Corresponding to GD_E_CALLBACK
      INTEGER GD_ECB
      PARAMETER (GD_ECB=28)
C     Corresponding to GD_E_EXISTS
      INTEGER GD_EEX
      PARAMETER (GD_EEX=29)
C     Corresponding to GD_E_UNCLEAN_DB
      INTEGER GD_UCL
      PARAMETER (GD_UCL=30)
C     Corresponding to GD_E_DOMAIN
      INTEGER GD_EDO
      PARAMETER (GD_EDO=31)
C     Corresponding to GD_E_BAD_REPR
      INTEGER GD_ERP
      PARAMETER (GD_ERP=5)
C     Corresponding to GD_E_BOUNDS
      INTEGER GD_EBO
      PARAMETER (GD_EBO=35)
C     Corresponding to GD_E_LINE_TOO_LONG
      INTEGER GD_ETL
      PARAMETER (GD_ETL=36)

C Deprecated error codes
C     Corresponding to GD_E_BAD_ENDIANNESS
      INTEGER GD_EEN
      PARAMETER (GD_EEN=27)
C     Corresponding to GD_E_BAD_PROTECTION
      INTEGER GD_EBP
      PARAMETER (GD_EBP=27)
C     Corresponding to GD_E_BAD_VERSION
      INTEGER GD_EVR
      PARAMETER (GD_EVR=27)
C     Corresponding to GD_E_OPEN_LINFILE
      INTEGER GD_EOL
      PARAMETER (GD_EOL=12)
C     Corresponding to GD_E_FLUSH
      INTEGER GD_EFL
      PARAMETER (GD_EFL=7)
C     Corresponding to GD_E_OPEN
      INTEGER GD_EOP
      PARAMETER (GD_EOP=7)
C     Corresponding to GD_E_OPEN_FRAGMENT
      INTEGER GD_EOF
      PARAMETER (GD_EOF=7)
C     Corresponding to GD_E_OPEN_INCLUDE
      INTEGER GD_EOI
      PARAMETER (GD_EOI=7)
C     Corresponding to GD_E_RAW_IO
      INTEGER GD_ERW
      PARAMETER (GD_ERW=7)
C     Corresponding to GD_E_TRUNC
      INTEGER GD_ETR
      PARAMETER (GD_ETR=7)

C Open flags
C     Corresponding to GD_RDONLY
      INTEGER GD_RO
      PARAMETER (GD_RO=0)
C     Corresponding to GD_RDWR
      INTEGER GD_RW
      PARAMETER (GD_RW=1)
C     Corresponding to GD_FORCE_ENDIAN
      INTEGER GD_FE
      PARAMETER (GD_FE=2)
C     Corresponding to GD_BIG_ENDIAN
      INTEGER GD_BE
      PARAMETER (GD_BE=4)
C     Corresponding to GD_LITTLE_ENDIAN
      INTEGER GD_LE
      PARAMETER (GD_LE=8)
C     Corresponding to GD_CREAT
      INTEGER GD_CR
      PARAMETER (GD_CR=16)
C     Corresponding to GD_EXCL
      INTEGER GD_EX
      PARAMETER (GD_EX=32)
C     Corresponding to GD_TRUNC
      INTEGER GD_TR
      PARAMETER (GD_TR=64)
C     Corresponding to GD_PEDANTIC
      INTEGER GD_PE
      PARAMETER (GD_PE=128)
C     Corresponding to GD_FORCE_ENCODING
      INTEGER GD_FC
      PARAMETER (GD_FC=256)
C     Corresponding to GD_VERBOSE
      INTEGER GD_VB
      PARAMETER (GD_VB=512)
C     Corresponding to GD_IGNORE_DUPS
      INTEGER GD_ID
      PARAMETER (GD_ID=1024)
C     Corresponding to GD_IGNORE_REFS
      INTEGER GD_IR
      PARAMETER (GD_IR=2048)
C     Corresponding to GD_PRETTY_PRINT
      INTEGER GD_PP
      PARAMETER (GD_PP=4096)
C     Corresponding to GD_ARM_ENDIAN
      INTEGER GD_AE
      PARAMETER (GD_AE=8192)
C     Corresponding to GD_NOT_ARM_ENDIAN
      INTEGER GD_NA
      PARAMETER (GD_NA=0)
C     Corresponding to GD_PERMISSIVE
      INTEGER GD_PM
      PARAMETER (GD_PM=16384)
C     Corresponding to GD_TRUNCSUB
      INTEGER GD_TS
      PARAMETER (GD_TS=32768)
C     Corresponding to GD_AUTO_ENCODED
      INTEGER GDE_AU
      PARAMETER (GDE_AU=0)
C     Corresponding to GD_BZIP2_ENCODED
      INTEGER GDE_BZ
      PARAMETER (GDE_BZ=83886080)
C     Corresponding to GD_FLAC_ENCODED
      INTEGER GDE_FL
      PARAMETER (GDE_FL=167772160)
C     Corresponding to GD_GZIP_ENCODED
      INTEGER GDE_GZ
      PARAMETER (GDE_GZ=67108864)
C     Corresponding to GD_LZMA_ENCODED
      INTEGER GDE_LZ
      PARAMETER (GDE_LZ=100663296)
C     Corresponding to GD_SIE_ENCODED
      INTEGER GDE_SI
      PARAMETER (GDE_SI=117440512)
C     Corresponding to GD_SLIM_ENCODED
      INTEGER GDE_SL
      PARAMETER (GDE_SL=50331648)
C     Corresponding to GD_TEXT_ENCODED
      INTEGER GDE_TX
      PARAMETER (GDE_TX=33554432)
C     Corresponding to GD_UNENCODED
      INTEGER GDE_UN
      PARAMETER (GDE_UN=16777216)
C     Corresponding to GD_ZZSLIM_ENCODED
      INTEGER GDE_ZS
      PARAMETER (GDE_ZS=150994944)
C     Corresponding to GD_ZZIP_ENCODED
      INTEGER GDE_ZZ
      PARAMETER (GDE_ZZ=134217728)

C Entry types
C     Corresponding to GD_NO_ENTRY
      INTEGER GD_NOE
      PARAMETER (GD_NOE=0)
C     Corresponding to GD_RAW_ENTRY
      INTEGER GD_RWE
      PARAMETER (GD_RWE=1)
C     Corresponding to GD_LINCOM_ENTRY
      INTEGER GD_LCE
      PARAMETER (GD_LCE=2)
C     Corresponding to GD_LINTERP_ENTRY
      INTEGER GD_LTE
      PARAMETER (GD_LTE=3)
C     Corresponding to GD_BIT_ENTRY
      INTEGER GD_BTE
      PARAMETER (GD_BTE=4)
C     Corresponding to GD_MULTIPLY_ENTRY
      INTEGER GD_MTE
      PARAMETER (GD_MTE=5)
C     Corresponding to GD_PHASE_ENTRY
      INTEGER GD_PHE
      PARAMETER (GD_PHE=6)
C     Corresponding to GD_INDEX_ENTRY
      INTEGER GD_IXE
      PARAMETER (GD_IXE=7)
C     Corresponding to GD_POLYNOM_ENTRY
      INTEGER GD_PNE
      PARAMETER (GD_PNE=8)
C     Corresponding to GD_SBIT_ENTRY
      INTEGER GD_SBE
      PARAMETER (GD_SBE=9)
C     Corresponding to GD_DIVIDE_ENTRY
      INTEGER GD_DVE
      PARAMETER (GD_DVE=10)
C     Corresponding to GD_RECIP_ENTRY
      INTEGER GD_RCE
      PARAMETER (GD_RCE=11)
C     Corresponding to GD_WINDOW_ENTRY
      INTEGER GD_WDE
      PARAMETER (GD_WDE=12)
C     Corresponding to GD_MPLEX_ENTRY
      INTEGER GD_MXE
      PARAMETER (GD_MXE=13)
C     Corresponding to GD_CONST_ENTRY
      INTEGER GD_COE
      PARAMETER (GD_COE=16)
C     Corresponding to GD_CARRAY_ENTRY
      INTEGER GD_CAE
      PARAMETER (GD_CAE=18)
C     Corresponding to GD_STRING_ENTRY
      INTEGER GD_STE
      PARAMETER (GD_STE=17)

C Data types -- the unsigned types won't work when passed as
C               a return type; they are defined because they
C               may be returned by GDGERW or GDNTYP
C     Corresponding to GD_NULL
      INTEGER GD_NUL
      PARAMETER (GD_NUL=0)
C     Corresponding to GD_UINT8
      INTEGER GD_U8
      PARAMETER (GD_U8=1)
C     Corresponding to GD_INT8
      INTEGER GD_I8
      PARAMETER (GD_I8=33)
C     Corresponding to GD_UINT16
      INTEGER GD_U16
      PARAMETER (GD_U16=2)
C     Corresponding to GD_INT16
      INTEGER GD_I16
      PARAMETER (GD_I16=34)
C     Corresponding to GD_UINT32
      INTEGER GD_U32
      PARAMETER (GD_U32=4)
C     Corresponding to GD_INT32
      INTEGER GD_I32
      PARAMETER (GD_I32=36)
C     Corresponding to GD_UINT64
      INTEGER GD_U64
      PARAMETER (GD_U64=8)
C     Corresponding to GD_INT64
      INTEGER GD_I64
      PARAMETER (GD_I64=40)
C     Corresponding to GD_FLOAT32
      INTEGER GD_F32
      PARAMETER (GD_F32=132)
C     Corresponding to GD_FLOAT64
      INTEGER GD_F64
      PARAMETER (GD_F64=136)
C     Corresponding to GD_COMPLEX64
      INTEGER GD_C64
      PARAMETER (GD_C64=264)
C     Corresponding to GD_COMPLEX128
      INTEGER GDC128
      PARAMETER (GDC128=272)

C Delete and Rename flags
C     Corresponding to GD_DEL_META
      INTEGER GDD_MT
      PARAMETER (GDD_MT=1)
C     Corresponding to GD_DEL_DATA
      INTEGER GDD_DT
      PARAMETER (GDD_DT=2)
C     Corresponding to GD_DEL_DEREF
      INTEGER GDD_DR
      PARAMETER (GDD_DR=4)
C     Corresponding to GD_DEL_FORCE
      INTEGER GDD_FO
      PARAMETER (GDD_FO=8)
C     Corresponding to GD_REN_DATA
      INTEGER GDR_DT
      PARAMETER (GDR_DT=1)
C     Corresponding to GD_REN_UPDB
      INTEGER GDR_UP
      PARAMETER (GDR_UP=2)
C     Corresponding to GD_REN_DANGLE
      INTEGER GDR_DL
      PARAMETER (GDR_DL=4)
C     Corresponding to GD_REN_FORCE
      INTEGER GDR_FO
      PARAMETER (GDR_FO=8)

C Protection levels
C     Corresponding to GD_PROTECT_NONE
      INTEGER GDPR_N
      PARAMETER (GDPR_N=0)
C     Corresponding to GD_PROTECT_FORMAT
      INTEGER GDPR_F
      PARAMETER (GDPR_F=1)
C     Corresponding to GD_PROTECT_DATA
      INTEGER GDPR_D
      PARAMETER (GDPR_D=2)
C     Corresponding to GD_PROTECT_ALL
      INTEGER GDPR_A
      PARAMETER (GDPR_A=3)

C Callback actions
C     Corresponding to GD_SYNTAX_ABORT
      INTEGER GDSX_A
      PARAMETER (GDSX_A=0)
C     Corresponding to GD_SYNTAX_RESCAN
      INTEGER GDSX_S
      PARAMETER (GDSX_S=1)
C     Corresponding to GD_SYNTAX_IGNORE
      INTEGER GDSX_I
      PARAMETER (GDSX_I=2)
C     Corresponding to GD_SYNTAX_CONTINUE
      INTEGER GDSX_C
      PARAMETER (GDSX_C=3)

C Syntax suberrors
C     Corresponding to GD_E_FORMAT_BAD_SPF
      INTEGER GDF_SF
      PARAMETER (GDF_SF=1)
C     Corresponding to GD_E_FORMAT_N_FIELDS
      INTEGER GDF_NF
      PARAMETER (GDF_NF=2)
C     Corresponding to GD_E_FORMAT_N_TOK
      INTEGER GDF_NT
      PARAMETER (GDF_NT=3)
C     Corresponding to GD_E_FORMAT_NUMBITS
      INTEGER GDF_NB
      PARAMETER (GDF_NB=4)
C     Corresponding to GD_E_FORMAT_BITNUM
      INTEGER GDF_BN
      PARAMETER (GDF_BN=5)
C     Corresponding to GD_E_FORMAT_BITSIZE
      INTEGER GDF_SZ
      PARAMETER (GDF_SZ=6)
C     Corresponding to GD_E_FORMAT_CHARACTER
      INTEGER GDF_CH
      PARAMETER (GDF_CH=7)
C     Corresponding to GD_E_FORMAT_BAD_LINE
      INTEGER GDF_LI
      PARAMETER (GDF_LI=8)
C     Corresponding to GD_E_FORMAT_RES_NAME
      INTEGER GDF_RN
      PARAMETER (GDF_RN=9)
C     Corresponding to GD_E_FORMAT_ENDIAN
      INTEGER GDF_EN
      PARAMETER (GDF_EN=10)
C     Corresponding to GD_E_FORMAT_BAD_TYPE
      INTEGER GDF_TY
      PARAMETER (GDF_TY=11)
C     Corresponding to GD_E_FORMAT_BAD_NAME
      INTEGER GDF_NA
      PARAMETER (GDF_NA=12)
C     Corresponding to GD_E_FORMAT_UNTERM
      INTEGER GDF_UM
      PARAMETER (GDF_UM=13)
C     Corresponding to GD_E_FORMAT_METARAW
      INTEGER GDF_MR
      PARAMETER (GDF_MR=14)
C     Corresponding to GD_E_FORMAT_NO_PARENT
      INTEGER GDF_PA
      PARAMETER (GDF_PA=15)
C     Corresponding to GD_E_FORMAT_DUPLICATE
      INTEGER GDF_DU
      PARAMETER (GDF_DU=16)
C     Corresponding to GD_E_FORMAT_LOCATION
      INTEGER GDF_LO
      PARAMETER (GDF_LO=17)
C     Corresponding to GD_E_FORMAT_PROTECT
      INTEGER GDF_PR
      PARAMETER (GDF_PR=18)
C     Corresponding to GD_E_FORMAT_LITERAL
      INTEGER GDF_LT
      PARAMETER (GDF_LT=19)
C     Corresponding to GD_E_FORMAT_WINDOP
      INTEGER GDF_WO
      PARAMETER (GDF_WO=20)
C     Corresponding to GD_E_FORMAT_META_META
      INTEGER GDF_MM
      PARAMETER (GDF_MM=21)
C     Corresponding to GD_E_FORMAT_ALIAS
      INTEGER GDF_AL
      PARAMETER (GDF_AL=22)
C     Corresponding to GD_E_FORMAT_MPLEXVAL
      INTEGER GDF_MV
      PARAMETER (GDF_MV=23)

C Special version codes
C     Corresponding to GD_VERSION_CURRENT
      INTEGER GDSV_C
      PARAMETER (GDSV_C=-1)
C     Corresponding to GD_VERSION_LATEST
      INTEGER GDSV_L
      PARAMETER (GDSV_L=-2)
C     Corresponding to GD_VERSION_EARLIEST
      INTEGER GDSV_E
      PARAMETER (GDSV_E=-3)

C Seek flags
C     Corresponding to GD_SEEK_SET
      INTEGER GDSK_S
      PARAMETER (GDSK_S=0)
C     Corresponding to GD_SEEK_CUR
      INTEGER GDSK_C
      PARAMETER (GDSK_C=1)
C     Corresponding to GD_SEEK_END
      INTEGER GDSK_E
      PARAMETER (GDSK_E=2)
C     Corresponding to GD_SEEK_WRITE
      INTEGER GDSK_W
      PARAMETER (GDSK_W=4)

C Window operations
C     Corresponding to GD_WINDOP_UNK
      INTEGER GDW_UN
      PARAMETER (GDW_UN=0)
C     Corresponding to GD_WINDOP_EQ
      INTEGER GDW_EQ
      PARAMETER (GDW_EQ=1)
C     Corresponding to GD_WINDOP_GE
      INTEGER GDW_GE
      PARAMETER (GDW_GE=2)
C     Corresponding to GD_WINDOP_GT
      INTEGER GDW_GT
      PARAMETER (GDW_GT=3)
C     Corresponding to GD_WINDOP_LE
      INTEGER GDW_LE
      PARAMETER (GDW_LE=4)
C     Corresponding to GD_WINDOP_LT
      INTEGER GDW_LT
      PARAMETER (GDW_LT=5)
C     Corresponding to GD_WINDOP_NE
      INTEGER GDW_NE
      PARAMETER (GDW_NE=6)
C     Corresponding to GD_WINDOP_SET
      INTEGER GDW_ST
      PARAMETER (GDW_ST=7)
C     Corresponding to GD_WINDOP_CLR
      INTEGER GDW_CL
      PARAMETER (GDW_CL=8)

C Desync flags
C     Corresponding to GD_DESYNC_PATHCHECK
      INTEGER GDDS_P
      PARAMETER (GDDS_P=1)
C     Corresponding to GD_DESYNC_REOPEN
      INTEGER GDDS_O
      PARAMETER (GDDS_O=2)

C Entry List codes and flags
C     Corresponding to GD_ALL_ENTRIES
      INTEGER GDEN_X
      PARAMETER (GDEN_X=0)
C     Corresponding to GD_VECTOR_ENTRIES
      INTEGER GDEN_V
      PARAMETER (GDEN_V=33)
C     Corresponding to GD_SCALAR_ENTRIES
      INTEGER GDEN_S
      PARAMETER (GDEN_S=34)
C     Corresponding to GD_ALIAS_ENTRIES
      INTEGER GDEN_A
      PARAMETER (GDEN_A=-1)
C     Corresponding to GD_ENTRIES_HIDDEN
      INTEGER GDEN_H
      PARAMETER (GDEN_H=1)
C     Corresponding to GD_ENTRIES_NOALIAS
      INTEGER GDEN_N
      PARAMETER (GDEN_N=2)

C Entry object flags
C     Corresponding to GD_EN_CALC
      INTEGER GDE_CA
      PARAMETER (GDE_CA=2)
C     Corresponding to GD_EN_HIDDEN
      INTEGER GDE_HI
      PARAMETER (GDE_HI=4)
C     Corresponding to GD_EN_COMPSCAL
      INTEGER GDE_CS
      PARAMETER (GDE_CS=1)

C Miscellaneous parameters
C     Corresponding to GD_ALL_FRAGMENTS
      INTEGER GD_ALL
      PARAMETER (GD_ALL=-1)
C     Corresponding to GD_DEFAULT_LOOKBACK
      INTEGER GDLB_D
      PARAMETER (GDLB_D=10)
C     Corresponding to GD_DIRFILE_STANDARDS_VERSION
      INTEGER GD_DSV
      PARAMETER (GD_DSV=9)
C     Corresponding to GD_HERE
      INTEGER GD_HER
      PARAMETER (GD_HER=-1)
C     Corresponding to GD_LOOKBACK_ALL
      INTEGER GDLB_A
      PARAMETER (GDLB_A=-1)
C     Corresponding to GD_MAX_LINE_LENGTH
      INTEGER GD_MLL
      PARAMETER (GD_MLL=4096)


C Externals
C     Corresponding to gd_alter_affixes(3)
      EXTERNAL GDAAFX
C     Corresponding to gd_add_alias(3)
      EXTERNAL GDADAL
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_mplex(3)
      EXTERNAL GDADMX
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     Corresponding to gd_add_window(3)
      EXTERNAL GDADWD
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     Corresponding to gd_alter_mplex(3)
      EXTERNAL GDALMX
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     Correpsonding to gd_aliases(3)
      EXTERNAL GDALSS
C     Returns the maximum alias length
      EXTERNAL GDALSX
C     Corresponding to gd_alter_window(3)
      EXTERNAL GDALWD
C     Corresponding to gd_alter_protection(3)
      EXTERNAL GDAPRT
C     Corresponding to gd_array_len(3)
      EXTERNAL GDARLN
C     Alter a scalar parameter
      EXTERNAL GDASCA
C     Corresponding to gd_add(3) for BIT fields
      EXTERNAL GDASBT
C     Corresponding to gd_add(3) for complex-valued LINCOM fields
      EXTERNAL GDASCL
C     Corresponding to gd_add(3) for complex-valued POLYNOM fields
      EXTERNAL GDASCP
C     Corresponding to gd_add(3) for complex-valued RECIP fields
      EXTERNAL GDASCR
C     Corresponding to gd_add(3) for LINCOM fields
      EXTERNAL GDASLC
C     Corresponding to gd_add(3) for MPLEX fields
      EXTERNAL GDASMX
C     Corresponding to gd_add(3) for PHASE fields
      EXTERNAL GDASPH
C     Corresponding to gd_add(3) for POLYNOM fields
      EXTERNAL GDASPN
C     Corresponding to gd_add(3) for RECIP fields
      EXTERNAL GDASRC
C     Corresponding to gd_add(3) for RAW fields
      EXTERNAL GDASRW
C     Corresponding to gd_add(3) for SBIT fields
      EXTERNAL GDASSB
C     Corresponding to gd_add(3) for WINDOW fields
      EXTERNAL GDASWD
C     Corresponding to gd_alias_target(3)
      EXTERNAL GDATRG
C     The following function is deprecated! use GDARLN instead
      EXTERNAL GDCALN
C     Corresponding to gd_parser_callback(3)
      EXTERNAL GDCLBK
C     Corresponding to gd_close(3)
      EXTERNAL GDCLOS
C     Corresponding to gd_constants(3) (sort of)
      EXTERNAL GDCONS
C     Corresponding to gd_copen(3)
      EXTERNAL GDCOPN
C     Correpsonding to gd_delete(3)
      EXTERNAL GDDELE
C     Corresponding to gd_discard(3)
      EXTERNAL GDDSCD
C     Corresponding to gd_desync(3)
      EXTERNAL GDDSYN
C     Corresponding to gd_error_count(3)
      EXTERNAL GDECNT
C     Corresponding to gd_encoding_support(3)
      EXTERNAL GDENCS
C     Returns entry flags
      EXTERNAL GDENFL
C     Corresponding to gd_entry_list(3) (sort of)
      EXTERNAL GDENTN
C     Returns the maximum entry name length
      EXTERNAL GDENTX
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_flags(3)
      EXTERNAL GDFLAG
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_affixes(3)
      EXTERNAL GDFRAF
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     Corresponding to gd_entry(3) for WINDOW fields
      EXTERNAL GDGEWD
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_hide(3)
      EXTERNAL GDHIDE
C     Corresponding to gd_hidden(3)
      EXTERNAL GDHIDN
C     Corresponding to gd_include_affixes(3)
      EXTERNAL GDINCA
C     Corresponding to gd_include(3)
      EXTERNAL GDINCL
C     Corresponding to gd_invalid_dirfile(3)
      EXTERNAL GDINVD
C     Corresponding to gd_alter_entry(3) for BIT fields
      EXTERNAL GDLSBT
C     Corresponding to gd_alter_entry(3) for complex-valued LINCOM fields
      EXTERNAL GDLSCL
C     Corresponding to gd_alter_entry(3) for complex-valued POLYNOM fields
      EXTERNAL GDLSCP
C     Corresponding to gd_alter_entry(3) for complex-valued RECIP fields
      EXTERNAL GDLSCR
C     Corresponding to gd_alter_entry(3) for LINCOM fields
      EXTERNAL GDLSLC
C     Corresponding to gd_alter_entry(3) for MPLEX fields
      EXTERNAL GDLSMX
C     Corresponding to gd_alter_entry(3) for PHASE fields
      EXTERNAL GDLSPH
C     Corresponding to gd_alter_entry(3) for POLYNOM fields
      EXTERNAL GDLSPN
C     Corresponding to gd_alter_entry(3) for RECIP fields
      EXTERNAL GDLSRC
C     Corresponding to gd_alter_entry(3) for RAW fields
      EXTERNAL GDLSRW
C     Corresponding to gd_alter_entry(3) for SBIT fields
      EXTERNAL GDLSSB
C     Corresponding to gd_alter_entry(3) for WINDOW fields
      EXTERNAL GDLSWD
C     Corresponding to gd_linterp_tablename(3)
      EXTERNAL GDLTTN
C     Corresponding to gd_mconstants(3) (sort of)
      EXTERNAL GDMCOS
C     Corresponding to gd_madd_alias(3)
      EXTERNAL GDMDAL
C     Corresponding to gd_madd_bit(3)
      EXTERNAL GDMDBT
C     Corresponding to gd_madd_carray(3)
      EXTERNAL GDMDCA
C     Corresponding to 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_mplex(3)
      EXTERNAL GDMDMX
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_madd_window(3)
      EXTERNAL GDMDWD
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_mstrings(3) (sort of)
      EXTERNAL GDMSTS
C     Returns the maximum length of the longest string metafield for a
C     field
      EXTERNAL GDMSTX
C     Corresponding to gd_mvector_list(3) (sort of)
      EXTERNAL GDMVEN
C     Corresponding to gd_mplex_lookback(3)
      EXTERNAL GDMXLB
C     Corresponding to gd_naliases(3)
      EXTERNAL GDNALS
C     Corresponding to gd_dirfilename(3)
      EXTERNAL GDNAME
C     Corresponding to gd_nentries(3)
      EXTERNAL GDNENT
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     Deregister a callback function (ie. gd_parser_callback(..., NULL))
      EXTERNAL GDNOCB
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_raw_close(3)
      EXTERNAL GDRCLO
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_seek(3)
      EXTERNAL GDSEEK
C     Corresponding to gd_dirfile_standards(3)
      EXTERNAL GDSTDV
C     Corresponding to gd_strings(3) (sort of)
      EXTERNAL GDSTRS
C     Returns the length of the longest string field
      EXTERNAL GDSTRX
C     Corresponding to gd_sync(3)
      EXTERNAL GDSYNC
C     Corresponding to gd_tell(3)
      EXTERNAL GDTELL
C     Corresponding to gd_strtok(3)
      EXTERNAL GDTOKE
C     Corresponding to gd_unhide(3)
      EXTERNAL GDUHID
C     Corresponding to gd_uninclude(3)
      EXTERNAL GDUINC
C     Corresponding to gd_verbose_prefix(3)
      EXTERNAL GDVBPX
C     Corresponding to gd_vector_list(3) (sort of)
      EXTERNAL GDVECN
C     Corresponding to gd_validate(3)
      EXTERNAL GDVLDT