Changeset 5134 for LMDZ6/branches/Amaury_dev/libf/dyn3d/check_isotopes.F90

Timestamp:

Jul 26, 2024, 5:56:37 PM (4 months ago)

Author:

abarral

Message:

Replace academic.h, alpale.h, comdissip.h, comdissipn.h, comdissnew.h by modules
Remove unused clesph0.h

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3d/check_isotopes.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/dyn3d/check_isotopes.F90

@@ -5 +5 @@
 
    IMPLICIT NONE
-   include "dimensions.h"
+   INCLUDE "dimensions.h"
    REAL,             INTENT(INOUT) :: q(ip1jmp1,llm,nqtot)
    INTEGER,          INTENT(IN)    :: ip1jmp1