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

removed redundant bind(c) which confused gfortran

parent bc1456ed
......@@ -433,7 +433,7 @@
ptr = c_loc(fabm_get_horizontal_diagnostic_data(model,index))
end subroutine get_horizontal_diagnostic_data
subroutine finalize() bind(c)
subroutine finalize()
call fabm_finalize(model)
if (allocated(environment_names)) deallocate(environment_names)
if (allocated(environment_units)) deallocate(environment_units)
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