Changeset 1921 for LMDZ5/branches/testing/libf/phylmd/undefSTD.F

Timestamp:

Dec 20, 2013, 10:04:40 AM (11 years ago)

Author:

Laurent Fairhead

Message:

Merged trunk changes r1909:1920 into testing branch

Location:

LMDZ5/branches/testing

Files:

• . (modified) (1 prop)
• libf/phylmd/undefSTD.F (modified) (2 diffs)

LMDZ5/branches/testing/libf/phylmd/undefSTD.F

@@ -2 +2 @@
 ! $Id$
 !
-      SUBROUTINE undefSTD(itap,freq_calNMC, read_climoz)
+      SUBROUTINE undefSTD(itap, read_climoz)
       USE netcdf
       USE dimphy
       USE phys_state_var_mod ! Variables sauvegardees de la physique
       IMPLICIT none
+      include "clesphys.h"
 c
 c====================================================================
@@ -42 +43 @@
 c     PARAMETER(nout=3) !nout=1 : day; =2 : mth; =3 : NMC
       INTEGER i, k, n
-      REAL freq_calNMC(nout)
+c     REAL freq_calNMC(nout)
       INTEGER read_climoz
 c