C Cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc C C Input for ti(e)gcm video code: C C JDAY1 = julian day corresponding to model day 1 C INTERP = number of frames to interpolate between each DDHHMM C (e.g., if delta DDHHMM = 1 hour and INTERP=2, then C 20 minute frames will be made) C (e.g., if delta DDHHMM = 1 hour and INTERP=3, then C 15 minute frames will be made) C NFBETSEG = number of frames between segments (i.e., between C fields) C NFBEGEND = number of times to repeat first and last frame C of a field segment C PROJ = integer for each field (each PLTIGCM=1) C if PROJ(ip)=1 -> make cylindrical equidistant projection C if PROJ(ip)=2 -> make satellite view projection C C March, 1979 (day 1 = 79079); C C Hist Field Zp min max cint C 1.0-11.0 tn(ce) -4 320.3(7:2) 648.1(11:0) C 1.0-11.0 tn(ce) +2 941.1(2:11) 2524.(3:16) C 1.0-11.0 ne(sv) -4 .7319e4 .6173e6 C 1.0-11.0 o1(sv) -4 .3383e11 .1140e12 C 1.0-11.0 rho(ce) 300 .1434e-13 .5538e-13 C Cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc C HISTVOL = '/ROBLE/RGR91/AFSY01 ','/ROBLE/RGR91/AFSY02 ', '/ROBLE/RGR91/AFSY03 ','/ROBLE/RGR91/AFSY04 ', '/ROBLE/RGR91/AFSY05 ','/ROBLE/RGR91/AFSY06 ', '/ROBLE/RGR91/AFSY07 ','/ROBLE/RGR91/AFSY08 ', '/ROBLE/RGR91/AFSY09 ','/ROBLE/RGR91/AFSY10 ', '/ROBLE/RGR91/AFSY11 ','/ROBLE/RGR91/AFSY12 ', '/ROBLE/RGR91/AFSY13 ','/ROBLE/RGR91/AFSY14 ', '/ROBLE/RGR91/AFSY15 ','/ROBLE/RGR91/AFSY16 ', '/ROBLE/RGR91/AFSY17 ','/ROBLE/RGR91/AFSY18 ', '/ROBLE/RGR91/AFSY19 ' DDHHMM = 1, 0,0, 1, 1,0, 1, 2,0, 1, 3,0, 1, 4,0, 1, 5,0, 1, 6,0, 1, 7,0, 1, 8,0, 1, 9,0, 1,10,0, 1,11,0, 1,12,0, 1,13,0, 1,14,0, 1,15,0, 1,16,0, 1,17,0, 1,18,0, 1,19,0, 1,20,0, 1,21,0, 1,22,0, 1,23,0, 2, 0,0, 2, 1,0, 2, 2,0, 2, 3,0, 2, 4,0, 2, 5,0, 2, 6,0, 2, 7,0, 2, 8,0, 2, 9,0, 2,10,0, 2,11,0, 2,12,0, 2,13,0, 2,14,0, 2,15,0, 2,16,0, 2,17,0, 2,18,0, 2,19,0, 2,20,0, 2,21,0, 2,22,0, 2,23,0, 3, 0,0, 3, 1,0, 3, 2,0, 3, 3,0, 3, 4,0, 3, 5,0, 3, 6,0, 3, 7,0, 3, 8,0, 3, 9,0, 3,10,0, 3,11,0, 3,12,0, 3,13,0, 3,14,0, 3,15,0, 3,16,0, 3,17,0, 3,18,0, 3,19,0, 3,20,0, 3,21,0, 3,22,0, 3,23,0, 4, 0,0, 4, 1,0, 4, 2,0, 4, 3,0, 4, 4,0, 4, 5,0, 4, 6,0, 4, 7,0, 4, 8,0, 4, 9,0, 4,10,0, 4,11,0, 4,12,0, 4,13,0, 4,14,0, 4,15,0, 4,16,0, 4,17,0, 4,18,0, 4,19,0, 4,20,0, 4,21,0, 4,22,0, 4,23,0, 5, 0,0, 5, 1,0, 5, 2,0, 5, 3,0, 5, 4,0, 5, 5,0, 5, 6,0, 5, 7,0, 5, 8,0, 5, 9,0, 5,10,0, 5,11,0, 5,12,0, 5,13,0, 5,14,0, 5,15,0, 5,16,0, 5,17,0, 5,18,0, 5,19,0, 5,20,0, 5,21,0, 5,22,0, 5,23,0, 6, 0,0, 6, 1,0, 6, 2,0, 6, 3,0, 6, 4,0, 6, 5,0, 6, 6,0, 6, 7,0, 6, 8,0, 6, 9,0, 6,10,0, 6,11,0, 6,12,0, 6,13,0, 6,14,0, 6,15,0, 6,16,0, 6,17,0, 6,18,0, 6,19,0, 6,20,0, 6,21,0, 6,22,0, 6,23,0, 7, 0,0, 7, 1,0, 7, 2,0, 7, 3,0, 7, 4,0, 7, 5,0, 7, 6,0, 7, 7,0, 7, 8,0, 7, 9,0, 7,10,0, 7,11,0, 7,12,0, 7,13,0, 7,14,0, 7,15,0, 7,16,0, 7,17,0, 7,18,0, 7,19,0, 7,20,0, 7,21,0, 7,22,0, 7,23,0, 8, 0,0, 8, 1,0, 8, 2,0, 8, 3,0, 8, 4,0, 8, 5,0, 8, 6,0, 8, 7,0, 8, 8,0, 8, 9,0, 8,10,0, 8,11,0, 8,12,0, 8,13,0, 8,14,0, 8,15,0, 8,16,0, 8,17,0, 8,18,0, 8,19,0, 8,20,0, 8,21,0, 8,22,0, 8,23,0, 9, 0,0, 9, 1,0, 9, 2,0, 9, 3,0, 9, 4,0, 9, 5,0, 9, 6,0, 9, 7,0, 9, 8,0, 9, 9,0, 9,10,0, 9,11,0, 9,12,0, 9,13,0, 9,14,0, 9,15,0, 9,16,0, 9,17,0, 9,18,0, 9,19,0, 9,20,0, 9,21,0, 9,22,0, 9,23,0, 10, 0,0,10, 1,0,10, 2,0,10, 3,0,10, 4,0,10, 5,0,10, 6,0, 10, 7,0,10, 8,0,10, 9,0,10,10,0,10,11,0,10,12,0,10,13,0, 10,14,0,10,15,0,10,16,0,10,17,0,10,18,0,10,19,0,10,20,0, 10,21,0,10,22,0,10,23,0,11,0,0 C IDEN = 1 -> CM-3 C IDEN = 2 -> GM/CM-3 IDEN = 1 MKFRAMES = 0 JDAY1 = 79079 INTERP = 0 C C nfbetseg = number of blank frames between segments C (used only if plotting more than one field in a job step) NFBETSEG = 60 C C nfbegend = number of freeze frames at beginning and end of each segment C (freeze first and last frames of each segment) NFBEGEND = 50 TITLES = 0,0,0 C C PROJ = 1 -> CE; PROJ=2 -> SV PROJ = 1 C C Cell arrays (makes big cgm's) CELLA = 0 ERADII = 4. CENSATV = 70.,999. COLOR = 1 C C fixcolor = hardwire color table (see fixrgb) FIXCOLOR = 12 INFO = 1 KPBAR = 0 KPGRAPH = 1 CLEVEL = 300. LEVEL = -4. SLT = 12. C C T U V O2 O N4S NO O+ N2D TI TE NE O2+ W Z PLTIGCM =0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, C POT N2 FOF2 RHO 0, 0, 1, 0 C C T U V O2 O N4S NO O+ N2D TI TE NE O2+ W Z CINT = 75.,0., 0., 0.,6.5E9,0.,6.5E6,0., 0.,0.,0.,30000. ,0.,0., 0., C POT N2 FOF2 RHO 0., 0.,0.,3.E-15 C C T U V O2 O N4S NO O+ N2D TI TE NE O2+ W Z CMIN = 1050., 1., 1., 1.,4.E10,1.,5.E6, 1., 1., 1.,1., 0.,1., 1.,1., C POT N2 FOF2 RHO 1., 1.,1.,20.E-15 C C T U V O2 O N4S NO O+ N2D TI TE NE O2+ W Z CMAX = 1800.,0., 0., 0.,10.5E10,0.,70.E6,0.,0.,0.,0.,300000.,0.,0.,0., C POT N2 FOF2 RHO 0., 0.,0.,50.E-15 ENDOFREAD 6 8. 1.2 THERMOSPHERE IONOSPHERE ELECTRODYNAMICS GENERAL CIRCULATION MODEL RESULTS FOR THE 10-DAY PERIOD MARCH 20 TO MARCH 29, 1979 0 9 10. 1.2 TIEGCM NEUTRAL TEMPERATURE (DEG K) PRESSURE LEVEL = -4 (APPROX 120 KM) MIN,MAX = 320,648 CONTOUR INTERVAL = 20 DEG CYLINDRICAL EQUIDISTANT PROJECTION LOCAL NOON AT CENTER OF X-AXIS 0 11 10. 1.2 TIEGCM MODEL DEVELOPMENT: RAY ROBLE (NCAR/HAO) CICELEY RIDLEY (NCAR/HAO) BOB DICKINSON (UNIV OF ARIZ) POST MODEL PROCESSING AND VISUALIZATION: BEN FOSTER (NCAR/HAO) 0 9 7. 1.2 PRODUCED BY THE NATIONAL CENTER FOR ATMOSPHERIC RESEARCH BOULDER, COLORADO 80307 UNDER SPONSORSHIP OF THE NATIONAL SCIENCE FOUNDATION JUNE 1992 0 ------------------------------------------------------------------- 7 3. 1.2 TIEGCM TOTAL DENSITY (O+O2+N2) (GM/CM-3) AT 300 KM MIN,MAX = CYLINDRICAL EQUIDISTANT PROJECTION LOCAL NOON AT CENTER OF X-AXIS