Changeset 2421 for LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90

Timestamp:

Jan 6, 2016, 9:38:55 AM (8 years ago)

Author:

Ehouarn Millour

Message:

Stop sending pducov from dynamics to physics; it is not used in the physics anymore (and what was done was only valid when runnning in serial).
EM

File:

• LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90

@@ -243 +243 @@
       integer :: k,l,i,it=1,mxcalc
       integer jcode
-      integer jjmp1
-      parameter (jjmp1=jjm+1-1/jjm)
-      REAL dudyn(iim+1,jjmp1,llm)
       INTEGER read_climoz 
 !Al1
@@ -940 +937 @@
             plev,play,phi,phis,presnivs, &
             u,v, rot, temp,q,omega2, &
-            du_phys,dv_phys,dt_phys,dq,dpsrf, &
-            dudyn)
+            du_phys,dv_phys,dt_phys,dq,dpsrf)
         firstcall=.false.