diff options
Diffstat (limited to '3753/CH5/EX5.11')
-rw-r--r-- | 3753/CH5/EX5.11/Ex5_11.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3753/CH5/EX5.11/Ex5_11.sce b/3753/CH5/EX5.11/Ex5_11.sce new file mode 100644 index 000000000..59409b312 --- /dev/null +++ b/3753/CH5/EX5.11/Ex5_11.sce @@ -0,0 +1,17 @@ +//Example 5.11, Page number 5.30 + +clc;clear;close + +// variable declaration +n1=1.480 //unitless +n2=1.465 //unitless +V=2.405 //unitless +lamda=850*10**-9 // in m + +// Calculations +delta=(n1**2-n2**2)/(2*n1**2) //unitless +a=(V*lamda*10**-9)/(2*%pi*n1*sqrt(2*delta)) // in m + +// Results +printf("delta = %.2f",(delta)) +printf("\nCore radius,a = %.2f micro-m",(a*10**15)) |