Skip to content
Snippets Groups Projects
Commit 031ae2e7 authored by VIE Benoît's avatar VIE Benoît Committed by RODIER Quentin
Browse files

Bugfix - coefficients for Phillips ice nucleation parameterization

parent 18d22b5c
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/PHYEX/micro/mode_ini_lima_cold_mixed.f90
+ 8
− 8
View file @ 031ae2e7
...@@ -544,10 +544,10 @@ END IF ...@@ -544,10 +544,10 @@ END IF
! !
! !
IF (NPHILLIPS == 13) THEN IF (NPHILLIPS == 13) THEN
XDT0(1) = 5. +273.15 !DM1 XDT0(1) = 5. !DM1
XDT0(2) = 5. +273.15 !DM2 XDT0(2) = 5. !DM2
XDT0(3) = 10. +273.15 !BC XDT0(3) = 10. !BC
XDT0(4) = 5. +273.15 !BIOO XDT0(4) = 5. !BIOO
! !
XT0(1) = -40. +273.15 !DM1 XT0(1) = -40. +273.15 !DM1
XT0(2) = XT0(1) !DM2 XT0(2) = XT0(1) !DM2
...@@ -576,10 +576,10 @@ IF (NPHILLIPS == 13) THEN ...@@ -576,10 +576,10 @@ IF (NPHILLIPS == 13) THEN
XTX2(3) = -15. +273.15 !BC XTX2(3) = -15. +273.15 !BC
XTX2(4) = -2. +273.15 !BIO XTX2(4) = -2. +273.15 !BIO
ELSE IF (NPHILLIPS == 8) THEN ELSE IF (NPHILLIPS == 8) THEN
XDT0(1) = 5. +273.15 !DM1 XDT0(1) = 5. !DM1
XDT0(2) = 5. +273.15 !DM2 XDT0(2) = 5. !DM2
XDT0(3) = 5. +273.15 !BC XDT0(3) = 5. !BC
XDT0(4) = 5. +273.15 !O XDT0(4) = 5. !O
! !
XT0(1) = -40. +273.15 !DM1 XT0(1) = -40. +273.15 !DM1
XT0(2) = XT0(1) !DM2 XT0(2) = XT0(1) !DM2
......
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