diff --git a/rubarbe.f90 b/rubarbe.f90
index 1575d9fb9782be1bbfeb588212a28d9e9beca14d..4ed8de594bb54ae27a353ba43fc8ee569ae700cb 100644
--- a/rubarbe.f90
+++ b/rubarbe.f90
@@ -26057,21 +26057,14 @@
 !ccccccccccccccccccccccccccccccccccccccccccccccccccccc
 
       use parameters,only:NBMAX
+      use donnees_etude,only:ETUDEDD,CONDAM,CONDAV,REGIME
 
       IMPLICIT NONE
 
 ! Données de base
 !----------------
-      CHARACTER ETUDEDD*20
-      INTEGER :: CONDAM(NBMAX),CONDAV(NBMAX),REGIME(NBMAX)
       INTEGER :: NCONF,CONFLU(NBMAX,3),NCONF2,INDAMONT,IB,ICONF,NBB
-          LOGICAL :: VERIF
-
-! Variables contenues dans 'donnee.etude'
-!----------------------------------------
-      COMMON/NOMETU/ETUDEDD
-      COMMON/CONDLI/CONDAM,CONDAV,REGIME
-
+      LOGICAL :: VERIF
 
 ! 9)VARIABLES NBIEFS
 !----------------------------------