summaryrefslogtreecommitdiff
path: root/3411/CH7/EX7.5/Ex7_5.sce
blob: 4ba7f0be2125eb233bc4e9a8137c801f4c57a969 (plain)
1
2
3
4
5
6
7
8
9
//Example 7_5
clc();
clear;
//To find the loss specification of a fiber
l=0.5       //units in KM
it=7.5*10^-6      //units in micro mts
i0=8.6*10^-6       //units in micro mts
alpha=(10/l)*log10(it/i0) //units in db/Km
printf("The loss specification of the fiber is alpha=%.2f db/km",alpha)