Changeset 1447 for LMDZ5/branches/LMDZ5V1.0-dev/libf/phylmd/physiq.F

Timestamp:

Oct 22, 2010, 6:18:27 PM (14 years ago)

Author:

jghattas

Message:

• Added variables written to file phystokenc.nc by option offline.
• initphysto and phystokenc rewritten in F90
• ener.h modified to be compatible with F77 and F90 syntax

File:

• LMDZ5/branches/LMDZ5V1.0-dev/libf/phylmd/physiq.F (modified) (1 diff)

LMDZ5/branches/LMDZ5V1.0-dev/libf/phylmd/physiq.F

@@ -3376 +3376 @@
      I                   cdragh,coefh,u1,v1,ftsol,pctsrf,
      I                   frac_impa, frac_nucl,
-     I                   pphis,airephy,dtime,itap)
+     I                   pphis,airephy,dtime,itap,
+     I                   rlon,rlat,qx(:,:,ivap),da,phi,mp,upwd,dnwd)