Changeset 5282 for LMDZ6/trunk/libf/dyn3d_common/inithist.f90

Timestamp:

Oct 28, 2024, 1:11:48 PM (6 hours ago)

Author:

abarral

Message:

Turn iniprint.h clesphys.h into modules
Remove unused description.h

File:

• LMDZ6/trunk/libf/dyn3d_common/inithist.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/dyn3d_common/inithist.f90

@@ -4 +4 @@
 subroutine inithist(day0,anne0,tstep,t_ops,t_wrt)
 
-   USE comgeom_mod_h
+   USE iniprint_mod_h
+  USE comgeom_mod_h
   USE IOIPSL
    USE infotrac, ONLY : nqtot
@@ -44 +45 @@
   !   Declarations
 
-
-  include "description.h"
-  include "iniprint.h"
 
   !   Arguments