Changeset 965 for trunk/LMDZ.GENERIC/libf/phystd/iniwrite_specVI.F

Timestamp:

May 22, 2013, 9:10:28 AM (12 years ago)

Author:

emillour

Message:

Common dynamics and generic/universal GCM:

• LMDZ.COMMON: minor bug fix on the computation of physics mesh area in gcm.F
• LMDZ.UNIVERSAL: missing clean initialization of tab_cntrl(:) array in phyredem.F90
• LMDZ.GENERIC: minor bug fix in hydrol.F90, only output runoff if it is used. Update output routines so that all outputs files (stats, diagfi.nc, diagsoil.nc, diagspecIR.nc and diagspecVI.nc) can be generated when running LMDZ.UNIVERSAL in MPI mode.

EM

File:

• trunk/LMDZ.GENERIC/libf/phystd/iniwrite_specVI.F (modified) (2 diffs)

trunk/LMDZ.GENERIC/libf/phystd/iniwrite_specVI.F

@@ -1 @@
-      SUBROUTINE iniwrite_specVI(nid,idayref,phis)
+      SUBROUTINE iniwrite_specVI(nid,idayref)
 
       use radinc_h, only: L_NSPECTV
@@ -42 +42 @@
       integer nid        ! NetCDF file ID
       INTEGER*4 idayref  ! date (initial date for this run)
-      REAL phis(ip1jmp1) ! surface geopotential
 
 c   Local: