summaryrefslogtreecommitdiff
path: root/1026/CH12/EX12.2/Example12_2.sce
diff options
context:
space:
mode:
Diffstat (limited to '1026/CH12/EX12.2/Example12_2.sce')
-rwxr-xr-x1026/CH12/EX12.2/Example12_2.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/1026/CH12/EX12.2/Example12_2.sce b/1026/CH12/EX12.2/Example12_2.sce
new file mode 100755
index 000000000..a9d5983f0
--- /dev/null
+++ b/1026/CH12/EX12.2/Example12_2.sce
@@ -0,0 +1,15 @@
+//chapter12,Example12_2,pg 357
+
+lam=1*10^-6//wavelength
+
+n1=1.53
+
+n2=1.5
+
+NA=sqrt((n1^2)-(n2^2))
+
+a=(2.405*lam)/(2*%pi*NA)
+
+printf("core radius\n")
+
+printf("a=%.8f m",a) \ No newline at end of file