summaryrefslogtreecommitdiff
path: root/3834/CH2/EX2.3.1/Ex2_3_1.sce
blob: dc7ee3329b9cfb663886021da1500102b39c1939 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner 
//Example 2.3.1
//OS=Windows 10
////Scilab version Scilab 6.0.0-beta-2(64 bit)
clc;
clear;

//given
lambda=650E-9;//wavelength in meter
h=6.6E-34;//Planck's constant in SI units
c=3E8;//velocity of light in m/s

Ep=(h*c/lambda);//energy of single photon in V
E=1e-3;///total energy in joules
N=(E/Ep);//number of photos
mprintf("\n Number of photons=%.1f x10^15 ",N/1e15);//division by 1e15 to convert the unit to x10^15