&tgcm_input ; LABEL='tiegcm1 ' TEMPDIR = '/ptmp/foster/tiegcm1/tmpdir' ; ;NTASK_LON = 1 ;NTASK_LAT = 4 ; START_YEAR = 1993 ; starting year START_DAY = 181 ; starting day of year (1->365) CALENDAR_ADVANCE = 1 ; if > 0, calendar time will be advanced ; MAGVOL='/TGCM/data/magfield.nc' ; mag data file for 5.0 deg horizontal ;MAGVOL='/TGCM/data/magdat_2.5h.nc' ; mag data file for 2.5 deg horizontal ; ;SOURCE='/ROBLE/tiegcm1/py93g18.nc' ;SOURCE_START = 180,0,0 SOURCE='/FOSTER/tiegcm1/py93g18.nc' SOURCE_START = 181,0,0 ; START= 181,0,0 STOP= 182,0,0 HIST= 1,0,0 SAVE= 1,0,0 ; STEP= 180 ; ;OUTPUT='/FOSTER/tiegcm1/py93g18_weimer.nc' ;OUTPUT='/FOSTER/tiegcm1/py93g18_heelis.nc' OUTPUT='/FOSTER/tiegcm1/py93g18_none.nc' MXHIST_PRIM = 10 ; default max hist on primary file = 8 ; SECSTART = 181,0,0 SECSTOP = 182,0,0 SECHIST = 0,1,0 SECSAVE = 0,6,0 ; ;SECOUT='/FOSTER/tiegcm1/sy93g18_weimer.nc','/FOSTER/tiegcm1/sy93g19_weimer.nc' ;SECOUT='/FOSTER/tiegcm1/sy93g18_heelis.nc','/FOSTER/tiegcm1/sy93g19_heelis.nc' SECOUT='/FOSTER/tiegcm1/sy93g18_none.nc','/FOSTER/tiegcm1/sy93g19_none.nc' MXHIST_SECH = 48 ; default max hist on secondary file = 20 ; SECFLDS = 'TN','UN','VN','W','O1','O2','NO','NE','TE', 'O2P','POTEN' SECFMAG = 'PHIM3D' SECFGEO2D = 'PHIH2D','CUSP','DRIZZLE','ALFA','NFLUX' SECFMAG2D = 'PHIHM2D','PHIM2D','ZIGM11','ZIGMC','ZIGM2','ZIGM22', 'RIM1', 'RIM2' ;SECFMAGPHR = ; DISPOSE=1 MAG=-74.5,127.,79.,-70. DIFHOR=0 ; ;IUIVI=1 ; iuivi is no longer in use (replaced by DYNAMO flag) ; DYNAMO=0 -> no dynamo ; DYNAMO=1 -> call "old" dynamo (see dynamo_old.F) ; DYNAMO=2 -> call "new" dynamo (see dynamo.F) DYNAMO=2 ; ; APRIL TIDES HAGAN(NEW) ;TIDE= ; 1.9300E+04, 1.5000E+04, 2.3100E+04, 0.7700E+04, 0.1660E+04, ; -2.600E+00, 0.000E+00, -3.300E+00, 4.2000E+00, 5.0000E+00 ;TIDE2 = 4.1E+4,-3.7 ; DECEMBER TIDES HAGAN(NEW) ;TIDE= ; 2.2700E+04, 1.9700E+04, 1.3500E+04, 0.5720E+04, 0.4560E+04, ; -2.500E+00, -4.400E+00, -3.500E+00,-2.4000E+00,-1.7000E+00 ;TIDE2 = 1.4E+4,-1.5 ; ; On /ROBLE/tgcm15r/peqsm41.nc: ;TIDE= ; 1.5000E+04, 0.1000E+04, 2.8000E+04, 0.1000E+04, 0.2000E+04, ; 0.1030E+02, 0.5800E+01, 0.7600E+01, 0.8300E+01, 0.8400E+01 ;TIDE2 = 1.0E+4,18.0 ; ; Set tides to zero if using gswm: TIDE= 0.,0.,0.,0.,0.,0.,0.,0.,0.,0. TIDE2 = 0.,0. ; ;GSWM_DI_NCFILE: File with gswm migrating diurnal ;GSWM_DI_NCFILE = '/TGCM/data/gswm/tgcm-ztuv-diurn-lbc99km.nc' ;GSWM_SDI_NCFILE: File with gswm migrating semidiurnal ;GSWM_SDI_NCFILE = '/TGCM/data/gswm/tgcm-ztuv-semi-lbc99km.nc' ; ; GSWM migrating diurnal file: GSWM_DI_NCFILE = '/TGCM/data/gswm/tgcm-ztuv-hires-diurn-lbc99km.nc' ; GSWM migrating semidiurnal file: GSWM_SDI_NCFILE = '/TGCM/data/gswm/tgcm-ztuv-hires-semi-lbc99km.nc' ; GSWM nonmigrating diurnal file: GSWM_NMIDI_NCFILE = '/TGCM/data/gswm/tgcm-ztuv-hires-nonmig-diurn-lbc99km.nc' ; GSWM nonmigrating semi-diurnal file: GSWM_NMISDI_NCFILE= '/TGCM/data/gswm/tgcm-ztuv-hires-nonmig-semi-lbc99km.nc' ; TIDEANN=0 AURORA=1 COLFAC=1.5 ; ; On /ROBLE/tiegcm1/py93t01: ;F107=90. ;F107A=90. ;POWER=16. ;CTPOTEN=45. ; ; Time-dependent hemispheric power and/or cross-tail potential: ; (Time series of groups of 4 values: day,hour,min,value) ;POWER_TIME = 180,0, 0,12., 180,0,10,14., 180,0,20,16., 180,0,30,18., ; 180,0,40,16., 180,0,50,14., 180,1, 0,12. ;CTPOTEN_TIME = 180,0, 0,40., 180,0, 6,45., 180,0,12,50., 180,0,18,55., ; 180,0,24,60., 180,0,30,55., 180,0,36,50., 180,0,42,45., ; 180,0,48,40., 180,0,54,35., 180,1, 0,30. ; ;POWER_TIME = 185,0, 0,12., 186,0, 0,13., 187,0, 0,14., 188,0, 0,15., ; 189,0, 0,16., 190,0, 0,17., 191,0, 0,16., 192,0, 0,15., ; 193,0, 0,14., 194,0, 0,13., 195,0, 0,12., 196,0, 0,13., ; 197,0, 0,14., 198,0, 0,15., 199,0, 0,16., 200,0, 0,17. ;CTPOTEN_TIME = 185,0, 0,45., 186,0, 0,46., 187,0, 0,47., 188,0, 0,48., ; 189,0, 0,49., 190,0, 0,50., 191,0, 0,49., 192,0, 0,48., ; 193,0, 0,47., 194,0, 0,46., 195,0, 0,45., 196,0, 0,46., ; 197,0, 0,47., 198,0, 0,48., 199,0, 0,49., 200,0, 0,50. ; ; On /ROBLE/tgcm15r/peqsm41.nc: F107 = 150. F107A = 150. POWER = 16. CTPOTEN = 45. ; ;GPI_NCFILE = '/TGCM/data/gpi_1979001-2002365.nc' ; ; For Heelis, need -11