error discovered in precision
fixed Pressure function

originally had k in place of R