SOLVE for Function Vectors

[NomadVehr]

Thanks Roadrunner,

I finally found the workaround thanks to the print command.
While the solution you posted didn't work as expected, it helped me get to work around.

I also made an enhancement to the program where it prompts warning messages when flow is below minimum or above end of curve:

EXPORT PUMP1(X)
BEGIN
LOCAL h,a;
h:=-3.96912716744ᴇ−6*X^3+1.33502710425ᴇ−3*X^2-0.230829109114*X+187.74099966;
LOCAL Eff;
Eff:=8.58164056499ᴇ−8*X^3-1.00216261706ᴇ−3*X^2+0.480844232375*X-0.029541916438;
LOCAL PWR;
PWR:=0.25415412597*X+68.328377716;
LOCAL NPSH;
NPSH:=3.42624923327ᴇ−7*X^3-1.02340333129ᴇ−4*X^2+7.55229835063ᴇ−3*X+2.60628404048;
a:={{"h(m)",h},{"Eff(%)",Eff},{"SHP(kW)",PWR},{"NPSH(m)=",NPSH}};
IF X<80 THEN RETURN {" Warning: Flow below minimum",a};END;
IF X>340 THEN RETURN {"Warning: Flow above end of curve",a};END;
PRINT("h(m)");PRINT(h);
PRINT("Eff(%)");PRINT(Eff);
PRINT("SHP(kW");PRINT(PWR);
PRINT("NPSH(m)");PRINT(NPSH);
RETURN a;
END;

Thanks again for helping me get started,
Nomad