From bd4d0e06a4f5ae73578d2257a206b7f2503a2fe4 Mon Sep 17 00:00:00 2001 From: ldfowler58 Date: Tue, 6 Aug 2024 16:53:46 -0600 Subject: [PATCH] * In ./src/core_atmosphere/physics/mpas_atmphys_driver_radiation_sw.F, removed extra deallocate for variable tao5503d_p in subroutine deallocate_radiation_sw.F. --- src/core_atmosphere/physics/mpas_atmphys_driver_radiation_sw.F | 1 - 1 file changed, 1 deletion(-) diff --git a/src/core_atmosphere/physics/mpas_atmphys_driver_radiation_sw.F b/src/core_atmosphere/physics/mpas_atmphys_driver_radiation_sw.F index 0b5353481a..bc2be079ef 100644 --- a/src/core_atmosphere/physics/mpas_atmphys_driver_radiation_sw.F +++ b/src/core_atmosphere/physics/mpas_atmphys_driver_radiation_sw.F @@ -300,7 +300,6 @@ subroutine deallocate_radiation_sw(configs) if(allocated(pin_p) ) deallocate(pin_p ) if(allocated(o3clim_p) ) deallocate(o3clim_p ) - if(allocated(taod5503d_p) ) deallocate(taod5503d_p ) if(allocated(tauaer_p) ) deallocate(tauaer_p ) if(allocated(ssaaer_p) ) deallocate(ssaaer_p ) if(allocated(asyaer_p) ) deallocate(asyaer_p )