diff --git a/example/PARAMETR/CHOIX.TXT b/example/PARAMETR/CHOIX.TXT
index 7f82718e11c80d92e71dcd2f9972a27ff25461a5..069087f4556466a5977014c86bf4443f4cd82e69 100644
--- a/example/PARAMETR/CHOIX.TXT
+++ b/example/PARAMETR/CHOIX.TXT
@@ -22,16 +22,17 @@ ligne 5 : nom du fichier d
 ligne 6 : type d'objectif : 0 pour soutien de débit, 1 pour laminage de débit
 ligne 7 : début de période de calcul
 ligne 8 : fin de période de calcul
-ligne 9 : code pour format d'édition des résultats de volume : 1 pour valeurs absolues en m3, 2 pour valeurs relatives par rapport à Vtot ou somme(Vtot)
-ligne 10 : code indiquant le mode de répartition du débit à stocker entre les réservoirs:
+ligne 9 : code indiquant les sous-programmes à lancer:
+                0 : tous les sous-programmes
+                1 : uniquement la simulation en chronologie inverse
+ligne 10 : code pour format d'édition des résultats de volume : 1 pour valeurs absolues en m3, 2 pour valeurs relatives par rapport à Vtot ou somme(Vtot)
+ligne 11 : code indiquant le mode de répartition du débit à stocker entre les réservoirs:
 		1=figée;
                 2=fonction des volumes présents et des temps de reconstitution de volume utilisable maximal à partir du début de pas de temps;
                 3=visant à équilibrer en fin de pas de temps les taux de remplissage;
                 4=visant à équilibrer en fin de pas de temps les durées Tpot d'évolution de réservoir vers état extrême (voir ligne 11) avec apports moyens
                 5=visant à équilibrer en fin de pas de temps les durées Tpot d'évolution de réservoir vers état extrême (voir ligne 11) avec quantile donné des apports de chaque quantième
-ligne 11 (utilisée seulement si 4 ou 5 en ligne 10) : code indiquant la nature de Tpot :
+ligne 12 (utilisée seulement si 4 ou 5 en ligne 11) : code indiquant la nature de Tpot :
 		1 : Tpot est la durée potentielle minimale Tpot1 de reconstitution du volume utilisable maximal (obtention de V=Vtot ou V=0, selon la nature de l'objectif (soutien ou laminage) et le sens des calculs)
 		2 : Tpot est la durée potentielle minimale Tpot2 d'épuisement du volume utilisable (obtention de V=Vtot ou V=0, selon la nature de l'objectif (soutien ou laminage) et le sens des calculs)
-ligne 12 : code indiquant les sous-programmes à lancer:
-                0 : tous les sous-programmes
-                1 : uniquement la simulation en chronologie inverse
+
diff --git a/src/PARAM.PAS b/src/PARAM.PAS
index 67df9007a6eb1d4dbfa6f673d19044a48590d9c7..8c1fffd5f978248f135c9dfcad1a48f952edb23b 100644
--- a/src/PARAM.PAS
+++ b/src/PARAM.PAS
@@ -90,6 +90,7 @@ procedure P_ChoixEntreeOptions;
        YTypeObjectif:=1;
       readln(YFiText,YDat1);
       readln(YFitext,YDat2);
+      readln(YFitext,YChoixSubProg);
       readln(YFitext,YAbsRel);
       if YAbsRel<>1 then
        YAbsRel:=2;
@@ -102,7 +103,6 @@ procedure P_ChoixEntreeOptions;
         else
          YCodeTpot:=false;
        end;
-      readln(YFitext,YChoixSubProg);
       close(YFitext);
      end
     else