Changeset 2422 for LMDZ5/trunk/libf/phydev/physiq_mod.F90

Timestamp:

Jan 6, 2016, 12:37:41 PM (9 years ago)

Author:

Ehouarn Millour

Message:

Small modification in the way time and calendar are handled: Now all the time keeping is done in the physics and only the timestep is transfered from the dynamics to the physics. Due to changes in computations and roundoffs this will change reference bench results.
The implementation of this change in phymar is left as future work.
EM

File:

• LMDZ5/trunk/libf/phydev/physiq_mod.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phydev/physiq_mod.F90

@@ -7 +7 @@
 
       SUBROUTINE physiq (nlon,nlev, &
-     &            debut,lafin,jD_cur, jH_cur,pdtphys, &
+     &            debut,lafin,pdtphys, &
      &            paprs,pplay,pphi,pphis,presnivs, &
      &            u,v,t,qx, &
@@ -35 +35 @@
       integer,intent(in) :: nlon ! number of atmospheric colums
       integer,intent(in) :: nlev ! number of vertical levels (should be =klev)
-      real,intent(in) :: jD_cur ! current day number (Julian day)
-      real,intent(in) :: jH_cur ! current time of day (as fraction of day)
       logical,intent(in) :: debut ! signals first call to physics
       logical,intent(in) :: lafin ! signals last call to physics