From 99f09f1edb8241a4d77e6b84dde66342f9fd64ee Mon Sep 17 00:00:00 2001 From: Lew Rossman Date: Sun, 19 Apr 2020 09:16:08 -0400 Subject: [PATCH] A simpler fix to EN_settankdata Changes 1 line instead of 4. --- src/epanet.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/epanet.c b/src/epanet.c index 1464e7a..0179b7e 100644 --- a/src/epanet.c +++ b/src/epanet.c @@ -2628,7 +2628,7 @@ int DLLEXPORT EN_settankdata(EN_Project p, int index, double elev, Network *net = &p->network; int i, j, n, curveIndex = 0; - double area, elevation = elev; + double area, elevation = elev / Ucf[ELEV]; double *Ucf = p->Ucf; Stank *Tank = net->Tank; Scurve *curve; @@ -2666,11 +2666,11 @@ int DLLEXPORT EN_settankdata(EN_Project p, int index, double elev, else area = PI * diam * diam / 4.0; // Assign parameters to tank object - net->Node[Tank[j].Node].El = elevation / Ucf[ELEV]; + net->Node[Tank[j].Node].El = elevation; Tank[j].A = area / Ucf[ELEV] / Ucf[ELEV]; - Tank[j].H0 = (elevation + initlvl) / Ucf[ELEV]; - Tank[j].Hmin = (elevation + minlvl) / Ucf[ELEV]; - Tank[j].Hmax = (elevation + maxlvl) / Ucf[ELEV]; + Tank[j].H0 = elevation + initlvl / Ucf[ELEV]; + Tank[j].Hmin = elevation + minlvl / Ucf[ELEV]; + Tank[j].Hmax = elevation + maxlvl / Ucf[ELEV]; Tank[j].Vcurve = curveIndex; if (curveIndex == 0) {