diff options
Diffstat (limited to '1271/CH5/EX5.12/example5_12.sce')
| -rwxr-xr-x | 1271/CH5/EX5.12/example5_12.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/1271/CH5/EX5.12/example5_12.sce b/1271/CH5/EX5.12/example5_12.sce new file mode 100755 index 000000000..c2e476418 --- /dev/null +++ b/1271/CH5/EX5.12/example5_12.sce @@ -0,0 +1,10 @@ +clc +// Given that +L = 0.1 // length of fiber in km +p = 5e-6 // power of signal in watt +p_ = 1e-6 // power of signal inside the fiber in watt +// Sample Problem 12 on page no. 5.20 +printf("\n # PROBLEM 12 # \n") +alpha = (10 * log10(p / p_)) / L//calculation for absorption coefficient +printf("\n Standard formula used \n alpha=10/L*log(Pi/Po).\n") +printf("\n Absorption coefficient = %f dB/km. ",alpha) |