Changeset 5367 for LMDZ6/trunk/libf/phylmd/Dust

Timestamp:

Dec 3, 2024, 10:40:13 AM (11 days ago)

Author:

abarral

Message:

(WIP) Turn implicit into explicit declarations

Location:

LMDZ6/trunk/libf/phylmd/Dust

Files:

• minmaxqfi2.f90 (modified) (1 diff)
• minmaxsource.f90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/Dust/minmaxqfi2.f90

@@ -6 +6 @@
    ! character*20 comment
   character(len=*) :: comment
-  real :: qmin,qmax
+  real :: qmin,qmax,zqmin,zqmax
   real :: zq(klon,klev)
 

LMDZ6/trunk/libf/phylmd/Dust/minmaxsource.f90

@@ -6 +6 @@
    ! character*20 comment
   character(len=*) :: comment
-  real :: qmin,qmax
+  real :: qmin,qmax,zqmin,zqmax
   real :: zq(klon,nbtr)
 
   integer :: ijmin, lmin, ijlmin
   integer :: ijmax, lmax, ijlmax
-
   integer :: ismin,ismax