"R-Kreis:"

U_A(t):=u*SIN(omega*t)

U_R(t,i):=r*i

U_A(t)=U_R(t,i)

;L”se(#4,i)
[i=u*SIN(omega*t)/r]

"______________________________"

"C-kreis:"

Q(t,u):=c*u

;Benutzer=Vereinfache(Benutzer)
Q(t,U_A(t))=c*u*SIN(omega*t)

I(t):=Q'(t,U_A(t))

;Vereinfache(#10)
c*omega*u*COS(omega*t)

"______________________________"

"L-Kreis:"

U_I(t,i1):=-l*i1

0=U_A(t)+U_I(t,i1)

i1=u*SIN(omega*t)/l

I(t):=INT(u*SIN(omega*t)/l,t)

;Vereinfache(#17)
-u*COS(omega*t)/(l*omega)