Skip to content

add integrated physics #72

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
JosephMouallem wants to merge 1 commit into
base: main
Choose a base branch
from
+5 −2
Open

add integrated physics #72

Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
7 changes: 5 additions & 2 deletions SHiELD/atmos_model.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -772,7 +772,7 @@ subroutine atmos_model_init (Atmos, Time_init, Time, Time_step, do_concurrent_ra
character(len=64) :: filename, filename2, pelist_name
character(len=132) :: text
logical :: p_hydro, hydro, fexist
logical :: do_inline_mp, do_cosp
logical :: do_inline_mp, do_inline_cnv, do_inline_pbl, do_inline_gwd, do_cosp
logical, save :: block_message = .true.
integer :: bdat(8), cdat(8)
integer :: ntracers
Expand Down Expand Up @@ -829,7 +829,7 @@ subroutine atmos_model_init (Atmos, Time_init, Time, Time_step, do_concurrent_ra
!--- before going any further check definitions for 'blocks'
!-----------------------------------------------------------------------
call atmosphere_control_data (isc, iec, jsc, jec, nlev, p_hydro, hydro, tile_num, &
do_inline_mp, do_cosp)
do_inline_mp, do_inline_pbl, do_inline_cnv, do_inline_gwd, do_cosp)
call define_blocks_packed ('atmos_model', Atm_block, isc, iec, jsc, jec, nlev, &
blocksize, block_message)

Expand Down Expand Up @@ -882,6 +882,9 @@ subroutine atmos_model_init (Atmos, Time_init, Time, Time_step, do_concurrent_ra
Init_parm%tracer_names => tracer_names
Init_parm%hydro = hydro
Init_parm%do_inline_mp = do_inline_mp
Init_parm%do_inline_cnv = do_inline_cnv
Init_parm%do_inline_pbl = do_inline_pbl
Init_parm%do_inline_gwd = do_inline_gwd
Init_parm%do_cosp = do_cosp

allocate(Init_parm%input_nml_file, mold=input_nml_file)
Expand Down