Commit ba2cb367 authored by Jorn Bruggeman's avatar Jorn Bruggeman
Browse files

fixed horizontal_shape

parent 0e20e8da
......@@ -33,7 +33,7 @@ module fabm_work
integer :: shape(_FABM_DIMENSION_COUNT_)
integer :: start(_FABM_DIMENSION_COUNT_)
integer :: stop(_FABM_DIMENSION_COUNT_)
integer :: horizontal_size(_HORIZONTAL_DIMENSION_COUNT_)
integer :: horizontal_shape(_HORIZONTAL_DIMENSION_COUNT_)
#ifdef _HAS_MASK_
# ifndef _FABM_HORIZONTAL_MASK_
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment