Changeset 3468 for trunk/LMDZ.MARS/libf/phymars/conf_phys.F

Timestamp:

Oct 24, 2024, 9:18:07 AM (4 weeks ago)

Author:

emillour

Message:

Mars PCM:
Remove obsolete/depreciated lwrite flag (which would trigger some very specific
extra text outputs), in code and in reference callphys.def files.
EM

File:

• trunk/LMDZ.MARS/libf/phymars/conf_phys.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/conf_phys.F

@@ -130 +130 @@
          call getin_p("season",season)
          write(*,*) " season = ",season
-
-         write(*,*) "Write some extra output to the screen ?"
-         lwrite=.false. ! default value
-         call getin_p("lwrite",lwrite)
-         write(*,*) " lwrite = ",lwrite
 
          write(*,*) "Save statistics in file stats.nc ?"