257/CH4/EX4.4/example_4_4.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

syms V q L C R I phi

//T=J diff(diff(theta,t),t) + K*theta + B*diff(theta,t)

//F-V anolagy
T=V;
theta=q;
J=L;
K=1/C;
B=R;
disp("V= L*s*I + R*I + I/(s*C)")

//F-C anology

T=I;
theta=phi
disp("I= C*V*s + V/R + V/(s*L)")