summaryrefslogtreecommitdiff
path: root/569/CH4/EX4.17/4_17.sci
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /569/CH4/EX4.17/4_17.sci
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 '569/CH4/EX4.17/4_17.sci')
-rwxr-xr-x569/CH4/EX4.17/4_17.sci12
1 files changed, 12 insertions, 0 deletions
diff --git a/569/CH4/EX4.17/4_17.sci b/569/CH4/EX4.17/4_17.sci
new file mode 100755
index 000000000..dda4a31af
--- /dev/null
+++ b/569/CH4/EX4.17/4_17.sci
@@ -0,0 +1,12 @@
+// Calculate the maximum allowable time constant and phase shift
+clc;
+M=1-0.05;
+w=2*%pi*100;
+tc={[(1/M^2)-1]/(w^2)}^0.5;
+disp(tc,'maximum allowable time constant (s)')
+disp('phase shift at 50 Hz (degree)=')
+ph=[-atan(2*%pi*50*tc)]*(180/%pi);
+disp(ph,'')
+disp('phase shift at 100 Hz (degree)=')
+ph=[-atan(2*%pi*100*tc)]*(180/%pi);
+disp(ph,) \ No newline at end of file