summaryrefslogtreecommitdiff
path: root/3710/CH6/EX6.3/Ex6_3.sce
blob: 6f4ea9a273c3782dbfde9e7de1492ef87bb3e09c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example 6.3, Page Number 256
//Power in Q-switched pulses 
clc;

//Using the Energy of the pulses from the previous example(Ex6.2)
E=1.657 //Energy of the pulses in Joules
l=0.1 //Cavity length in meter
r=0.8 //Mirror reflectance
c=3*(10**8) //Speed of light in meters per second

tc=l/((1-r)*c) //tc is the cavity lifetime

P=E/tc //P is the pulse power

disp(tc,"The Cavity Lifetime in s is:")
disp(P," The Pulse Power in W is:")