blob: 4c637c44dea3d19ae27fc9a326883c6b216ffd07 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
//Example 4.4.1
//windows 7
//Scilab version-6.0.0
clc;
clear;
//given
d=62.5E-6;//core diameter in SI units
D=125E-6;//cladding diameter in SI units
NA=0.275;//numerical aperture
lambda=1300E-9;//operating wavelength lambda in m
x=3.14*d*NA;
V=x/lambda;
PcladbyPtotal=2*sqrt(2)/(3*V)//Power carried by fiber cladding
mprintf("\nPower carried by fiber cladding = %.3f",PcladbyPtotal);
|
