From b0cea01e9ca06ad09b8c6b47a063ac412fbe79a8 Mon Sep 17 00:00:00 2001 From: Darian Boggs Date: Tue, 24 Sep 2024 12:29:48 -0400 Subject: [PATCH] Rm comment. --- field_utils/FieldCondensedArray.F90 | 4 ---- 1 file changed, 4 deletions(-) diff --git a/field_utils/FieldCondensedArray.F90 b/field_utils/FieldCondensedArray.F90 index 7bedabe4185a..7d59ab717017 100644 --- a/field_utils/FieldCondensedArray.F90 +++ b/field_utils/FieldCondensedArray.F90 @@ -56,10 +56,6 @@ function get_fptr_shape(f, rc) result(fptr_shape) logical :: has_vertical character(len=:), allocatable :: spec_name character(len=*), parameter :: VERTICAL_DIM_NONE_NAME = 'VERTICAL_DIM_NONE' - !wdb fixme deleteme This seems fragile. We should probably make a utility function - !that selects the type(VerticalDimSpec) parameter based on a string. Perhaps a - !logical function in VerticalDimSpec.F90 that recogizes a VerticalDimSpec based on - !the string from the ESMF_Info. call ESMF_FieldGet(f, gridToFieldMap=gridToFieldMap, _RC) call ESMF_FieldGet(f, rank=rank, _RC)