Changeset 5134 for LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/condsurfs.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/phylmd/Dust/condsurfs.f90 (modified) (1 diff)

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
-  IMPLICIT none
+  IMPLICIT NONE
 
   ! Lire les conditions aux limites du modele pour la chimie.