diff options
Diffstat (limited to '3689/CH17/EX17.8/17_8.sce')
-rw-r--r-- | 3689/CH17/EX17.8/17_8.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3689/CH17/EX17.8/17_8.sce b/3689/CH17/EX17.8/17_8.sce new file mode 100644 index 000000000..7b568100a --- /dev/null +++ b/3689/CH17/EX17.8/17_8.sce @@ -0,0 +1,14 @@ +////
+//Variable Declaration
+eta = 0.891 //Viscosity of hemoglobin in water, cP
+T = 298.0 //Temperature, K
+k = 1.3806488e-23 //Boltzmanconstant,J K^-1
+R = 8.314 //Molar Gas constant, mol^-1 K^-1
+D = 6.9e-11 //Diffusion coefficient, m2/s
+
+//Calculations
+r = k*T/(6*%pi*eta*1e-3*D)
+
+//Results
+printf("\n Radius of protein is %4.3f nm",r/1e-9)
+
|