Changeset 5093 for LMDZ6/branches/Amaury_dev/libf/dyn3dmem/guide_loc_mod.F90

Timestamp:

Jul 21, 2024, 1:07:18 PM (2 months ago)

Author:

abarral

Message:

Use latest FCM source (2021.05.0) [Note: we still use the legacy FCM1 build system]
Correct UTF8 encoding of french chars

---

Compil OK (tested: oldrad/rrtm/ecrad, para/seq/1D)
Convergence (ref r5063) bench 33x OK oldrad orch2.0 (tested: para/seq)

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3dmem/guide_loc_mod.F90 (modified) (3 diffs)

LMDZ6/branches/Amaury_dev/libf/dyn3dmem/guide_loc_mod.F90

@@ -100 +100 @@
     CALL getpar('guide_teta',.false.,guide_teta,'guidage de T par Teta')
 
-    CALL getpar('guide_add',.false.,guide_add,'for�age constant?')
+    CALL getpar('guide_add',.false.,guide_add,'foréage constant?')
     CALL getpar('guide_zon',.false.,guide_zon,'guidage moy zonale')
     if (guide_zon .and. abs(grossismx - 1.) > 0.01) &
@@ -121 +121 @@
     CALL getpar('plim_guide_BL',85000.,plim_guide_BL,'BL top presnivs value')
 
-! Sauvegarde du for�age
+! Sauvegarde du forçage
     CALL getpar('guide_sav',.false.,guide_sav,'sauvegarde guidage')
     CALL getpar('iguide_sav',4,iguide_sav,'freq. sauvegarde guidage')
@@ -2269 +2269 @@
         call nf95_put_var(nid, varid_alpha_q, zq)
 ! --------------------------------------------------------------------
-! Cr�ation des variables sauvegard�es
+! Création des variables sauvegardées
 ! --------------------------------------------------------------------
         ierr = nf90_redef(nid)