Changeset 2698
- Timestamp:
- Jun 21, 2022, 11:05:34 AM (2 years ago)
- Location:
- trunk/LMDZ.GENERIC/libf/phystd
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.GENERIC/libf/phystd/callkeys_mod.F90
r2655 r2698 39 39 logical,save :: radfixed 40 40 logical,save :: sedimentation 41 !$OMP THREADPRIVATE(varactive,varfixed,radfixed,sedimentation) 41 logical,save :: generic_condensation 42 !$OMP THREADPRIVATE(varactive,varfixed,radfixed,sedimentation,generic_condensation) 42 43 logical,save :: water,watercond,waterrain 43 44 !$OMP THREADPRIVATE(water,watercond,waterrain) -
trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90
r2664 r2698 925 925 if (is_master) write(*,*)trim(rname)//": sedimentation = ",sedimentation 926 926 927 if (is_master) write(*,*)trim(rname)//": Generic Condensation of tracers ?" 928 generic_condensation=.false. !default value 929 call getin_p("generic_condensation",generic_condensation) 930 if (is_master) write(*,*)trim(rname)//": generic_condensation = ",generic_condensation 927 931 if (is_master) write(*,*)trim(rname)//": Compute water cycle ?" 928 932 water=.false. ! default value
Note: See TracChangeset
for help on using the changeset viewer.