| 1 | c
|
|---|
| 2 | c Variables related to time integration
|
|---|
| 3 | c
|
|---|
| 4 | real time,timef,fintim,timeio,timeioe
|
|---|
| 5 | $ ,dt,dtlag(10),dtinit,dtinvm,courno,ctarg
|
|---|
| 6 | $ ,ab(10),bd(10),abmsh(10)
|
|---|
| 7 | $ ,avdiff(ldimt1),avtran(ldimt1),volfld(0:ldimt1)
|
|---|
| 8 | $ ,tolrel,tolabs,tolhdf,tolpdf,tolev,tolnl,prelax
|
|---|
| 9 | $ ,tolps,tolhs,tolhr,tolhv,tolht(ldimt1),tolhe
|
|---|
| 10 | $ ,vnrmh1,vnrmsm,vnrml2,vnrml8,vmean
|
|---|
| 11 | $ ,tnrmh1(ldimt),tnrmsm(ldimt),tnrml2(ldimt)
|
|---|
| 12 | $ ,tnrml8(ldimt),tmean(ldimt)
|
|---|
| 13 | common /tstep1/ time,timef,fintim,timeio,timeioe
|
|---|
| 14 | $ ,dt,dtlag,dtinit,dtinvm,courno,ctarg
|
|---|
| 15 | $ ,ab,bd,abmsh
|
|---|
| 16 | $ ,avdiff,avtran,volfld
|
|---|
| 17 | $ ,tolrel,tolabs,tolhdf,tolpdf,tolev,tolnl,prelax
|
|---|
| 18 | $ ,tolps,tolhs,tolhr,tolhv,tolht,tolhe
|
|---|
| 19 | $ ,vnrmh1,vnrmsm,vnrml2,vnrml8,vmean
|
|---|
| 20 | $ ,tnrmh1,tnrmsm,tnrml2
|
|---|
| 21 | $ ,tnrml8,tmean
|
|---|
| 22 |
|
|---|
| 23 | integer ifield,imesh,istep,nsteps,iostep,lastep,iocomm
|
|---|
| 24 | $ ,instep
|
|---|
| 25 | $ ,nab,nabmsh,nbd,nbdinp,ntaubd
|
|---|
| 26 | $ ,nmxt(ldimt),nmxh,nmxv,nmxp,nmxe,nmxnl,ninter
|
|---|
| 27 | $ ,nelfld(0:ldimt1)
|
|---|
| 28 | $ ,nconv,nconv_max
|
|---|
| 29 | $ ,ioinfodmp
|
|---|
| 30 | common /istep2/ ifield,imesh,istep,nsteps,iostep,lastep,iocomm
|
|---|
| 31 | $ ,instep
|
|---|
| 32 | $ ,nab,nabmsh,nbd,nbdinp,ntaubd
|
|---|
| 33 | $ ,nmxt,nmxh,nmxv,nmxp,nmxe,nmxnl,ninter
|
|---|
| 34 | $ ,nelfld
|
|---|
| 35 | $ ,nconv,nconv_max
|
|---|
| 36 | $ ,ioinfodmp
|
|---|
| 37 |
|
|---|
| 38 | real pi
|
|---|
| 39 | common /tstep3/ pi
|
|---|
| 40 |
|
|---|
| 41 | logical ifprnt,if_full_pres,ifoutfld
|
|---|
| 42 | common /tstep4/ ifprnt,if_full_pres,ifoutfld
|
|---|
| 43 |
|
|---|
| 44 |
|
|---|
| 45 | real lyap(3,lpert)
|
|---|
| 46 | common /tstep5/ lyap ! lyapunov simulation history
|
|---|