summaryrefslogtreecommitdiff
path: root/1109/CH16/EX16.8
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1109/CH16/EX16.8
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 '1109/CH16/EX16.8')
-rwxr-xr-x1109/CH16/EX16.8/16_8.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/1109/CH16/EX16.8/16_8.sce b/1109/CH16/EX16.8/16_8.sce
new file mode 100755
index 000000000..7e68bdaef
--- /dev/null
+++ b/1109/CH16/EX16.8/16_8.sce
@@ -0,0 +1,16 @@
+clear;
+clc;
+D=10;Ri1=150;Ri2=75;
+Ai=D*0.115;
+R3=(sqrt(Ri1*Ri2))/sinh(Ai);
+R2=(Ri2/tanh(Ai))-R3;
+R1=(Ri1/tanh(Ai))-R3;
+printf("The desired elements of T-pad are:\n");
+printf(" R1 = %f ohms\n",round(R1*100)/100);
+printf(" R2 = %f ohms\n",round(R2*10)/10);
+printf(" R3= %f ohms\n\n",fix(R3*100)/100);
+R2a=sqrt((Ri1*Ri2*Ri2)/(Ri1-Ri2));
+R1a=sqrt(Ri1*(Ri1-Ri2));
+printf("The minimum loss pad will be a L attenuator:\n");
+printf(" R1 = %f ohms\n",round(R1a));
+printf(" R2 = %f ohms\n",round(R2a));