Changeset 4058 for trunk/LMDZ.MARS/libf/phymars/simpleclouds_mod.F

Timestamp:

Feb 10, 2026, 9:46:10 AM (6 days ago)

Author:

emillour

Message:

Mars PCM:
Add a "output_diagfi" (default .true.) flag so that the user can decide if
a diagfi.nc file should be outputted.
Also do some cleaning around the few remaining calls to writediagfi
or reference to it througout the code; write_output() should be used.
EM

File:

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

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

@@ -222 +222 @@
       end do
 
-c     if (hdo) then
-c           CALL WRITEDIAGFI(ngrid,'alpha_c',
-c    &                       'alpha_c',
-c    &                       ' ',3,alpha_c) 
-c     endif !hdo
 c------------------------------------------------------------------
       end subroutine simpleclouds