PI2_L
x = p - PI2_L;
w = (z * x) * (PP1 + z * PP2) - PI2_L;
(z * z) * (P3 + z * P4)) - PI2_L;
w = PoS(x, z) - PI2_L;
w = PoL(x, z) - PI2_L;