From b984de35bb944058ccba138f68fa8d931bde1f00 Mon Sep 17 00:00:00 2001
From: Ian Bell <ian.h.bell@gmail.com>
Date: Sun, 30 Aug 2015 00:54:59 -0600
Subject: [PATCH] Fit ECS curves for viscosity for R1234yf and R1234ze(E);
 closes #746

---
 dev/fluids/R1234yf.json    | 24 ++++++++++++++++++++++++
 dev/fluids/R1234ze(E).json | 24 ++++++++++++++++++++++++
 2 files changed, 48 insertions(+)

diff --git a/dev/fluids/R1234yf.json b/dev/fluids/R1234yf.json
index 184e0bc2..46b880ba 100644
--- a/dev/fluids/R1234yf.json
+++ b/dev/fluids/R1234yf.json
@@ -527,6 +527,30 @@
         ], 
         "type": "polynomial"
       }
+    }, 
+    "viscosity": {
+      "BibTeX": "BELL-PERSONAL-2015", 
+      "_note": "Fit based on the data of Zhao, JCED, 2014: doi: 10.1021/je5001457", 
+      "epsilon_over_k": 281.14, 
+      "epsilon_over_k_units": "K", 
+      "psi": {
+        "a": [
+          0.17682139, 
+          0.74500256, 
+          -0.16912621
+        ], 
+        "rhomolar_reducing": 4170.0, 
+        "rhomolar_reducing_units": "mol/m^3", 
+        "t": [
+          0, 
+          1, 
+          2
+        ]
+      }, 
+      "reference_fluid": "R134a", 
+      "sigma_eta": 5.328e-10, 
+      "sigma_eta_units": "m", 
+      "type": "ECS"
     }
   }
 }
\ No newline at end of file
diff --git a/dev/fluids/R1234ze(E).json b/dev/fluids/R1234ze(E).json
index 092c888a..2184048d 100644
--- a/dev/fluids/R1234ze(E).json
+++ b/dev/fluids/R1234ze(E).json
@@ -735,6 +735,30 @@
         ], 
         "type": "polynomial"
       }
+    }, 
+    "viscosity": {
+      "BibTeX": "BELL-PERSONAL-2015", 
+      "_note": "Fit based on the data of Zhao, JCED, 2014: doi: 10.1021/je5001457", 
+      "epsilon_over_k": 292.11, 
+      "epsilon_over_k_units": "K", 
+      "psi": {
+        "a": [
+          0.77371022, 
+          0.16492734, 
+          -0.02851852
+        ], 
+        "rhomolar_reducing": 4290, 
+        "rhomolar_reducing_units": "mol/m^3", 
+        "t": [
+          0, 
+          1, 
+          2
+        ]
+      }, 
+      "reference_fluid": "R134a", 
+      "sigma_eta": 5.017e-10, 
+      "sigma_eta_units": "m", 
+      "type": "ECS"
     }
   }
 }
\ No newline at end of file