drop special treatment of horizontal_shape

fabm-model · Jan 25, 2025 · 4183ae1 · 4183ae1
1 parent 853c5cf
commit 4183ae1
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/src/fabm_work.F90 b/src/fabm_work.F90
@@ -33,9 +33,7 @@ module fabm_work
       integer :: shape(_FABM_DIMENSION_COUNT_)
       integer :: start(_FABM_DIMENSION_COUNT_)
       integer :: stop(_FABM_DIMENSION_COUNT_)
-#if _HORIZONTAL_DIMENSION_COUNT_>0
       integer :: horizontal_shape(_HORIZONTAL_DIMENSION_COUNT_)
-#endif
 
 #ifdef _HAS_MASK_
 #  ifndef _FABM_HORIZONTAL_MASK_