! ------------------------------------------------------------------------- ! Bernese GPS Software Version 5.0 ! ------------------------------------------------------------------------- MODULE p_gpsest ! ------------------------------------------------------------------------- ! Purpose: Maximum dimensions for program GPSEST ! ! Author: L. Mervart ! ! Created: 12-Feb-2003 ! Last mod.: 07-Apr-2004 ! ! Changes: ! ! Copyright: Astronomical Institute ! University of Berne ! Switzerland ! ------------------------------------------------------------------------- ! ! 20-APR-00 RD: MAXAMP 1200->1500 AND MAXPAR 2200->2500 ! 15-JAN-01 SS: MAXSTA FROM 150 TO 180 ! 05-SEP-01 SS: MAXSNG FROM 155 TO 300 ! 05-OCT-01 DI: MAXLOC FROM 15000 TO 20000 ! 28-FEB-02 SS: MAXSNG FROM 300 TO 550 ! 28-AUG-02 SS: MAXTRM FROM 1201 TO 1801 ! 12-NOV-02 SS: MAXPAR FROM 3500 TO 4000 ! 12-NOV-02 RS: MAXSPV ADDED ! 07-MAR-03 MR: MAXTYP FROM 24 TO 26 ! 08-MAR-03 MR: MAXAMB MOVED TO M_MAXDIM ! 27-JUN-03 SS: MAXSTA FROM 180 TO 200 ! 03-NOV-03 HB: SMALL: MAXPAR 300 -> 600, MAXAMP 200 -> 400, ! MAXTRM 80 -> 100 ! 03-NOV-03 SS: MAXAMP FROM 2600 TO 2800 ! 27-JAN-04 HU: MAXSHD ADDED ! 07-APR-04 HB: SMALL: MAXTRM 100 -> 600, MAXAMP 400 -> 500, ! MAXPAR 600 -> 700 ! INTEGER*4 MAXAMB,MAXFRQ,MAXFIL,MAXSTA,MAXARC,MAXPAR,MAXAMP, & MAXLOC,MAXCMP,MAXTRM,MAXTRP,MAXSNG,MAXLCQ,MAXFRS, & MAXWGT,MAXPOL,MAXSTC,MAXSTP,MAXOFF,MAXOFR,MAXTYP, & MAXHIL,MAXPOT,MAXALB,MAXCAL,MAXVAR,MAXMEA,MAXSPV, & MAXSHD #ifdef DIM_SMALL PARAMETER (MAXAMB=1000,MAXFRQ= 2, & MAXFIL= 20,MAXSTA= 20,MAXARC= 5,MAXPAR= 700, & MAXAMP= 500,MAXLOC= 800,MAXCMP= 6,MAXTRM= 600, & MAXTRP= 10,MAXSNG= 40, & MAXLCQ= 7,MAXFRS= 5,MAXWGT= 10,MAXPOL= 20, & MAXSTC= 30,MAXSTP= 30,MAXOFF= 24,MAXOFR= 30, & MAXTYP= 26,MAXHIL= 10,MAXPOT= 20,MAXALB= 10, & MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30, & MAXSHD= 100) #endif #ifdef DIM_MEDIUM PARAMETER (MAXAMB=1000,MAXFRQ= 2, & MAXFIL= 300,MAXSTA= 120,MAXARC= 16,MAXPAR=1500, & MAXAMP= 800,MAXLOC=10000,MAXCMP= 6,MAXTRM= 800, & MAXTRP= 10,MAXSNG= 40, & MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 20, & MAXSTC= 30,MAXSTP= 30,MAXOFF= 24,MAXOFR= 200, & MAXTYP= 26,MAXHIL= 250,MAXPOT= 20,MAXALB= 10, & MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30, & MAXSHD= 100) #endif #ifdef DIM_LARGE PARAMETER (MAXAMB=1000,MAXFRQ= 2, & MAXFIL= 250,MAXSTA= 200,MAXARC= 20,MAXPAR=4000, & MAXAMP=2800,MAXLOC=20000,MAXCMP= 6,MAXTRM=1801, & MAXTRP= 10,MAXSNG= 550, & MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, & MAXSTC= 97,MAXSTP= 97,MAXOFF= 27,MAXOFR= 300, & MAXTYP= 26,MAXHIL= 250,MAXPOT= 20,MAXALB= 10, & MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30, & MAXSHD= 100) #endif ! O R I G I N A L ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 250,MAXSTA= 180,MAXARC= 20,MAXPAR=3500, ! 2 MAXAMP=2600,MAXLOC=20000,MAXCMP= 6,MAXTRM=1801, ! 3 MAXTRP= 10,MAXSNG= 550, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 30,MAXSTP= 40,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 250,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! DOUBLE DYNAMIC 9 minutes pulses ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 103,MAXSTA= 103,MAXARC= 20,MAXPAR=4000, ! 2 MAXAMP=3300,MAXLOC=20000,MAXCMP= 6,MAXTRM=1201, ! 3 MAXTRP= 10,MAXSNG=500, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 161,MAXSTP= 161,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 251,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! DOUBLE DYNAMIC 6 minutes pulses ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 103,MAXSTA= 103,MAXARC= 20,MAXPAR=4050, ! 2 MAXAMP=3300,MAXLOC=20000,MAXCMP= 6,MAXTRM=1201, ! 3 MAXTRP= 10,MAXSNG=750, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 165,MAXSTP= 165,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 251,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! DOUBLE DIFFERENCE KINEMATIC 8 HOURS (PRIEST) MAXSTA 103 ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 103,MAXSTA= 103,MAXARC= 20,MAXPAR=6200, ! 2 MAXAMP=3000,MAXLOC=20000,MAXCMP= 6,MAXTRM=1201, ! 3 MAXTRP= 10,MAXSNG= 8, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 7,MAXSTP= 7,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 251,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! KINEMATIC BOOTSTRAPING ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 98,MAXSTA= 98,MAXARC= 20,MAXPAR=6200, ! 2 MAXAMP=3820,MAXLOC=20000,MAXCMP= 6,MAXTRM=1201, ! 3 MAXTRP= 10,MAXSNG= 8, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 7,MAXSTP= 7,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 251,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! MELBOURNE-WUBBENA, NARROW-LANE with fixed orbits ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 10,MAXSTA= 10,MAXARC= 20,MAXPAR=2200, ! 2 MAXAMP=1000,MAXLOC=20000,MAXCMP= 6,MAXTRM=1201, ! 3 MAXTRP= 10,MAXSNG= 8, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 7,MAXSTP= 7,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 251,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! ZERO DYNAMIC ! STEIGENBERGER ! PARAMETER (MAXFRQ= 2, ! 1 MAXFIL= 200,MAXSTA= 200,MAXARC= 20,MAXPAR=2000, ! 2 MAXAMP=1300,MAXLOC=20000,MAXCMP= 6,MAXTRM=1201, ! 3 MAXTRP= 10,MAXSNG=350, ! 4 MAXLCQ= 7,MAXFRS= 5,MAXWGT= 20,MAXPOL= 70, ! 5 MAXSTC= 97,MAXSTP= 97,MAXOFF= 27,MAXOFR= 300, ! 6 MAXTYP= 25,MAXHIL= 251,MAXPOT= 20,MAXALB= 10, ! 7 MAXCAL= 20,MAXVAR= 15,MAXMEA= 3,MAXSPV= 30) ! MAXSAT: MAXIMUM NUMBER OF SATELLITES ! MAXAMB: MAXIMUM NUMBER OF AMBIGUITIES FOR ONE SATELLITE IN A FILE ! MAXFRQ: MAXIMUM NUMBER OF DIFFERENT FREQ. TO BE PROCESSED PER FILE ! MAXFIL: MAXIMUM NUMBER OF FILES TO BE PROCESSED ! MAXSTA: MAXIMUM NUMBER OF STATIONS INVOLVED ! MAXARC: MAXIMUM NUMBER OF SATELLITE ARCS ! MAXPAR: MAXIMUM NUMBER OF PARAMETERS SIMULTANEOUSLY PROCESSED ! MAXAMP: MAXIMUM NUMBER OF AMBIGUITY PARAMETERS SIMULTAN. PROCESSED AND ! MAXIMUM NUMBER OF PARAMETERS TO BE PRE-ELIMINATED IN ONE STEP ! MAXLOC: MAXIMUM NUMBER OF PARAMETERS TO BE PROCESSED ! MAXCMP: MAXIMUM NUMBER OF CAMPAIGNS TO BE PROCESSED ! MAXTRM: MAXIMUM NUMBER OF TROPOSPHERE MODELS ! MAXTRP: MAXIMUM NUMBER OF TROPOSPHERE PARAMETERS PER MODEL ! MAXSNG: MAXIMUM NUMBER OF NON-ZERO ELEMENTS IN ONE LINE OF FIRST DE- ! SIGN MATRIX ! MAXFLS: MAXIMUM NUMBER OF FILES IN A SESSION ! MAXSAS: MAXIMUM NUMBER OF SATELLITES AT ONE EPOCH ! MAXEQN: =MAXFLS*MAXSAS ! MAXLCQ: MAXIMUM NUMBER OF ITEMS PER PARAMETER IN ARRAY "LOCQ" ! MAXFRS: MAXIMUM NUMBER OF DIFFERENT FREQUENCIES ALLOWED ! MAXWGT: MAXIMUM NUMBER OF SATELLITE SPECIFIC WEIGHT INTERVALS ! MAXPOL: MAXIMUM NUMBER OF EARTH ROTATION PARAMETER SETS ! MAXSTC: MAXIMUM NUMBER OF STOCHASTIC EPOCHS PER ARC ! MAXSTP: MAXIMUM NUMBER OF STOCHASTIC SPECIAL REQUESTS ! MAXOFF: MAXIMUM NUMBER OF SATELLITE ANTENNA OFFSET GROUPS ! MAXOFR: MAXIMUM NUMBER OF SATELLITE ANTENNA OFFSET ESTIM. REQUESTS ! MAXTYP: MAXIMUM NUMBER OF PARAMETER TYPES ! MAXHIL: MAXIMUM NUMBER OF HILL-TYPE RESONANCE PARAMETERS ! MAXPOT: MAXIMUM NUMBER OF POTENTIAL PARAMETERS ! MAXALB: MAXIMUM NUMBER OF SATELLITE GROUPS FOR ALBEDO ESTIMATION ! MAXCAL: MAXIMUM NUMBER OF ANTENNA PHASE CENTER ESTIMATION REQUESTS ! MAXGIM: MAXIMUM NUMBER OF GLOBAL/LOCAL IONOSPHERE MODELS ! MAXGIT: MAXIMUM NUMBER OF TERMS PER GLOBAL/LOCAL IONOSPHERE MODEL ! MAXMEA: MAXIMUM NUMBER OF MEASUREMENTS TYPE ! MAXSPV: MAXIMUM NUMBER OF SATELLITE ANTENNA PHASE CENTER GROUPS ! MAXSHD: MAXIMUM NUMBER OF SHADOW TRANSITS OF SATELLITES ! END MODULE p_gpsest