--- trunk/libf/test_disvert.f90	2008/03/04 14:00:42	6
+++ trunk/libf/test_disvert.f90	2008/03/31 12:24:17	7
@@ -3,7 +3,7 @@
   use dimens_m, only: llm
   use comvert, only: pa, disvert, ap, bp, preff
   use comconst, only: initialize
-  use in_out, only: new_unit
+  use new_unit_m, only: new_unit
 
   implicit none