Changeset 3232 for trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90

Timestamp:

Feb 21, 2024, 5:45:11 PM (9 months ago)

Author:

afalco

Message:

Pluto PCM:
1D functional
AF

File:

• trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90 (modified) (1 diff)

trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90

@@ -551 +551 @@
              tsoil(1:ngrid,isoil)=tsurf(1:ngrid)
            enddo
-           if (is_master) write(*,*) "Physiq: initializing day_ini to pdat !"
+           if (is_master) write(*,*) "Physiq: initializing day_ini to pday !"
            day_ini=pday
          endif