R/moistCp.R

moistCp <-
function( w , consts=export_constants()){
		   return(as.double(consts["cp"]*(1+0.87*w2q(w))))
}

Try the aiRthermo package in your browser

Any scripts or data that you put into this service are public.

aiRthermo documentation built on May 1, 2019, 9:24 p.m.