--- trunk/libf/dyn3d/abort_gcm.f90 2010/04/09 10:56:14 33 +++ trunk/dyn3d/abort_gcm.f90 2013/11/15 18:45:49 76 @@ -9,7 +9,7 @@ ! From abort_gcm.F, version 1.1.1.1 2004/05/19 12:53:05 ! Stops the simulation, closing files and printing comments. - USE histcom, only: histclo + USE histclo_m, only: histclo character(len=*), intent(in):: modname ! name of calling program integer, intent(in):: ierr ! severity of situation (= 0 normal)