--- trunk/libf/phylmd/phytrac.f90	2012/01/30 14:37:26	60
+++ trunk/libf/phylmd/phytrac.f90	2012/04/20 14:58:43	61
@@ -455,7 +455,7 @@
       ! From phylmd/write_histrac.h, version 1.9 2006/02/21 08:08:30
 
       use dimens_m, only: iim, jjm, llm
-      use histcom, only: histsync
+      use histsync_m, only: histsync
       use histwrite_m, only: histwrite
       use temps, only: itau_phy
       use iniadvtrac_m, only: tnom