Changeset 5390 for LMDZ6/trunk/libf/phylmd/lmdz_thermcell_main.F90

Timestamp:

Dec 5, 2024, 5:09:25 PM (8 days ago)

Author:

yann meurdesoif

Message:

• Remove UTF8 character that inihibit fortran parsing with GPU morphosis
• Add missing END SUBROUTINE instead of simple END, that inhibit correct parsing with regulat expression parser (quick and dirty parsing)

YM

File:

• LMDZ6/trunk/libf/phylmd/lmdz_thermcell_main.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/lmdz_thermcell_main.F90

@@ -862 +862 @@
 
       return
-      end
+    end subroutine test_ltherm
 
 ! nrlmd le 10/04/2012   Transport de la TKE par le thermique moyen pour la fermeture en ALP 
@@ -987 +987 @@
       return
 !!! fin nrlmd le 10/04/2012
-     end
+    end subroutine thermcell_tke_transport
 
 END MODULE lmdz_thermcell_main