restart; readlib (unassign): read (`data.map`); read (`procs.map`); tstart := 0: tfinal := 0.050: i := rectify_solve (array(1..2,[0,0]), tstart..tfinal): ig := unapply(i[1](t)+i[2](t),t): ug := unapply(R3*ig(t) + L3*diff(ig(t),t),t): plot (i[1], tstart..tfinal, title=`Plot 1: i1(t)`); plot (i[2], tstart..tfinal, title=`Plot 2: i2(t)`); plot (ig, tstart..tfinal, title=`Plot 3: ig(t)`); plot (ug, tstart..tfinal, title=`Plot 4: ug(t)`);