summaryrefslogtreecommitdiff
path: root/257/CH10/EX10.3/example_10_3.sce
blob: a5a181fec5a5c058b04051ff7a9b2e5991c0d715 (plain)
1
2
3
4
5
6
7
8
9
10

s=%s;
G=10/(s*(s+10))
T=G/(1+G)
disp(T,"T = ")

//compare A*sin(w*t) and 10*sin(8*t)
A=10;
w=8;
disp("c(t) = A*10/(sqrt((10-w^2)^2 + 100*w))*(sin(8*t-atan(10*w/(10-w^2))))")