Changeset 3677 for LMDZ6/trunk/libf/phylmd/StratAer/ocs_to_so2.F90

Timestamp:

May 6, 2020, 5:18:32 PM (4 years ago)

Author:

oboucher

Message:

Changed the way to initialise nbtr_bin and other dimensions and indices
in the StratAer? module based on infotrac_phy rather than infotrac.

Also added a missing $OMP THREADPRIVATE(nqperes)

File:

• LMDZ6/trunk/libf/phylmd/StratAer/ocs_to_so2.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/StratAer/ocs_to_so2.F90

@@ -6 +6 @@
   USE dimphy, ONLY : klon,klev
   USE aerophys
-  USE infotrac
+  USE infotrac_phy
   USE YOMCST, ONLY : RG
   USE phys_local_var_mod, ONLY : OCS_lifetime, budg_3D_ocs_to_so2, budg_ocs_to_so2