Changeset 154 for trunk/MESOSCALE/LMD_MM_MARS

Timestamp:

Jun 8, 2011, 6:21:10 PM (13 years ago)

Author:

aslmd

Message:

MESOSCALE: changements mineurs (print qui empechait de compiler avec ancienne physique)

File:

• trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F (modified) (1 diff)

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F

@@ -1122 +1122 @@
             !!! -- HFX apparaissait nul aux interfaces des tuiles
             if ( output_tab2d(subs,ind_HFX) .le. 1.e-8 ) then
-               print *, 'HFX is zero !!! ', i, j
+               !print *, 'HFX is zero !!! ', i, j
                !print *, 'I substituted the value right next to it ', output_tab2d(subs+1,ind_HFX) 
                output_tab2d(subs,ind_HFX) = output_tab2d(subs+1,ind_HFX)