SWkviscosity(283, 'K', 35, 'g/kg')
source('/media/neumannd/work_mn/65_R/sea_salt_emissions_NEW/src/sharqawy2010/SW_tools.R')
SWkviscosity(283, 'K', 35, 'g/kg')
SWkviscosity(280, 'K', 35, 'g/kg')
SWkviscosity(c(280, 283, 285, 290, 295), 'K', 35, 'g/kg')
SWkviscosity(c(280, 283, 285, 290, 295), 'K', c(35,35,35,35,35), 'g/kg')
SWkviscosity(rep(283,5), 'K', c(15, 20, 25, 30, 35, 40), 'g/kg')
SWkviscosity(rep(283,5), 'K', c(15, 20, 25, 30, 35), 'g/kg')
