powered by
swTFreeze(salinity, pressure=NULL)
ctd
Tf <- swTFreeze(40, 500) # -2.588567 degC
Run the code above in your browser using DataLab