Changeset 1320 for LMDZ4/branches/LMDZ4V5.0-dev/libf/dyn3d/gcm.F

Timestamp:

Feb 25, 2010, 3:50:51 PM (14 years ago)

Author:

idelkadi

Message:

Decoupage du pas de temps physique en N sous-pas (splitting)

File:

• LMDZ4/branches/LMDZ4V5.0-dev/libf/dyn3d/gcm.F (modified) (1 diff)

LMDZ4/branches/LMDZ4V5.0-dev/libf/dyn3d/gcm.F

@@ -406 +406 @@
          if (planet_type.eq."earth") then
 #ifdef CPP_EARTH
-         CALL iniphysiq(ngridmx,llm,daysec,day_ini,dtphys ,
+         CALL iniphysiq(ngridmx,llm,daysec,day_ini,dtphys/nsplit_phys ,
      ,                latfi,lonfi,airefi,zcufi,zcvfi,rad,g,r,cpp     )
 #endif