Changeset 5818 for LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

Timestamp:

Sep 17, 2025, 1:12:39 PM (2 months ago)

Author:

rkazeroni

Message:

For GPU porting of transp routine:

• Put routine into module (speeds up source-to-source transformation)
• Add "horizontal" comment to specify possible names of horizontal variables

File:

• LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

@@ -76 +76 @@
     USE time_phylmdz_mod, only: current_time, itau_phy, pdtphys, raz_date, update_time
     USE tracinca_mod, ONLY: config_inca
+    USE transp_mod, ONLY: transp
     USE tropopause_m,     ONLY: dyn_tropopause
     USE vampir
@@ -933 +934 @@
     EXTERNAL phyredem  ! ecrire l'etat de redemarrage de la physique
     EXTERNAL suphel    ! initialiser certaines constantes
-    EXTERNAL transp    ! transport total de l'eau et de l'energie
+    ! EXTERNAL transp    ! transport total de l'eau et de l'energie
     !IM
     EXTERNAL haut2bas  !variables de haut en bas