Changeset 1421 for LMDZ4/trunk/libf/phylmd/phys_output_mod.F90

Timestamp:

Jul 28, 2010, 3:28:42 PM (14 years ago)

Author:

jghattas

Message:

• Fixed problems with pseudo-vapor tracers.
• Removed variable nseuil. The transport with convection can be desactivated with the variable conv_flg instead of nseuil.

File:

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

LMDZ4/trunk/libf/phylmd/phys_output_mod.F90

@@ -1232 +1232 @@
        o_trac(nq)    =  ctrl_out((/ 4, 5, 1, 1, 1 /),'trac'//TRIM(solsym(nq)))
       ENDIF
-     WRITE(*,*) 'nq, o_trac(nq)=',nq, o_trac(nq)
     ENDDO
 !