summaryrefslogtreecommitdiff
path: root/var/spack/repos/builtin/packages/wrf/patches/4.3/fujitsu.patch
diff options
context:
space:
mode:
Diffstat (limited to 'var/spack/repos/builtin/packages/wrf/patches/4.3/fujitsu.patch')
-rw-r--r--var/spack/repos/builtin/packages/wrf/patches/4.3/fujitsu.patch10
1 files changed, 10 insertions, 0 deletions
diff --git a/var/spack/repos/builtin/packages/wrf/patches/4.3/fujitsu.patch b/var/spack/repos/builtin/packages/wrf/patches/4.3/fujitsu.patch
new file mode 100644
index 0000000000..bcd73a331d
--- /dev/null
+++ b/var/spack/repos/builtin/packages/wrf/patches/4.3/fujitsu.patch
@@ -0,0 +1,10 @@
+--- spack-src/phys/module_mp_ntu.F.org 2021-11-04 09:33:01.000000000 +0900
++++ spack-src/phys/module_mp_ntu.F 2021-11-04 09:41:00.000000000 +0900
+@@ -352,7 +352,7 @@
+ DO I = 1,ITERMAX
+ Y = Y0
+ DY = DYEQU(DRC,DWMAS,DMODE,DSTDV)
+- IF (DY.LE.1.E-50) THEN
++ IF (DY.LE.1.D-50) THEN
+ PRINT *,'IN FIND_RC0.F DY IS',DY
+ PRINT *,I,DX,Y,DY,DEXP(DRC),DRC,XAFRC,X1MAFRC,DMODE,DSTDV, &