Changeset 2266 for trunk/LMDZ.MARS/libf/phymars/time_phylmdz_mod.F90

Timestamp:

Mar 25, 2020, 3:40:24 PM (5 years ago)

Author:

emillour

Message:

Mars GCM:
Some very minor fixes in the physics to be able to compile physics as a library:

• remove reference to unused .h files located in the dynamics in nonoro_gwd_ran_mod.F
• fix an OpenMP declaration in time_phylmdz_mod.F90

EM

File:

• trunk/LMDZ.MARS/libf/phymars/time_phylmdz_mod.F90 (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/time_phylmdz_mod.F90

@@ -3 +3 @@
     IMPLICIT NONE
     REAL,SAVE    :: dtphys      ! physics time step (s)
-!$OMP THREADPRIVATE(pdtphys)
+!$OMP THREADPRIVATE(dtphys)
     INTEGER,SAVE :: day_step    ! number of dynamical steps per day
                                 ! (set via conf_phys)