Changeset 5159 for LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/condsurfs.f90

Timestamp:

Aug 2, 2024, 9:58:25 PM (3 months ago)

Author:

abarral

Message:

Put dimensions.h and paramet.h into modules

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/condsurfs.f90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/condsurfs.f90

@@ -6 +6 @@
   USE netcdf, ONLY: nf90_close, nf90_noerr, nf90_inq_varid, nf90_open, &
           nf90_nowrite, nf90_get_var
+  USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm
   IMPLICIT NONE
 
@@ -11 +12 @@
   ! --------------------------------------------------------
 
-  INCLUDE "dimensions.h"
+
 
   REAL :: lmt_so2h(klon), lmt_so2b(klon), lmt_so2bb(klon)