From cd5aee790fbd6a05a1b7af2b61219c18bb911403 Mon Sep 17 00:00:00 2001 From: Caitlyn Mcallister Date: Thu, 21 Sep 2023 10:03:05 -0400 Subject: [PATCH] remove this variable, not needed --- test_fms/topography/test_topography.F90 | 1 - 1 file changed, 1 deletion(-) diff --git a/test_fms/topography/test_topography.F90 b/test_fms/topography/test_topography.F90 index 3f76884ec7..0ccbebd63e 100644 --- a/test_fms/topography/test_topography.F90 +++ b/test_fms/topography/test_topography.F90 @@ -165,7 +165,6 @@ subroutine test_topog_mean() !---------------------------------------- test topog mean 2d ---------------------------------------------! get_mean_answer = get_topog_mean(lon2d, lat2d, zmean2d) - this = 0.5_lkind if (get_mean_answer .neqv. .true.) call mpp_error(FATAL, "topog field not read correctly") call check_answers(zmean2d(1,1), 0.5_lkind, "Error in test_topog_mean 2d")