Changeset 5128 for LMDZ6/branches/Amaury_dev/libf/phylmd/calltherm.F90

Timestamp:

Jul 25, 2024, 5:47:25 PM (4 months ago)

Author:

abarral

Message:

Correct bug in vlspltqs_loc.f90 from r2270 where we call SSUM with incorrect arguments.
Merge the three different versions of abort_gcm into one
Fix seq, para 3D compilation broken from r5107 onwards
(lint) usual + Remove uneeded fixed-form continuations

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/calltherm.F90 (modified) (1 diff)

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

@@ -33 +33 @@
       USE lmdz_thermcell_old, ONLY: thermcell, thermcell_2002, thermcell_eau, calcul_sec, thermcell_sec
       USE lmdz_abort_physic, ONLY: abort_physic
+
 #ifdef ISO
       USE infotrac_phy, ONLY: ntiso