diff --git a/src/macrorugo/macrorugo.ts b/src/macrorugo/macrorugo.ts
index e104ce24beed84309bf98d4bec85a25806b803c9..30fdf729924c96fd66999d6a08045bc165ad6cab 100644
--- a/src/macrorugo/macrorugo.ts
+++ b/src/macrorugo/macrorugo.ts
@@ -100,7 +100,7 @@ export class MacroRugo extends Nub {
         }
         r.extraResults.Q_GuideTech = cQ[0] * Math.pow(this.prms.Y.v / hdk, cQ[1]) *
             Math.pow(this.prms.If.v, cQ[2]) * Math.pow(this.prms.C.v, cQ[3]) *
-            Math.sqrt(MacroRugo.g * this.prms.PBD.v) * this.prms.PBD.v * this.prms.B.v;
+            Math.sqrt(MacroRugo.g * hdk) * hdk * this.prms.B.v;
         if (this.prms.Y.v / this.prms.PBH.v <= MacroRugo.limitSubmerg) {
             r.extraResults.V_GuideTech = cV[0] * Math.pow(this.prms.Y.v / this.prms.PBD.v, cV[1]) *
                 Math.pow(this.prms.If.v, cQ[2]) * Math.sqrt(MacroRugo.g * this.prms.PBD.v);