Changeset 5766

Timestamp:

Jul 10, 2025, 11:54:12 AM (7 days ago)

Author:

rkazeroni

Message:

For GPU porting of convection:

• Add "horizontal" comment to specify possible names of horizontal variables
• Change data statement initialization (not supported on GPU) to a parameter

Location:

LMDZ6/trunk/libf/phylmd

Files:

• cv3_buoy.f90 (modified) (1 diff)
• cva_driver.f90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/cv3_buoy.f90

@@ -45 +45 @@
   PARAMETER (buoymin=2.)
 
-  LOGICAL fixed_bll
-  SAVE fixed_bll
-  DATA fixed_bll/.TRUE./
-  !$OMP THREADPRIVATE(fixed_bll)
-
+  LOGICAL, PARAMETER :: fixed_bll = .TRUE.
 
   ! print *,' Ale+cin ',ale(1)+cin(1)

LMDZ6/trunk/libf/phylmd/cva_driver.f90

@@ -1 +1 @@
 
 ! $Id$
-
+!$gpum horizontal len nloc ncum klon
 MODULE cva_driver_mod
   PRIVATE