C LABEL='tgcm13mt multi-tasked tiegcm ' DATE=1991,75 CDATE=1991,80 MAGVOL='ECRIDLEY','ECR90','ECRMG6' CSOURCE = 'ROBLE','TGCM13MT','PEQSM01',4,0,0 COUTPUT='FOSTER','TGCM13MT','PEQSM01','FOSTER','TGCM13MT','PEQSM02' SOURCE = 'ROBLE','TGCM13MT','PEQSE01',75,0,0 OUTPUT = 'FOSTER','T13MT','PEQSE01' COUTPUT = 'FOSTER','T13MT','PEQSkib' COUTPUT = 'FOSTER','T13MT','PEQSE01','FOSTER','T13MT','PEQSE02', C 'FOSTER','T13MT','PEQSE03','FOSTER','T13MT','PEQSE04', C 'FOSTER','T13MT','PEQSE05','FOSTER','T13MT','PEQSE06', C 'FOSTER','T13MT','PEQSE07','FOSTER','T13MT','PEQSE08', C 'FOSTER','T13MT','PEQSE09','FOSTER','T13MT','PEQSE10' COUTPUT='FOSTER','snoe13mt','PEQSE10' C START= 75,0,0 STOP= 75,6,0 HIST= 0,1,0 SAVE= 0,6,0 C CSTART= 4,0,0 CSTOP= 5,0,0 CHIST= 0,1,0 CSAVE= 0,12,0 C CSECSTART = 75,0,0 CSECSTOP = 75,6,0 CSECHIST = 0,0,3 CSECSAVE = 0,2,0 CSECFLDS = 'S15','NEa','TE-S1','TE-S2','TE-S3','TE-S4','NJ-TE', C 'NJNP-TE','QJOULE' CSECOUT = 'FOSTER','T13MT','SEQSE01','FOSTER','T13MT','SEQSE02', C 'FOSTER','T13MT','SEQSE03','FOSTER','T13MT','SEQSE04', C 'FOSTER','T13MT','SEQSE05','FOSTER','T13MT','SEQSE06', C 'FOSTER','T13MT','SEQSE07','FOSTER','T13MT','SEQSE08', C 'FOSTER','T13MT','SEQSE09','FOSTER','T13MT','SEQSE10' C CSECFLDS = 'TN','TE','OP','TE-S2a','TE-S10','TE-S11','TE-S1', C 'TE-S2','TE-S3','TE-S4' CSECFLDS = 'TN' ,'TE' ,'OP' ,'TE-T1' ,'TE-T2' ,'TE-T3' , C 'TE-T4' ,'TE-T5' ,'RLATM','DIPMAG','QTEAUR','TE-S2a', C 'TE-S10' ,'TE-S11','TE-S1','TE-S2' ,'TE-S3' ,'TE-S4', C 'TE-UI' ,'TE-VI' CSECFLDS = 'TE' ,'TE-T5' ,'RLATM','DIPMAG','QTEAUR','TE-S2a', C 'TE-S10' ,'TE-S11','TE-S1','TE-S2' ,'TE-S3' ,'TE-S4' CSECOUT = 'FOSTER','snoe13m','seqse10','FOSTER','snoe13m','seqse11' C STEP= 180 INCORE = 1 DISPOSE=1 MAG=-74.5,127.,79.,-70. DIFHOR=0 IUIVI=1 CTIDE=2.3E+4,0.8E+4,0.7E+4,1.1E+4,0.6E+4,10.2,10.5,3.8,3.2,8.1 CTIDE2=2.0E+4,18.0 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 = 0.5E+4,18.0 TIDEANN=0 AURORA=1 COLFAC=1.5 ENDOFREAD CF107=110. CF107A=170. F107=130. F107A=130. OLDALF=1 CPOWER=25. CCTPOTEN=60. POWER=16. CTPOTEN=45. BYIMF=0. ENDOFREAD