Changeset 1576 for trunk/LMDZ.MARS/libf/dynphy_lonlat/calfis.F

Timestamp:

Jul 27, 2016, 11:14:41 AM (8 years ago)

Author:

emillour

Message:

All models:
Clean up the dynamics/physics interface to converge with LMDZ5;
get rid of tracerdyn parameter (which was supposed to send information
about wether tracers should be advected or not in the Mars and Generic
models).
EM

File:

• trunk/LMDZ.MARS/libf/dynphy_lonlat/calfis.F (modified) (4 diffs)

trunk/LMDZ.MARS/libf/dynphy_lonlat/calfis.F

@@ -2 +2 @@
      $            pucov,pvcov,pteta,pq,pmasse,pps,pp,ppk,pphis,pphi,
      $            pducov,pdvcov,pdteta,pdq,pw,
-     $            pdufi,pdvfi,pdhfi,pdqfi,pdpsfi,tracer )
+     $            pdufi,pdvfi,pdhfi,pdqfi,pdpsfi )
 c
 c    Auteur :  P. Le Van, F. Hourdin 
@@ -56 +56 @@
 c        pdtsfi         tendency for the surface temperature
 c
-c        tracer         Call tracer in  gcm.F ? (decided in callphys.def)
-c
 c=======================================================================
 c
@@ -103 +101 @@
       REAL pdqfi(iip1,jjp1,llm,nq)
       REAL pdpsfi(iip1,jjp1)
-      logical tracer
 
 c    Local variables :
@@ -437 +434 @@
      ,     flxwfi,
 C - sorties
-     s     zdufi, zdvfi, zdtfi, zdqfi,zdpsrf,tracer)
+     s     zdufi, zdvfi, zdtfi, zdqfi,zdpsrf)