From 8db94bcb5434d8eea93fbd66e561987772edae2d Mon Sep 17 00:00:00 2001
From: Ramil Ahtamyanov <ramil.rgk@gmail.com>
Date: Sat, 21 Dec 2024 19:05:35 +0300
Subject: [PATCH] neutral_mld & u_dynH normalize 1e-2
---
obl_inmom.f90 | 2 ++
1 file changed, 2 insertions(+)
diff --git a/obl_inmom.f90 b/obl_inmom.f90
index 5eb28dd..6bf5af7 100644
--- a/obl_inmom.f90
+++ b/obl_inmom.f90
@@ -95,6 +95,8 @@ module obl_inmom
call legacy_neutral_mld(rlh, taux, tauy, border_shift, lu, neutral_mld, u_dynH)
call sync_xy_border_2d(neutral_mld)
call sync_xy_border_2d(u_dynH)
+ neutral_mld = neutral_mld * 1e-2
+ u_dynH = u_dynH * 1e-2
!print *, "neutral_mld:", neutral_mld
end if
--
GitLab