summaryrefslogtreecommitdiff
path: root/1535/CH11/EX11.5/Ch11Ex5.sci
diff options
context:
space:
mode:
Diffstat (limited to '1535/CH11/EX11.5/Ch11Ex5.sci')
-rwxr-xr-x1535/CH11/EX11.5/Ch11Ex5.sci14
1 files changed, 14 insertions, 0 deletions
diff --git a/1535/CH11/EX11.5/Ch11Ex5.sci b/1535/CH11/EX11.5/Ch11Ex5.sci
new file mode 100755
index 000000000..290632dfa
--- /dev/null
+++ b/1535/CH11/EX11.5/Ch11Ex5.sci
@@ -0,0 +1,14 @@
+// Scilab Code Ex11.5: Page-251 (2010)
+h = 6.626e-034; // Planck's constant, Js
+c = 3e+08; // Speed of light in free space, m/s
+lambda = 1064e-009; // Wavelength of laser light, m
+P = 0.8; // Average power output per laser pulse, W
+dt = 25e-003; // Pulse width of laser, s
+E = P*dt; // Energy released per pulse, J
+N = E/(h*c/lambda); // Number of photons in a pulse
+printf("\nThe energy released per pulse = %2.0e J", E);
+printf("\nThe number of photons in a pulse = %4.2e", N);
+
+// Result
+// The energy released per pulse = 2e-002 J
+// The number of photons in a pulse = 1.07e+017 \ No newline at end of file