Changeset 232 for LMDZ.3.3/branches/rel-LF/libf/dyn3d/physdem.F

Timestamp:

Jun 20, 2001, 3:53:15 PM (23 years ago)

Author:

lmdzadmin

Message:

Merge par rapport a la branche principale
LF

File:

• LMDZ.3.3/branches/rel-LF/libf/dyn3d/physdem.F (modified) (6 diffs)

LMDZ.3.3/branches/rel-LF/libf/dyn3d/physdem.F

@@ -527 +527 @@
       ierr = NF_PUT_VAR_REAL (nid,nvarid,zstd)
 #endif
-c
       ierr = NF_REDEF (nid)
 #ifdef NC_DOUBLE
@@ -540 +539 @@
       ierr = NF_PUT_VAR_REAL (nid,nvarid,zsig)
 #endif
-c
       ierr = NF_REDEF (nid)
 #ifdef NC_DOUBLE
@@ -553 +551 @@
       ierr = NF_PUT_VAR_REAL (nid,nvarid,zgam)
 #endif
-c
       ierr = NF_REDEF (nid)
 #ifdef NC_DOUBLE
@@ -566 +563 @@
       ierr = NF_PUT_VAR_REAL (nid,nvarid,zthe)
 #endif
-c
       ierr = NF_REDEF (nid)
 #ifdef NC_DOUBLE
@@ -579 +575 @@
       ierr = NF_PUT_VAR_REAL (nid,nvarid,zpic)
 #endif
-c
       ierr = NF_REDEF (nid)
 #ifdef NC_DOUBLE
@@ -592 +587 @@
       ierr = NF_PUT_VAR_REAL (nid,nvarid,zval)
 #endif
-c
       ierr = NF_REDEF (nid)
 #ifdef NC_DOUBLE