diff --git a/tests/test_adiabat.f90 b/tests/test_adiabat.f90 index 8cf1182..cebe871 100644 --- a/tests/test_adiabat.f90 +++ b/tests/test_adiabat.f90 @@ -97,6 +97,7 @@ program test stop 1 endif print*,ISR1/ISR, OLR1/OLR + deallocate(f_i) ! Test ocean solubility functionality ocean_fcn_ptr => ocean_fcn