summaryrefslogtreecommitdiff
path: root/3363/CH16/EX16.5
diff options
context:
space:
mode:
Diffstat (limited to '3363/CH16/EX16.5')
-rwxr-xr-x3363/CH16/EX16.5/Ex16_5.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3363/CH16/EX16.5/Ex16_5.sce b/3363/CH16/EX16.5/Ex16_5.sce
new file mode 100755
index 000000000..ba1741ead
--- /dev/null
+++ b/3363/CH16/EX16.5/Ex16_5.sce
@@ -0,0 +1,11 @@
+//Example 16.5, Page 591
+clc
+h=1.05*10^-34//j-s
+F=1.2
+T=10^3//in s
+m=.91*10^-30//in kg
+c=3*10^8//in m/s
+M=1
+beta_square=(2*%pi*%pi*%pi*(h^7))/(F*T*(m^5)*(c^4))
+beta=sqrt(beta_square)
+printf("\n The value of Beta is %e J^2*m^6",beta)