summaryrefslogtreecommitdiff
path: root/1979/CH11
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1979/CH11
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1979/CH11')
-rwxr-xr-x1979/CH11/EX11.1/Ex11_1.sce22
-rwxr-xr-x1979/CH11/EX11.2/Ex11_2.sce22
-rwxr-xr-x1979/CH11/EX11.3/Ex11_3.sce22
-rwxr-xr-x1979/CH11/EX11.4/Ex11_4.sce29
-rwxr-xr-x1979/CH11/EX11.5/Ex11_5.sce23
-rwxr-xr-x1979/CH11/EX11.6/Ex11_6.sce17
6 files changed, 135 insertions, 0 deletions
diff --git a/1979/CH11/EX11.1/Ex11_1.sce b/1979/CH11/EX11.1/Ex11_1.sce
new file mode 100755
index 000000000..013678474
--- /dev/null
+++ b/1979/CH11/EX11.1/Ex11_1.sce
@@ -0,0 +1,22 @@
+//chapter-11 page 504 example 11.1
+//==============================================================================
+clc;
+clear;
+
+//For a radar system
+Pt=600000;//peak pulse power in W
+Smin=10^(-13);//minimum detectable signal in W
+Ae=5;//cross sectional area of the radar antenna in sq m
+w=0.03;//wavelength in m
+s=20;//radar cross sectional area in sq m
+
+//CALCULATION
+Rmax=(((Pt*s*Ae^2)/(4*(%pi)*Smin*w^2))^(1/4))/1000;//Maximum range of a radar system in km
+RMax=Rmax/1.853;//In nautical miles; 1 nm=1.853 km
+
+//OUTPUT
+mprintf('\nMaximum range of a radar system is Rmax=%3.3f km',Rmax);
+disp('In nautical miles; 1 nm=1.853 km');
+mprintf('\nMaximum range of a radar system in nautical miles is RMax=%3.0f nm',RMax);
+
+//=========================END OF PROGRAM===============================
diff --git a/1979/CH11/EX11.2/Ex11_2.sce b/1979/CH11/EX11.2/Ex11_2.sce
new file mode 100755
index 000000000..6ba519ae0
--- /dev/null
+++ b/1979/CH11/EX11.2/Ex11_2.sce
@@ -0,0 +1,22 @@
+//chapter-11 page 504 example 11.2
+//==============================================================================
+clc;
+clear;
+
+//For a radar system
+Pt=250000;//peak transmitted power in W
+G=2500;//power gain of the antenna
+Smin=10^(-14);//minimum detectable signal in W
+Ae=10;//cross sectional area of the radar antenna in sq m
+f=10*10^9;//frequency of radar in Hz
+s=2;//radar cross sectional area in sq m
+c=3*10^8;//Velocity of light in m/sec
+
+//CALCULATION
+w=c/f;//wavelength in m
+Rmax=(((Pt*G*Ae*s)/(Smin*(4*(%pi))^2))^(1/4))/1000;//Maximum range of a radar system in km
+
+//OUTPUT
+mprintf('\nMaximum range of a radar system is Rmax=%3.2f km',Rmax);
+
+//=========================END OF PROGRAM===============================
diff --git a/1979/CH11/EX11.3/Ex11_3.sce b/1979/CH11/EX11.3/Ex11_3.sce
new file mode 100755
index 000000000..053cf7868
--- /dev/null
+++ b/1979/CH11/EX11.3/Ex11_3.sce
@@ -0,0 +1,22 @@
+//chapter-11 page 504 example 11.3
+//==============================================================================
+clc;
+clear;
+
+//For a marine radar system
+Pt=250000;//peak transmitted power in W
+G=4000;//power gain of the antenna
+R=50000;//maximum range of radar in m
+Pr=10^(-11);//minimum detectable signal in W
+f=10*10^9;//frequency of radar in H
+c=3*10^8;//Velocity of light in m/sec
+
+//CALCULATION
+w=c/f;//wavelength in m
+Ae=((G*w^2)/(4*(%pi)));//cross sectional area of the radar antenna in sq m
+s=((Pr*(4*(%pi)*R^2)^2)/(Pt*G*Ae));//The cross section of the target the radar can sight in sq m
+
+//OUTPUT
+mprintf('\nThe cross section of the target the radar can sight is s=%2.2f sq m',s);
+
+//=========================END OF PROGRAM===============================
diff --git a/1979/CH11/EX11.4/Ex11_4.sce b/1979/CH11/EX11.4/Ex11_4.sce
new file mode 100755
index 000000000..6cb3c2a3a
--- /dev/null
+++ b/1979/CH11/EX11.4/Ex11_4.sce
@@ -0,0 +1,29 @@
+//chapter-11 page 505 example 11.4
+//==============================================================================
+clc;
+clear;
+
+//For a guided missile tracking radar
+Pt=400000;//transmitted power in W
+prf=1500;//pulse repitition frequency in pps(pulse per sec)
+tw=0.8*10^(-6);//pulse width in sec
+c=3*10^8;//Velocity of light in m/sec
+
+//CALCULATION
+Runamb=(c/(2*prf))/1000;//Unambiguous range in km
+dc=tw/(1/prf);//Duty cycle
+Pav=Pt*dc;//Average power in W
+n1=1;
+BW1=(n1/tw)/10^6;//Suitable BW in MHz for n=1
+n2=1.4;
+BW2=(n2/tw)/10^6;//Suitable BW in MHz for n=1.4
+
+//OUTPUT
+mprintf('\nUnambiguous range is Runamb=%3.0f km \nDuty cycle is dc=%1.4f \nAverage power is Pav=%3.0f W',Runamb,dc,Pav);
+disp('For efficiency n=1,suitable bandwidth in MHz is');
+disp(BW1);
+disp('For efficiency n=1.4,suitable bandwidth in MHz is');
+disp(BW2);
+
+//=========================END OF PROGRAM===============================
+
diff --git a/1979/CH11/EX11.5/Ex11_5.sce b/1979/CH11/EX11.5/Ex11_5.sce
new file mode 100755
index 000000000..938a93d33
--- /dev/null
+++ b/1979/CH11/EX11.5/Ex11_5.sce
@@ -0,0 +1,23 @@
+//chapter-11 page 505 example 11.5
+//==============================================================================
+clc;
+clear;
+
+//For a military radar
+Pt=2500000;//power output in W
+f=5*10^9;//frequency of radar in H
+c=3*10^8;//Velocity of light in m/sec
+D=5;//antenna diameter in m
+B=1.6*10^6;//receiver bandwidth in Hz
+s=1;//radar cross sectional area in sq m
+NF=12;//noise figure in dB
+
+//CALCULATION
+w=c/f;//wavelength in m
+F=10^(NF/10);//noise figure
+Rmax=(48*((Pt*s*D^4)/(B*(F-1)*w^2))^(1/4));//Maximum detection range in km
+
+//OUTPUT
+mprintf('\nMaximum detection range of a radar is Rmax=%3.0f km',Rmax);
+
+//=========================END OF PROGRAM===============================
diff --git a/1979/CH11/EX11.6/Ex11_6.sce b/1979/CH11/EX11.6/Ex11_6.sce
new file mode 100755
index 000000000..06630ef71
--- /dev/null
+++ b/1979/CH11/EX11.6/Ex11_6.sce
@@ -0,0 +1,17 @@
+//chapter-11 page 506 example 11.6
+//==============================================================================
+clc;
+clear;
+
+//For a civilian radar
+Rmax=30;//maximum range in kms
+x=50;
+y=2;
+disp('Maximum range with an equivalent echoing area of 50 times in kms is');
+R=Rmax*x^(1/4);
+disp(R);
+disp('Range would be increased if Tx power is doubled by a factor of');
+f=y^(1/4);
+disp(f);
+
+//=========================END OF PROGRAM===============================