/* viscosity of water (Poise) from 16 - 40 degrees C */
double vis[] = {0.0111,0.01082,0.01056,0.01030,0.01005,
		0.00981,0.00958,0.00936,0.00914,0.00894,
		0.00874,0.00855,0.00836,0.00818,0.00801,
		0.00784,0.00768,0.00752,0.00737,0.00723,
		0.00709,0.00695,0.00681,0.00669,0.00656};

/* specific gravity (g/cc) water from 16-40 degrees C */
double sp0[] = {0.999,0.999,0.999,0.998,0.998,
		0.998,0.998,0.998,0.997,0.997,
		0.997,0.997,0.996,0.996,0.996,
		0.995,0.995,0.995,0.994,0.994,
		0.994,0.993,0.993,0.993,0.992};