--- trunk/dyn3d/test_disvert.f	2014/07/02 18:39:15	99
+++ trunk/dyn3d/test_disvert.f	2014/09/11 15:09:15	107
@@ -16,11 +16,10 @@
 
     use abort_gcm_m, only: abort_gcm
     use comconst, only: kappa, cpp
-    use disvert_m, only: pa, disvert, ap, bp, preff, presnivs, s
+    use disvert_m, only: ap, bp, preff, presnivs, s
     use dimens_m, only: llm
     use exner_hyb_m, only: exner_hyb
     use jumble, only: new_unit
-    use nr_util, only: assert
 
     integer i, unit, l