From 06c308389c7f5dfc2e9b73655d24ce120f0c0b25 Mon Sep 17 00:00:00 2001
From: Saeideh Banihashemi <sbani@orion-login-3.hpc.msstate.edu>
Date: Tue, 4 Mar 2025 23:08:13 -0600
Subject: [PATCH] fix single to double precision to fix seg faults

---
 src/wave_stat.fd/wave_stat.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/wave_stat.fd/wave_stat.f90 b/src/wave_stat.fd/wave_stat.f90
index fa122de5..e930094f 100644
--- a/src/wave_stat.fd/wave_stat.f90
+++ b/src/wave_stat.fd/wave_stat.f90
@@ -29,7 +29,7 @@ module ens_common
       integer :: ymdc,fhr,nnme,nnsc
       integer :: parcode(3)
       integer :: istop
-      real,allocatable :: dumy1d(:)
+      real(8),allocatable :: dumy1d(:)
 ! Grid
       real    :: rdlon(3),rdlat(3)
       integer :: nlola(2)