forked from CGS-GIS/GPSPACE
-
Notifications
You must be signed in to change notification settings - Fork 2
/
MAXDIM
117 lines (117 loc) · 3.23 KB
/
MAXDIM
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
C2345678901234567890123456789012345678901234567890123456789012345678901234567890
C
C*************************************************************** MAXDIM
C
C PURPOSE: ALL ARRAY DIMENSIONS AND SOME HARDCODED PARAMETERS
C
C Copyright (c) 2018 Government of Canada. Under MIT Licence terms
C Droit d'auteur (c) Gouvernement du Canada, 2018. Sous termes de Licence MIT
C
C MAXARC - MAXIMUM NUMBER OF SATELLITE ARCS
C MAXBUF - MAXIMUM NUMBER OF BUFFERED SATELLITE CLOCKS
C MAXCOR - MAXIMUM NUMBER OF COORDINATES
C MAXDEG - MAXIMUM DEGREE OF POLYNOMIAL
C MAXEPH - MAXIMUM NUMBER OF EPHEMERIS PER SATELLITE
C MAXFLT - MAXIMUM NUMBER OF SUMS IN OBSERVATION FILTER
C MAXKEP - MAXIMUM NUMBER OF EPHEMERIS PARAMETERS
C MAXPAR - MAXIMUM NUMBER OF PARAMETERS
C MAXOBS - MAXIMUM NUMBER OF SATELLITES OBSERVED
C MAXOBS2 - MAXIMUM NUMBER OF OBSERVATIONS
C MAXPAR - MAXIMUM NUMBER OF STATION PARAMETERS
C MAXSAT - MAXIMUM NUMBER OF SATELLITES
C MAXDAYS- MAXIMUM NUMBER OF CONSECUTIVE DAYS OF PRECISE PRODUCTS
INTEGER NREDUND
C
INTEGER MAXADT
INTEGER MAXAMB
INTEGER MAXARC
INTEGER MAXBUF
INTEGER MAXCLK
INTEGER MAXCMD
INTEGER MAXCOR
INTEGER MAXDEG
INTEGER MAXEPH
INTEGER MAXFLT
INTEGER MAXKEP
INTEGER MAXLAT
INTEGER MAXLIN
INTEGER MAXLON
INTEGER MAXOBS
INTEGER MAXOBS2
INTEGER MAXOPT
INTEGER MAXORD
INTEGER MAXPAR
INTEGER MAXPAR2
INTEGER MAXPFIT
INTEGER MAXREC
INTEGER MAXREJ
INTEGER MAXSAT
INTEGER MAXRES
INTEGER MAXDAYS
INTEGER MAXOTLC
INTEGER MAXSHDEG
INTEGER MAXSHCOEF
INTEGER MAXHOION
INTEGER MAXBLK
C
PARAMETER (NREDUND=1)
PARAMETER (MAXRES=400)
PARAMETER (MAXADT=764)
PARAMETER (MAXAMB=10)
PARAMETER (MAXBUF=10)
PARAMETER (MAXCLK=10)
PARAMETER (MAXCMD=21)
PARAMETER (MAXCOR=3)
PARAMETER (MAXDEG=20)
PARAMETER (MAXEPH=70)
PARAMETER (MAXFLT=24)
PARAMETER (MAXKEP=30)
PARAMETER (MAXLAT=180)
PARAMETER (MAXLIN=20)
PARAMETER (MAXLON=360)
C Feb 25, 2020
c PARAMETER (MAXOBS=36)
c PARAMETER (MAXOBS2=72)
PARAMETER (MAXOBS=40)
PARAMETER (MAXOBS2=80)
PARAMETER (MAXOPT=21)
PARAMETER (MAXORD=21)
PARAMETER (MAXREC=584)
PARAMETER (MAXPAR=10)
C Feb 25, 2020
c PARAMETER (MAXPAR2=46)
PARAMETER (MAXPAR2=50)
PARAMETER (MAXPFIT=150)
PARAMETER (MAXREJ=10)
C Apr 25, 2020
C PARAMETER (MAXSAT=136)
PARAMETER (MAXSAT=160)
PARAMETER (MAXDAYS=45)
PARAMETER (MAXOTLC=12)
PARAMETER (MAXSHDEG=16)
PARAMETER (MAXSHCOEF=153)
C MAXARC should be multiple of MAXDAYS (at least 4*)
PARAMETER (MAXARC=180)
C Jun 6, 2020
c PARAMETER (MAXHOION=19)
PARAMETER (MAXHOION=40)
c Lahaye : 2019Oct19 : SV block indeces change
c PARAMETER (MAXBLK=32)
PARAMETER (MAXBLK=80)
c Lahaye : 2019Oct19 : SV block indeces change
C
C USED IN GIMP
C
INTEGER MAXCHN
INTEGER MAXNLR
INTEGER MAXNLP
INTEGER MAXIOB
INTEGER MAXTYP
C
PARAMETER (MAXCHN=36)
PARAMETER (MAXNLR=5)
PARAMETER (MAXNLP=8)
PARAMETER (MAXIOB=5)
PARAMETER (MAXTYP=5)
C
C