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 /605/CH9 | |
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 '605/CH9')
-rwxr-xr-x | 605/CH9/EX9.10/9_10.sce | 27 | ||||
-rwxr-xr-x | 605/CH9/EX9.11/9_11.sce | 27 | ||||
-rwxr-xr-x | 605/CH9/EX9.12/9_12.sce | 11 | ||||
-rwxr-xr-x | 605/CH9/EX9.13/9_13.sce | 7 | ||||
-rwxr-xr-x | 605/CH9/EX9.2/9_2.sce | 12 | ||||
-rwxr-xr-x | 605/CH9/EX9.3/9_3.sce | 10 | ||||
-rwxr-xr-x | 605/CH9/EX9.4/9_4.sce | 14 | ||||
-rwxr-xr-x | 605/CH9/EX9.5/9_5.sce | 10 | ||||
-rwxr-xr-x | 605/CH9/EX9.6/9_6.sce | 22 | ||||
-rwxr-xr-x | 605/CH9/EX9.7/9_7.sce | 38 | ||||
-rwxr-xr-x | 605/CH9/EX9.8/9_8.sce | 22 | ||||
-rwxr-xr-x | 605/CH9/EX9.9/9_9.sce | 11 |
12 files changed, 211 insertions, 0 deletions
diff --git a/605/CH9/EX9.10/9_10.sce b/605/CH9/EX9.10/9_10.sce new file mode 100755 index 000000000..2a5d341b8 --- /dev/null +++ b/605/CH9/EX9.10/9_10.sce @@ -0,0 +1,27 @@ +
+fl=10*10^6
+fu=40*10^6
+Wu=2*%pi*40*10^6
+Wl=2*%pi*10*10^6
+gc=0.9662
+gL=0.62425
+Wo=2*%pi*20*10^6
+fo=sqrt(fl*fu)
+printf("\nfo=%.2e Hz",fo)
+
+CBP1=(Wu-Wl)/(Wo^2*gL)
+LBP1=gL/(Wu-Wl)
+printf("\nCBP1=%.3e F\nLBP1=%.4e H",CBP1,LBP1)
+
+CBP2=(Wu-Wl)/(Wo^2*gc)
+LBP2=gc/(Wu-Wl)
+printf("\nCBP2=%.3e F\nLBP2=%.4e H",CBP2,LBP2)
+
+
+printf("\nC1=C3=%.2f pF",19.122*1000/75)
+
+printf("\nL1=L3=%.4f nH",75*3.3116)
+
+printf("\nL2=%.4f uH",75*12.354/1000)
+
+printf("\nC2=%.3f pF",5.1258/75*1000)
diff --git a/605/CH9/EX9.11/9_11.sce b/605/CH9/EX9.11/9_11.sce new file mode 100755 index 000000000..c5ef832fd --- /dev/null +++ b/605/CH9/EX9.11/9_11.sce @@ -0,0 +1,27 @@ +
+fl=10*10^6
+fu=40*10^6
+Wu=2*%pi*40*10^6
+Wl=2*%pi*10*10^6
+gc=2
+gL=1
+Wo=2*%pi*20*10^6
+fo=sqrt(fl*fu)
+printf("\nfo=%.2e Hz",fo)
+
+CBP1=(Wu-Wl)/(Wo^2*gL)
+LBP1=gL/(Wu-Wl)
+printf("\nCBS1=%.3e F\nLBS1=%.4e H",CBP1,LBP1)
+LBP2=1/gc/(Wu-Wl)
+CBP2=(Wu-Wl)*gc/(Wo^2)
+
+printf("\nCBP2=%.3e F\nLBP2=%.4e H",LBP2,CBP2)
+
+
+printf("\nC1=C3=%.2f pF",5.305/75*1000)
+
+printf("\nL1=L3=%.4f nH",75*11.94)
+
+printf("\nL2=%.4f uH",75*2.653/1000)
+
+printf("\nC2=%.3f pF",23.87/75*1000)
diff --git a/605/CH9/EX9.12/9_12.sce b/605/CH9/EX9.12/9_12.sce new file mode 100755 index 000000000..9a1b735a7 --- /dev/null +++ b/605/CH9/EX9.12/9_12.sce @@ -0,0 +1,11 @@ +
+
+printf("\ngo=g4=1")
+n=3
+for p=1:1:3
+ gp=2*sin((2*p-1)*%pi/2/n)
+ printf("\ngp=%.2f",gp)
+end
+
+printf("\nQ1=Q3=%.4f rad=%.1f degree",50/150,50/150*180/%pi)
+printf("\nQ2=%.2f rad=%.2f degree",30*2/50,30*2/50*180/%pi)
diff --git a/605/CH9/EX9.13/9_13.sce b/605/CH9/EX9.13/9_13.sce new file mode 100755 index 000000000..3b70dba7e --- /dev/null +++ b/605/CH9/EX9.13/9_13.sce @@ -0,0 +1,7 @@ +
+n=3
+printf("\ngo=g4=1")
+for p=1:1:3
+ gp=2*sin((2*p-1)*%pi/2/n)
+ printf("\ngp=%.2f",gp)
+end
diff --git a/605/CH9/EX9.2/9_2.sce b/605/CH9/EX9.2/9_2.sce new file mode 100755 index 000000000..d0a7efa4b --- /dev/null +++ b/605/CH9/EX9.2/9_2.sce @@ -0,0 +1,12 @@ +
+foo=2.05*10^6
+fc=2*10^6
+Zo=75
+Wc=2*%pi*2*10^6
+L=Zo/Wc*2
+C=2/(Zo*Wc)
+m=sqrt(1-(fc/foo)^2)
+printf("\nm=%.4f",m)
+printf("\nm*L/2=%.2e H",m*L/2)
+printf("\nm*C=%.3e F",m*C)
+printf("\n(1-m^2)*L/4/m=%.2e",(1-m^2)*L/4/m)
\ No newline at end of file diff --git a/605/CH9/EX9.3/9_3.sce b/605/CH9/EX9.3/9_3.sce new file mode 100755 index 000000000..e3efcc14f --- /dev/null +++ b/605/CH9/EX9.3/9_3.sce @@ -0,0 +1,10 @@ +
+Zo=75
+Wc=2*%pi*2*10^6
+foo=2.05*10^6
+L=Zo/Wc*2
+m=0.6
+C=2/(Zo*Wc)
+printf("\nm*L/2=%.2e H",m*L/2)
+printf("\nm*C=%.3e F",m*C/2)
+printf("\n(1-m^2)*L/4/m=%.2e",(1-m^2)*L/2/m)
\ No newline at end of file diff --git a/605/CH9/EX9.4/9_4.sce b/605/CH9/EX9.4/9_4.sce new file mode 100755 index 000000000..2d336b438 --- /dev/null +++ b/605/CH9/EX9.4/9_4.sce @@ -0,0 +1,14 @@ +
+Zo=75
+Wc=2*%pi*2*10^6
+foo=1.95*10^6
+fc=2*10^6
+L=Zo/Wc/2
+C=1/2/(Zo*Wc)
+m=sqrt(1-(foo/fc)^2)
+printf("\nL=%.3e H",L)
+printf("\nC=%.3e F",C)
+printf("\nm=%.4f",m)
+printf("\n2*C/m=%.4e F",2*C/m)
+printf("\nL/m=%.4e H",L/m)
+printf("\n4*m*C/(1-m^2)=%.4e F",4*m*C/(1-m^2))
\ No newline at end of file diff --git a/605/CH9/EX9.5/9_5.sce b/605/CH9/EX9.5/9_5.sce new file mode 100755 index 000000000..f307046a9 --- /dev/null +++ b/605/CH9/EX9.5/9_5.sce @@ -0,0 +1,10 @@ +
+Le=3
+E=10^(Le/10)-1
+L=15
+Wc=1
+W=1.3*Wc
+n=1/2*(log10(10^(L/10)-1)-log10(E))/log10(W/Wc)
+m=acosh(sqrt(10^(0.1*L)-1))/acosh(W/Wc)
+printf("\nn=%.2f",n)
+printf("\nm=%.3f",m)
\ No newline at end of file diff --git a/605/CH9/EX9.6/9_6.sce b/605/CH9/EX9.6/9_6.sce new file mode 100755 index 000000000..0a741f5b6 --- /dev/null +++ b/605/CH9/EX9.6/9_6.sce @@ -0,0 +1,22 @@ +
+L=30
+W=40*10^6
+Wc=10*10^6
+Le=3
+E=10^(Le/10)
+Zo=50
+Wc=2*%pi*10^6*10
+L=Zo/Wc
+C=2/(Zo*Wc)
+n=1/2*(log10(10^(L/10)-1)-log10(E))/log10(W/Wc)
+printf("\nn=%.2f",n)
+printf("\ng1=%.0f\ng2=%.0f\ng3=%.0f",2*sin(%pi/6),2*sin(%pi/2),2*sin(%pi*5/6))
+printf("\n")
+printf("\nL1=L3=%.4e H",L)
+printf("\nC2=%.3e F",C)
+Zo=50
+Wc=2*%pi*10^6*10
+L=Zo*2/Wc
+C=1/(Zo*Wc)
+printf("\nL2=%.4e H",L)
+printf("\nC1=C3=%.4e F",C)
\ No newline at end of file diff --git a/605/CH9/EX9.7/9_7.sce b/605/CH9/EX9.7/9_7.sce new file mode 100755 index 000000000..fc55c51bc --- /dev/null +++ b/605/CH9/EX9.7/9_7.sce @@ -0,0 +1,38 @@ +
+Gr=0.01
+m=acosh(sqrt(10^(0.1*L)-1)/sqrt(10^(0.1*Gr-1)))/acosh(W/Wc)
+printf("\nm=%.0f\n",m)
+m=3
+E=log(coth(Gr/17.37))
+X=sinh(E/2/m)
+n=3
+gp=1
+
+for p=1:1:n
+ ap=sin((2*p-1)*%pi/2/m)
+ bp=X^2+sin(p*%pi/m)^2
+ printf("\nap=%.4f\nbp=%.4f\n",ap,bp)
+end
+gp=0.62425
+printf("\ng0=g4=1")
+printf("\np=1\tgp=0.62425")
+for p=2:1:n
+ gp=4*sin((2*(p-1)-1)*%pi/2/m)*sin((2*p-1)*%pi/2/m)/(X^2+sin((p-1)*%pi/m)^2)/gp
+ printf("\np=%.0f\tgp=%.5f",p,gp)
+end
+
+printf("\nL1=L3=%.4e H\nC1=%.4e F",75*0.62425/(2*%pi*10^8),0.9662/(75*2*%pi*10^8))
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/605/CH9/EX9.8/9_8.sce b/605/CH9/EX9.8/9_8.sce new file mode 100755 index 000000000..141477f27 --- /dev/null +++ b/605/CH9/EX9.8/9_8.sce @@ -0,0 +1,22 @@ +
+m=3
+for p=1:1:3
+ ap=sin((2*p-1)*%pi/2/m)
+ printf("\np=%.0f\tap=%.3f",p,ap)
+end
+Gr=3
+
+E=log(coth(Gr/17.37))
+X=sinh(E/2/m)
+printf("\nE=%.4f\nX=%.4f",E,X)
+for p=1:1:3
+ bp=X^2+sin(p*%pi/m)^2
+ printf("\np=%.0f\tbp=%.4f",p,bp)
+end
+gp=3.349
+printf("\ng0=g4=1\ng1=3.349")
+for p=2:1:3
+ gp=4*sin((2*(p-1)-1)*%pi/2/m)*sin((2*p-1)*%pi/2/m)/(X^2+sin((p-1)*%pi/m)^2)/gp
+ printf("\ngp=%.4f",gp)
+end
+printf("\nL1=L3=%.1e H\nC2=%.4e F",75*3.349/(2*%pi*10^8),0.7116/(75*2*%pi*10^8))
\ No newline at end of file diff --git a/605/CH9/EX9.9/9_9.sce b/605/CH9/EX9.9/9_9.sce new file mode 100755 index 000000000..b9dec16d0 --- /dev/null +++ b/605/CH9/EX9.9/9_9.sce @@ -0,0 +1,11 @@ +
+gL=0.62425
+gc=0.9662
+m=3
+Wc=2*%pi*100*10^6
+CHP=1/(Wc*gL)
+LHP=1/(Wc*gc)
+printf("\nCHP=%.3e F\nLHP=%.3e H",CHP,LHP)
+C1=2.5495/75*10^3
+L2=75*1.6472
+printf("\nC1=C3=%.0f pF\nL2=%.1f nH",C1,L2)
\ No newline at end of file |