Changeset 2715 for trunk/LMDZ.GENERIC


Ignore:
Timestamp:
Jun 21, 2022, 11:05:42 AM (3 years ago)
Author:
aslmd
Message:

Added a flag for when using newstart.F with generic traceur profile

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.GENERIC/libf/phystd/generic_cloud_common_h.F90

    r2714 r2715  
    126126        integer :: ios
    127127        character(len=500):: table_traceurs_line ! table_traceurs_line lines with parameters
    128 
     128        !Check if we're using newstart.F or the gcm
     129        if (index(trim(datadir),"/u/lmdz/WWW/planets/") .ne. 0) then !this is the default path writter in datafile_mod
     130            print*,"We're using newstart.F, we don't need to load the table_tracers_condensable"
     131            return
     132        endif
    129133        open(117,file=trim(datadir)//'/table_tracers_condensable',form='formatted',status='old')
    130134
Note: See TracChangeset for help on using the changeset viewer.