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 /1109/CH15/EX15.12/15_12.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 '1109/CH15/EX15.12/15_12.sce')
-rwxr-xr-x | 1109/CH15/EX15.12/15_12.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/1109/CH15/EX15.12/15_12.sce b/1109/CH15/EX15.12/15_12.sce new file mode 100755 index 000000000..fadea0e44 --- /dev/null +++ b/1109/CH15/EX15.12/15_12.sce @@ -0,0 +1,21 @@ +clear;
+clc;
+R0=600;D=10;b=10/6;fr=8.5*(10^3);
+k=round((10^(D/20)*100))/100;
+fb=fr/b;
+Cb=1/(2*%pi*fb*R0);
+Lb=R0/(2*%pi*fb);
+printf("The desired bridged-T constant resistance equalizer will be as:\n");
+printf("-Ro = %f ohms\n",R0);
+L1=Lb*((k-1)/sqrt(k))*(((b*b)-1)/(b*b));
+printf("-L1 = %f Henry\n",round(L1*10^4)/10^4);
+C1=Cb*(sqrt(k)/(k-1))*(1/((b*b)-1));
+printf("-C1 = %f microfarads\n",round(C1*(10^10))/10^4);
+L2=Lb*((sqrt(k))/(k-1))*(1/((b*b)-1));
+printf("-L2 = %f Henry\n",round(L2*10^5)/10^5);
+C2=Cb*((k-1)/sqrt(k))*(((b*b)-1)/(b*b));
+printf("-C2 = %f microfarads\n",round(C2*(10^10))/10^4);
+R1=R0*(k-1);
+printf("-R1 = %f ohms\n",round(R1));
+R2=R0/(k-1);
+printf("-R2 = %f ohms",round(R2));
|