From 031ae2e7e55d1d3308f4afaeeb7c4ff1fb858a31 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Beno=C3=AEt=20Vi=C3=A9?= <benoit.vie@meteo.fr>
Date: Mon, 17 Jun 2024 11:55:22 +0200
Subject: [PATCH] Bugfix - coefficients for Phillips ice nucleation
parameterization
---
src/PHYEX/micro/mode_ini_lima_cold_mixed.f90 | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/src/PHYEX/micro/mode_ini_lima_cold_mixed.f90 b/src/PHYEX/micro/mode_ini_lima_cold_mixed.f90
index 0f6c055af..7b55d1a92 100644
--- a/src/PHYEX/micro/mode_ini_lima_cold_mixed.f90
+++ b/src/PHYEX/micro/mode_ini_lima_cold_mixed.f90
@@ -544,10 +544,10 @@ END IF
!
!
IF (NPHILLIPS == 13) THEN
- XDT0(1) = 5. +273.15 !DM1
- XDT0(2) = 5. +273.15 !DM2
- XDT0(3) = 10. +273.15 !BC
- XDT0(4) = 5. +273.15 !BIOO
+ XDT0(1) = 5. !DM1
+ XDT0(2) = 5. !DM2
+ XDT0(3) = 10. !BC
+ XDT0(4) = 5. !BIOO
!
XT0(1) = -40. +273.15 !DM1
XT0(2) = XT0(1) !DM2
@@ -576,10 +576,10 @@ IF (NPHILLIPS == 13) THEN
XTX2(3) = -15. +273.15 !BC
XTX2(4) = -2. +273.15 !BIO
ELSE IF (NPHILLIPS == 8) THEN
- XDT0(1) = 5. +273.15 !DM1
- XDT0(2) = 5. +273.15 !DM2
- XDT0(3) = 5. +273.15 !BC
- XDT0(4) = 5. +273.15 !O
+ XDT0(1) = 5. !DM1
+ XDT0(2) = 5. !DM2
+ XDT0(3) = 5. !BC
+ XDT0(4) = 5. !O
!
XT0(1) = -40. +273.15 !DM1
XT0(2) = XT0(1) !DM2
--
GitLab