Нестационарная теплопроводность / Магистры Термодинамическое подобие / Программы / Solkane / 2012 / Ref_Cal_7 / Sol_Excel / HelpExcE

SOLVAY FLUOR UND DERIVATE GmbH
SOLKANE® PROPERTIES MODULE	Excel/VBA

Function SOL_sigma_l(ByVal Refr As String, ByVal T As Double) As Double ReturnVal = S_sigma_l(Refr, T, sigma_l)

End Function

Function SOL_lambda_l(ByVal Refr As String, ByVal T As Double) As Double ReturnVal = S_lambda_l(Refr, T, lambda_l)

End Function

Function SOL_lambda_v(ByVal Refr As String, ByVal T As Double, _ ByVal p As Double) As Double

ReturnVal = S_lambda_v(Refr, T, p, lambda_v) End Function

Function SOL_kappa(ByVal Refr As String, ByVal T As Double, _ ByVal p As Double) As Double

ReturnVal = S_kappa(Refr, T, p, kappa) End Function

Function SOL_kappa_v(ByVal Refr As String, ByVal T As Double, _ ByVal v As Double) As Double

ReturnVal = S_kappa_v(Refr, T, v, kappa_v) End Function

Function SOL_vs(ByVal Refr As String, ByVal T As Double, _ ByVal p As Double) As Double

ReturnVal = S_vs(Refr, T, p, vs) End Function

Function SOL_visc_l(ByVal Refr As String, ByVal T As Double) As Double ReturnVal = S_visc_l(Refr, T, visc_l)

End Function

Function SOL_visc_v(ByVal Refr As String, ByVal T As Double, _ ByVal p As Double) As Double

ReturnVal = S_visc_v(Refr, T, p, visc_v) End Function

-21-