Changeset 1717 for LMDZ4/branches/LMDZ4_AR5/libf/dyn3d
- Timestamp:
- Jan 25, 2013, 9:26:03 AM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4_AR5/libf/dyn3d/leapfrog.F
r1286 r1717 72 72 73 73 real zqmin,zqmax 74 INTEGER nbetatmoy, nbetatdem,nbetat74 ! INTEGER nbetatmoy, nbetatdem,nbetat 75 75 76 76 c variables dynamiques … … 575 575 c IF( MOD(itau,iecri*day_step).EQ.0) THEN 576 576 577 nbetat = nbetatdem577 ! nbetat = nbetatdem 578 578 CALL geopot(ip1jmp1,teta,pk,pks,phis,phi) 579 579 unat=0. … … 682 682 IF(MOD(itau,iecri ).EQ.0) THEN 683 683 c IF(MOD(itau,iecri*day_step).EQ.0) THEN 684 nbetat = nbetatdem684 ! nbetat = nbetatdem 685 685 CALL geopot(ip1jmp1,teta,pk,pks,phis,phi) 686 686 unat=0.
Note: See TracChangeset
for help on using the changeset viewer.