Skip to content
Snippets Groups Projects
Commit aec12787 authored by RODIER Quentin's avatar RODIER Quentin
Browse files

Quentin 14/01/2022: fix for last commit PEDR is now optional

parent 9cdbed20
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/arome/ext/aro_turb_mnh.F90
+ 1
− 1
View file @ aec12787
...@@ -432,7 +432,7 @@ CALL TURB (KLEV+2,1,KKL,IMI, KRR, KRRL, KRRI, HLBCX, HLBCY, ISPLIT,IMI, & ...@@ -432,7 +432,7 @@ CALL TURB (KLEV+2,1,KKL,IMI, KRR, KRRL, KRRI, HLBCX, HLBCY, ISPLIT,IMI, &
& PDRUS_TURB,PDRVS_TURB, & & PDRUS_TURB,PDRVS_TURB, &
& PDRTHLS_TURB,PDRRTS_TURB,ZDRSVS_TURB, & & PDRTHLS_TURB,PDRRTS_TURB,ZDRSVS_TURB, &
& PFLXZTHVMF,ZWTH,ZWRC,ZWSV,PDP,PTP,PTPMF,PTDIFF, & & PFLXZTHVMF,ZWTH,ZWRC,ZWSV,PDP,PTP,PTPMF,PTDIFF, &
& PTDISS,PEDR,YDDDH,YDLDDH,YDMDDH) & PTDISS,YDDDH,YDLDDH,YDMDDH,PEDR=PEDR)
! !
! !
!------------------------------------------------------------------------------ !------------------------------------------------------------------------------
......
src/common/turb/turb.F90
+ 1
− 1
View file @ aec12787
...@@ -493,7 +493,7 @@ ZRM(:,:,:,:) = PRM(:,:,:,:) ...@@ -493,7 +493,7 @@ ZRM(:,:,:,:) = PRM(:,:,:,:)
! !
!---------------------------------------------------------------------------- !----------------------------------------------------------------------------
! !
!* 2. COMPUTE CONSERVATIVE VARIABLES AE0___PROC1 et Q0___PROC1ND RELATED QUANTITIES !* 2. COMPUTE CONSERVATIVE VARIABLES AND RELATED QUANTITIES
! ----------------------------------------------------- ! -----------------------------------------------------
! !
!* 2.1 Cph at t !* 2.1 Cph at t
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme