Wall thickness to withstand the internal pressure
function thickness extends Modelica.Icons.Function; input Pressure_psi p2 "Tank internal design gauge pressure"; input Length_in d2 "Tank internal diameter"; input Pressure_psi s1 "Maximum allowable stress of the shell material at the design temperature"; input Real e1 "Fractional weld efficiency"; output Length_in t1 "Tank thickness"; end thickness;