Index: LMDZ5/trunk/libf/bibio/handle_err_m.F90
===================================================================
--- LMDZ5/trunk/libf/bibio/handle_err_m.F90	(revision 2093)
+++ LMDZ5/trunk/libf/bibio/handle_err_m.F90	(revision 2094)
@@ -39,5 +39,5 @@
           end if
        end if
-       stop 1
+       call abort_gcm("NetCDF95 handle_err", "", 1)
     end if
 
Index: LMDZ5/trunk/libf/dyn3d/getparam.F90
===================================================================
--- LMDZ5/trunk/libf/dyn3d/getparam.F90	(revision 2093)
+++ LMDZ5/trunk/libf/dyn3d/getparam.F90	(revision 2094)
@@ -11,6 +11,7 @@
 
    INTERFACE getpar
-     MODULE PROCEDURE ini_getparam,fin_getparam,getparamr,getparami,getparaml
+     MODULE PROCEDURE getparamr,getparami,getparaml
    END INTERFACE
+   private getparamr,getparami,getparaml
 
    INTEGER, PARAMETER :: out_eff=99
Index: LMDZ5/trunk/libf/dyn3d/integrd.F
===================================================================
--- LMDZ5/trunk/libf/dyn3d/integrd.F	(revision 2093)
+++ LMDZ5/trunk/libf/dyn3d/integrd.F	(revision 2094)
@@ -107,5 +107,5 @@
          write(lunout,*) " lon = ",rlonv(i)*180./pi, " deg",
      &                   " lat = ",rlatu(j)*180./pi, " deg"
-         stop
+         call abort_gcm("integrd", "", 1)
         ENDIF
       ENDDO
Index: LMDZ5/trunk/libf/dyn3dmem/getparam.F90
===================================================================
--- LMDZ5/trunk/libf/dyn3dmem/getparam.F90	(revision 2093)
+++ LMDZ5/trunk/libf/dyn3dmem/getparam.F90	(revision 2094)
@@ -11,6 +11,7 @@
 
    INTERFACE getpar
-     MODULE PROCEDURE ini_getparam,fin_getparam,getparamr,getparami,getparaml
+     MODULE PROCEDURE getparamr,getparami,getparaml
    END INTERFACE
+   private getparamr,getparami,getparaml
 
    INTEGER, PARAMETER :: out_eff=99
Index: LMDZ5/trunk/libf/dyn3dmem/integrd_loc.F
===================================================================
--- LMDZ5/trunk/libf/dyn3dmem/integrd_loc.F	(revision 2093)
+++ LMDZ5/trunk/libf/dyn3dmem/integrd_loc.F	(revision 2094)
@@ -183,5 +183,5 @@
      .                dq(:,:,j))
         enddo
-      STOP
+        call abort_gcm("integrd_loc", "", 1)
       ENDIF
     
Index: LMDZ5/trunk/libf/dyn3dpar/getparam.F90
===================================================================
--- LMDZ5/trunk/libf/dyn3dpar/getparam.F90	(revision 2093)
+++ LMDZ5/trunk/libf/dyn3dpar/getparam.F90	(revision 2094)
@@ -11,6 +11,7 @@
 
    INTERFACE getpar
-     MODULE PROCEDURE ini_getparam,fin_getparam,getparamr,getparami,getparaml
+     MODULE PROCEDURE getparamr,getparami,getparaml
    END INTERFACE
+   private getparamr,getparami,getparaml
 
    INTEGER, PARAMETER :: out_eff=99