C
C***********************************************************************
C***    Input for TGCM12  (TIEGCM with DYNAMO)                       *** 
C***********************************************************************
C
 LABEL='TIEGCM with DYNAMO (TGCM12)                        '
C
 DATE=1995,80
 MAGVOL='ECRIDLEY','ECR90','ECRMG6'
CSOURCE='GANGLU','TIEJ97','J97DM4',9,0,0
COUTPUT='FOSTER','t12h0-4','prim01','FOSTER','t12h0-4','prim02',
C       'FOSTER','t12h0-4','prim03','FOSTER','t12h0-4','prim04',
C       'FOSTER','t12h0-4','prim05'
COUTPUT='FOSTER','t12h0-2','prim01','FOSTER','t12h0-2','prim02',
C       'FOSTER','t12h0-2','prim03','FOSTER','t12h0-2','prim04',
C       'FOSTER','t12h0-2','prim05'
COUTPUT='FOSTER','norstrt','prim01','FOSTER','norstrt','prim02',
C       'FOSTER','norstrt','prim03','FOSTER','norstrt','prim04'
 OUTPUT='FOSTER','rstrt','prim01','FOSTER','rstrt','prim02',
        'FOSTER','rstrt','prim03','FOSTER','rstrt','prim04'
 START= 0,6,0
 STOP= 1,0,0
 HIST=0,1,0
 SAVE=0,6,0
 INCORE = 1
 STEP= 300
 DISPOSE=1
CDISPOSE=0
 MAG=-74.5,127.,79.,-70.
CDIFHOR=0
 DIFHOR=1
 IUIVI=1
CTIDE=0.,0.,0.,0.,0.0,0.0,0.0,0.0,0.0,0.0
C JANUARY  TIDES FORBES(NEW)
 TIDE=2.8E+4,0.7E+4,1.0E+4,1.5E+4,0.6E+4,10.4,1.2,7.8,9.0,8.3
 TIDE2=0.0,0.0
 TIDEANN=0
 AURORA=1
 COLFAC=1.3
 ENDOFREAD
 F107=75.
 F107A=75.
CAMIVOL='EMERY','PVIEN','S86F3B'
 OLDALF=1
 POWER=9.
 CTPOTEN=30.
 BYIMF=0.
 ENDOFREAD