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 /728/CH3/EX3.10 | |
| 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 '728/CH3/EX3.10')
| -rwxr-xr-x | 728/CH3/EX3.10/Ex3_10.sce | 22 | ||||
| -rwxr-xr-x | 728/CH3/EX3.10/Ex3_10.txt | 26 | ||||
| -rwxr-xr-x | 728/CH3/EX3.10/Ex3_10_ans.txt | 12 |
3 files changed, 60 insertions, 0 deletions
diff --git a/728/CH3/EX3.10/Ex3_10.sce b/728/CH3/EX3.10/Ex3_10.sce new file mode 100755 index 000000000..6c0280f50 --- /dev/null +++ b/728/CH3/EX3.10/Ex3_10.sce @@ -0,0 +1,22 @@ +//Caption:Calculate the charcterstic impedance & phase velocity
+//Exa:3.10
+clc;
+clear;
+close;
+e=2.718;
+f=1000;//in Hz
+l=10000;//in meters
+Z_sc=(2631+%i*1289);//in ohms
+Z_oc=(221-%i*137);//in ohms
+Z_o=[Z_sc*Z_oc]^0.5;
+Z_mag=[real(Z_o)^2+imag(Z_o)^2]^0.5;
+Z_ang=[atan((imag(Z_o))/real(Z_o))]*180/%pi;
+disp(Z_mag,"Characteristic impedance (in ohms) =");
+disp(Z_ang,"Angle (in degrees) =");
+x=[(Z_oc/Z_sc)^0.5];
+//x=tanh(v*l)
+//As, tanh(t)=[e^t-e^-t]/[e^t+e^-t]
+v=(261+%i*2988)/l;
+a=real(v);
+b=imag(v);
+disp(2*%pi*f/b,"Phase velocity (in meter per sec.) =");
\ No newline at end of file diff --git a/728/CH3/EX3.10/Ex3_10.txt b/728/CH3/EX3.10/Ex3_10.txt new file mode 100755 index 000000000..eb7d10e35 --- /dev/null +++ b/728/CH3/EX3.10/Ex3_10.txt @@ -0,0 +1,26 @@ +//Caption:Calculate the charcterstic impedance & phase velocity
+//Exa:3.10
+clc;
+clear;
+close;
+e=2.718;
+f=1000;//in Hz
+l=10000;//in meters
+Z_sc=(2631+%i*1289);//in ohms
+Z_oc=(221-%i*137);//in ohms
+Z_o=[Z_sc*Z_oc]^0.5;
+Z_mag=[real(Z_o)^2+imag(Z_o)^2]^0.5;
+Z_ang=[atan((imag(Z_o))/real(Z_o))]*180/%pi;
+disp(Z_mag,"Characteristic impedance (in ohms) =");
+disp(Z_ang,"Angle (in degrees) =");
+x=[(Z_oc/Z_sc)^0.5];
+//x=tanh(v*l)
+//As, tanh(t)=[e^t-e^-t]/[e^t+e^-t]
+v=(261+%i*2988)/l;
+a=real(v);
+b=imag(v);
+disp(2*%pi*f/b,"Phase velocity (in meter per sec.) =");
+
+
+
+
diff --git a/728/CH3/EX3.10/Ex3_10_ans.txt b/728/CH3/EX3.10/Ex3_10_ans.txt new file mode 100755 index 000000000..e19688f2b --- /dev/null +++ b/728/CH3/EX3.10/Ex3_10_ans.txt @@ -0,0 +1,12 @@ +Characteristic impedance (in ohms) =
+
+ 872.81286
+
+ Angle (in degrees) =
+
+ - 2.846825
+
+ Phase velocity (in meter per sec.) =
+
+ 21028.063
+
|