--- trunk/libf/dyn3d/dynredem0.f90	2008/03/31 12:24:17	7
+++ trunk/libf/dyn3d/dynredem0.f90	2008/04/18 14:45:53	10
@@ -12,7 +12,7 @@
 
     USE IOIPSL, only: ymds2ju, ju2ymds
     use dimens_m, only: iim, jjm, llm, nqmx
-    use paramet_m, only: ip1jmp1, iip1, jjp1, llmp1
+    use paramet_m, only: iip1, jjp1, llmp1
     use comconst, only: rad, cpp, daysec, dtvr, kappa, g, omeg
     use comvert, only: pa, bp, ap, nivsigs, preff, presnivs, nivsig
     use logic