library(pipenostics)
b31gsap(1093, 30, .438, .1, 7.5)
# [1] 1093 # [PSI], safe pressure is equal to design pressure
b31gsap(877, 24, .281, .08, 15)
# [1] 690 # [PSI], safe pressure is lower than design pressure due corrosion
Run the code above in your browser using DataLab