Changeset 1424 for LMDZ4/trunk/libf/phylmd/phys_local_var_mod.F90

Timestamp:

Sep 1, 2010, 11:20:28 AM (14 years ago)

Author:

jghattas

Message:

• Modified name of tracers in history files to their real name(from tracer.def) ; for exemple RN instead of trac01
• Corrected allocation of d_ts.

File:

• LMDZ4/trunk/libf/phylmd/phys_local_var_mod.F90 (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/phys_local_var_mod.F90

@@ -195 +195 @@
       allocate(d_t_lif(klon,klev),d_t_ec(klon,klev))
       allocate(d_u_lif(klon,klev),d_v_lif(klon,klev))
-      allocate(d_ts(klon,klev), d_tr(klon,klev,nbtr))
+      allocate(d_ts(klon,nbsrf), d_tr(klon,klev,nbtr))
       allocate(topswad_aero(klon), solswad_aero(klon))
       allocate(topswai_aero(klon), solswai_aero(klon))