Skip to content

Commit

Permalink
BF for LMDZ in 3D
Browse files Browse the repository at this point in the history
  • Loading branch information
SebastienRietteMTO committed May 29, 2024
1 parent b457d38 commit 98d16ae
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/lmdz/ext/mode_init_phyex.F90
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@ SUBROUTINE FILL_DIMPHYEX(KLON, KLEV, D)
D%NJE = 1
D%NIJT = D%NIT * D%NJT
D%NIJB = 1
D%NIJE = 1
D%NIJE = KLON
D%NKL = 1
D%NKT = KLEV+2
D%NKA = 1
Expand Down Expand Up @@ -90,6 +90,7 @@ SUBROUTINE INIT_PHYEX(PTSTEP, PDZMIN, PHYEX)
PHYEX%MISC%CPROGRAM=CPROGRAM
PHYEX%MISC%ZTFILE%LOPENED=.FALSE.
PHYEX%MISC%TLES%LLES=.FALSE.
PHYEX%MISC%TLES%LLES_CALL=.FALSE.
PHYEX%MISC%CMICRO=CMICRO
PHYEX%MISC%CSCONV=CSCONV
PHYEX%MISC%CTURB=CTURB
Expand Down

0 comments on commit 98d16ae

Please sign in to comment.