Changeset 2121 for LMDZ5/trunk/libf/dyn3d_common

Timestamp:

Sep 16, 2014, 2:01:11 PM (10 years ago)

Author:

lguez

Message:

The size of the dummy argument w cannot exceed the size of the correponding actual argument wg in advtrac.

File:

• LMDZ5/trunk/libf/dyn3d_common/interpre.F (modified) (1 diff)

LMDZ5/trunk/libf/dyn3d_common/interpre.F

@@ -29 +29 @@
       real   masse(iip1,jjp1,llm) 
       real   massebx(iip1,jjp1,llm),masseby(iip1,jjm,llm)      
-      real   w(iip1,jjp1,llm+1)
+      real   w(iip1,jjp1,llm)
       real   fluxwppm(iim,jjp1,llm)
       real   pbaru(iip1,jjp1,llm )