...
pipe2length = Δzgrit - 3ElbowRadius(2gritpipeinr) - SocketDepth(2gritpipeinr)
pipe3length = 2 ((Δxgrit + 2gritthick + gritdim0 + ShortTeeLength(2gritpipeinr) + SocketDepth(2gritpipeinr) - ElbowRadius(2gritpipeinr) - pipe1length)^2 + (Δy{~}grit~ grit + grit{~}thick~ thick + grit{~}dim1~dim1/2)^2)^5 - 2ElbowRadius(2gritpipeinr)
...