From 66e454a3cce1520df615858eccf049fe693c3dd2 Mon Sep 17 00:00:00 2001 From: James Edwards Date: Thu, 31 Aug 2023 13:11:13 -0600 Subject: [PATCH] fix github test --- mediator/med_phases_prep_ocn_mod.F90 | 1 - 1 file changed, 1 deletion(-) diff --git a/mediator/med_phases_prep_ocn_mod.F90 b/mediator/med_phases_prep_ocn_mod.F90 index b49d717f0..11752a33c 100644 --- a/mediator/med_phases_prep_ocn_mod.F90 +++ b/mediator/med_phases_prep_ocn_mod.F90 @@ -87,7 +87,6 @@ subroutine med_phases_prep_ocn_accum(gcomp, rc) ! local variables type(InternalState) :: is_local - integer :: n type(med_fldlist_type), pointer :: fldList character(len=*), parameter :: subname='(med_phases_prep_ocn_accum)' !---------------------------------------