--- trunk/libf/dyn3d/advtrac.f90	2008/08/05 13:31:32	17
+++ trunk/libf/dyn3d/advtrac.f90	2008/08/07 12:29:13	18
@@ -17,7 +17,7 @@
   USE comgeom
   USE temps
   USE ener
-  USE advtrac_m
+  USE iniadvtrac_m
   USE comdissip
   IMPLICIT NONE