summaryrefslogtreecommitdiff
path: root/3710/CH6/EX6.3/Ex6_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3710/CH6/EX6.3/Ex6_3.sce')
-rw-r--r--3710/CH6/EX6.3/Ex6_3.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/3710/CH6/EX6.3/Ex6_3.sce b/3710/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..6f4ea9a27
--- /dev/null
+++ b/3710/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,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:")