Changeset 1778 for trunk

Timestamp:

Aug 27, 2017, 9:56:06 AM (7 years ago)

Author:

aslmd

Message:

MESOSCALE typo in previous commit

File:

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

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

@@ -347 +347 @@
 !------------------------------------!
 print *,'** ',planet_type,' ** DOMAIN',id
-IF (previousid .ne. id) THEN
+IF (previous_id .ne. id) THEN
     print *, '** ',planet_type,' ** ... INITIALIZE DOMAIN',id
-    print *, '** ',planet_type,' ** ... PREVIOUS DOMAIN was',previousid
+    print *, '** ',planet_type,' ** ... PREVIOUS DOMAIN was',previous_id
     print *, 'ITIMESTEP: ',itimestep
     print *, 'TILES: ', i_start,i_end, j_start, j_end  ! numbers for simple runs, arrays for parallel runs