Ethanol viscosity

Signed-off-by: Ian Bell <ian.h.bell@gmail.com>

dev/fluids/Ethanol.json

@@ -349,5 +349,117 @@
       "rhoVtriple_units": "mol/m^3"
     }
   ], 
-  "NAME": "Ethanol"
+  "NAME": "Ethanol", 
+  "TRANSPORT": {
+    "BibTeX": "Kiselev-IECR-2005", 
+    "epsilon_over_k": 362.6, 
+    "epsilon_over_k_units": "K", 
+    "sigma_eta": 4.53e-10, 
+    "sigma_eta_units": "m", 
+    "viscosity": {
+      "dilute": {
+        "a": [
+          -1.03116e-06, 
+          3.48379e-08, 
+          -6.50264e-12
+        ], 
+        "t": [
+          0, 
+          1, 
+          2
+        ], 
+        "type": "powers_of_T"
+      }, 
+      "higher_order": {
+        "T_reduce": 513.9, 
+        "T_reduce_units": "K", 
+        "a": [
+          0.000131194057, 
+          -0.000382240694, 
+          -8.05700894e-05, 
+          0.000153811778, 
+          -0.000110578307
+        ], 
+        "d1": [
+          2, 
+          2, 
+          3, 
+          3, 
+          3
+        ], 
+        "d2": [
+          1
+        ], 
+        "f": [
+          0.0237222995
+        ], 
+        "g": [
+          -3.38264465, 
+          12.7568864
+        ], 
+        "gamma": [
+          0, 
+          0, 
+          0, 
+          0, 
+          0
+        ], 
+        "h": [
+          0, 
+          -0.5
+        ], 
+        "l": [
+          1, 
+          1, 
+          1, 
+          1, 
+          1
+        ], 
+        "p": [
+          1
+        ], 
+        "q": [
+          0
+        ], 
+        "rhomolar_reduce": 5991, 
+        "rhomolar_reduce_units": "mol/m^3", 
+        "t1": [
+          0, 
+          1, 
+          0, 
+          1, 
+          2
+        ], 
+        "t2": [
+          0
+        ], 
+        "type": "modified_Batschinski_Hildebrand"
+      }, 
+      "initial_density": {
+        "b": [
+          -19.572881, 
+          219.73999, 
+          -1015.3226, 
+          2471.01251, 
+          -3375.1717, 
+          2491.6597, 
+          -787.26086, 
+          14.085455, 
+          -0.34664158
+        ], 
+        "t": [
+          0, 
+          -0.25, 
+          -0.5, 
+          -0.75, 
+          -1.0, 
+          -1.25, 
+          -1.5, 
+          -2.5, 
+          -5.5
+        ], 
+        "type": "Rainwater-Friend"
+      }
+    }
+  }
 }

src/Tests/CoolProp-Tests.cpp

@@ -52,6 +52,12 @@ vel("R134a", "T", 185, "Q", 1, "V", 7.4290821400170869e-006, 1e-3),
 vel("R134a", "T", 360, "Q", 0, "V", 7.8146319978982133e-005, 1e-3),
 vel("R134a", "T", 360, "Q", 1, "V", 1.7140264998576107e-005, 1e-3),
 
+// From REFPROP 9.1 since Kiselev, IECR, 2005 does not provide validation data
+vel("Ethanol", "T", 300, "Q", 0, "V", 0.0010439017679191723, 1e-3),
+vel("Ethanol", "T", 300, "Q", 1, "V", 8.8293820936046416e-006, 1e-3),
+vel("Ethanol", "T", 500, "Q", 0, "V", 6.0979347125450671e-005, 1e-3),
+vel("Ethanol", "T", 500, "Q", 1, "V", 1.7229157141572511e-005, 1e-3),
+
 // From Meng 2012 experimental data (note erratum in BibTeX file)
 vel("DimethylEther", "T", 253.146, "Dmass", 734.28, "V", 0.20444e-3, 3e-3),
 vel("DimethylEther", "T", 373.132, "Dmass", 613.78, "V", 0.09991e-3, 3e-3),