path: root/257/CH3/EX3.1/example_3_1.sce

//applying KVL we have Vi(t) = R*i(t) + 1/C * int(i(t)) dt
//                     Vo(t) = 1/C * int(i(t)) dt

syms s R C I
Vi= R*I + I/(s*C)   
Vo = I/(C*s)

disp(Vo/Vi,"transfer function=")