MacrorugoCompound: add total flow (technical guide) Q_GuideTech to extraResults

src/macrorugo/macrorugo_compound.ts

@@ -52,6 +52,7 @@ export class MacrorugoCompound extends MacroRugo implements Observer {
 
     public Equation(sVarCalc: string): Result {
         let QT: number = 0;
+        let QGTT: number = 0;
         let B: number = 0;
         for (const child of this.children) {
             child.Calc(sVarCalc);
@@ -61,8 +62,12 @@ export class MacrorugoCompound extends MacroRugo implements Observer {
             // la cote de fond aval n'a pas de sens dans la MR-Complexe car on
             // ne précise pas la longueur
             delete child.result.values.ZF2;
+            // débit total selon le guide technique
+            QGTT += child.result.values.Q_GuideTech;
         }
-        return new Result(QT);
+        const res = new Result(QT);
+        res.resultElement.values.Q_GuideTech = QGTT;
+        return res;
     }
 
     public addChild(child: MacroRugo, after?: number) {