powered by
watdepth(P=Pa, p=pmax(0, P-Pa), lat=0, Pa=1.013253)
watdepth(100) plot(watdepth(1:100))
Run the code above in your browser using DataLab