Changeset 5117 for LMDZ6/branches/Amaury_dev/libf/phylmd/hgardfou.F90

Timestamp:

Jul 24, 2024, 4:23:34 PM (4 months ago)

Author:

abarral

Message:

rename modules properly lmdz_*
move some unused files to obsolete/
(lint) uppercase fortran keywords

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/hgardfou.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/hgardfou.F90

@@ -13 +13 @@
   include "YOMCST.h"
   REAL t(klon, klev), tsol(klon, nbsrf)
-  CHARACTER(len=*), intent(in):: text
+  CHARACTER(len=*), INTENT(IN):: text
   CHARACTER (LEN=20) :: modname = 'hgardfou'
   INTEGER abortphy