diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2411/CH8/EX8.1/Ex8_1.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '2411/CH8/EX8.1/Ex8_1.sce')
-rwxr-xr-x | 2411/CH8/EX8.1/Ex8_1.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/2411/CH8/EX8.1/Ex8_1.sce b/2411/CH8/EX8.1/Ex8_1.sce new file mode 100755 index 000000000..490d0ace4 --- /dev/null +++ b/2411/CH8/EX8.1/Ex8_1.sce @@ -0,0 +1,17 @@ +// Scilab Code Ex8.1: Page-397 (2008) +clc; clear; +lambda = 6000e-008; // Wavelength of the lase beam, cm +P = 10e-003; // Power of the laser beam, W +theta = 1.5e-004; // Angular spread of laser beam, rad +f = 10; // Focal length of the lens, cm +r = f*theta; // Radius of the image, cm +rho = P/(%pi*r^2*1e+003); // Power density of the image, kW/Sq.cm +L_w = lambda/(theta/10); // Coherence width, mm +printf("\nThe radius of the image = %3.1e cm", r); +printf("\nThe power density of the image = %3.1f kW/Sq.cm", rho); +printf("\nThe coherence width = %d mm", L_w); + +// Result +// The radius of the image = 1.5e-03 cm +// The power density of the image = 1.4 kW/Sq.cm +// The coherence width = 4 mm |