1 files changed, 15 insertions, 0 deletions
diff --git a/49/CH7/EX7.2/ex2.sce b/49/CH7/EX7.2/ex2.sce
new file mode 100755
index 000000000..9053b0bee
--- /dev/null
+++ b/49/CH7/EX7.2/ex2.sce
@@ -0,0 +1,15 @@
+//CHAPTER 7_ Flow Measurement
+//Caption : Anemometers
+// Example 2// Page 426
+// To derive an expression for velocity across a hot  wire anemometer in terms of the wire resistance Rw, the current through the wire Iw and the empirical constants C0 and C1 and the fluid temperature.
+disp("C0+C1(v)^.5)(Tw-Tf)=Iw^2Rw")
+disp("Rw= Rr[1+a(Tw-Tr)]")
+disp("Rw/Rr=1+a(Tw-Tr)")
+disp("Tw-Tr=1/a[Rw/Rr-1]")
+disp("Tw=1/a[Rw/Rr-1]+Tr")
+disp("Co+C1(v)^0.5=Iw^2Rw/Tw-Tf")
+disp("so,")
+disp("v=1/C1[{Iw^2Rw/(1/a[Rw/Rr-1]+Tr-Tf)]}^2-C0")
+
+
+