From 9063a74486d71719c529202deeaf64cb85a09860 Mon Sep 17 00:00:00 2001 From: Lauren Chilutti Date: Wed, 28 Apr 2021 09:17:13 -0400 Subject: [PATCH] Update to fv_regional_bc tono longer need the GNU compilation flag -fallow-invalid-boz --- model/fv_regional_bc.F90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/model/fv_regional_bc.F90 b/model/fv_regional_bc.F90 index 3d7be4038..d6073900c 100644 --- a/model/fv_regional_bc.F90 +++ b/model/fv_regional_bc.F90 @@ -179,11 +179,11 @@ module fv_regional_mod ,oro_data ='oro_data.tile7.halo4.nc' #ifdef OVERLOAD_R4 - real, parameter:: real_snan=x'FFBFFFFF' + real, parameter:: real_snan=real(Z'FFBFFFFF') #else - real, parameter:: real_snan=x'FFF7FFFFFFFFFFFF' + real, parameter:: real_snan=real(Z'FFF7FFFFFFFFFFFF') #endif - real(kind=R_GRID), parameter:: dbl_snan=x'FFF7FFFFFFFFFFFF' + real(kind=R_GRID), parameter:: dbl_snan=real(Z'FFF7FFFFFFFFFFFF') interface dump_field module procedure dump_field_3d