Changeset 5106 for LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_wake.F90

Timestamp:

Jul 23, 2024, 10:21:18 PM (4 months ago)

Author:

abarral

Message:

Turn coefils.h into lmdz_coefils.f90
Put filtreg.F90 inside lmdz_filtreg.F90
Turn mod_filtreg_p.F90 into lmdz_filtreg_p.F90
Delete obsolete parafilt.h*
(lint) remove spaces between routine name and args

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_wake.F90 (modified) (3 diffs)

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

@@ -2410 +2410 @@
 
 
-SUBROUTINE pkupper (klon, klev, ptop, ph, p, pupper, kupper, &
+SUBROUTINE pkupper(klon, klev, ptop, ph, p, pupper, kupper, &
                     dth, hw_, rho, delta_t_min_in, &
                     ktop, wk_adv, h_zzz, ptop1, ktop1)
@@ -2969 +2969 @@
     END SUBROUTINE wake_popdyn_1
     
-    SUBROUTINE wake_popdyn_2 ( klon, klev, wk_adv, dtimesub, wgen, &
+    SUBROUTINE wake_popdyn_2( klon, klev, wk_adv, dtimesub, wgen, &
                              wdensmin, &
                              sigmaw, wdens, awdens, &   !! states variables
@@ -3119 +3119 @@
     END SUBROUTINE wake_popdyn_2  
   
-    SUBROUTINE wake_popdyn_3 ( klon, klev, phys_sub, wk_adv, dtimesub, wgen, &
+    SUBROUTINE wake_popdyn_3( klon, klev, phys_sub, wk_adv, dtimesub, wgen, &
                              wdensmin, &
                              sigmaw, asigmaw, wdens, awdens, &                       !! state variables