Changeset 2544 for trunk/LMDZ.COMMON/libf/dyn3d
- Timestamp:
- Jul 8, 2021, 3:54:30 PM (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.COMMON/libf/dyn3d/leapfrog.F
r2507 r2544 909 909 if(ecritstart.GT.0) then 910 910 CALL dynredem1("restart.nc", 911 & REAL(itau)/REAL(day_step), 911 & REAL(itau)/REAL(day_step)+ 912 & time_0-floor(time_0), 912 913 & vcov,ucov,teta,q,masse,ps) 913 914 else 914 915 CALL dynredem1("restart.nc", 915 & REAL(itau)/REAL(day_step)-(day_end-day_ini), 916 & REAL(itau)/REAL(day_step)-(day_end-day_ini) 917 & +time_0-floor(time_0), 916 918 & vcov,ucov,teta,q,masse,ps) 917 919 endif
Note: See TracChangeset
for help on using the changeset viewer.