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