--- trunk/libf/dyn3d/abort_gcm.f90	2012/01/30 14:37:26	60
+++ trunk/libf/dyn3d/abort_gcm.f90	2012/04/20 14:58:43	61
@@ -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)