{VERSION 4 0 "IBM INTEL NT" "4.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 1 12 0 0 255 1 0 2 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 16 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "R3 \+ Font 0" -1 256 1 {CSTYLE "" -1 -1 "Courier" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Times" 1 12 128 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Normal" -1 258 1 {CSTYLE "" -1 -1 "Times " 1 16 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 } {PSTYLE "Title" -1 259 1 {CSTYLE "" -1 -1 "Times" 1 36 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }3 1 0 0 12 12 3 0 3 0 2 2 19 1 }{PSTYLE "Normal" -1 260 1 {CSTYLE "" -1 -1 "Times" 1 18 255 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "restart: with(pldx): with(splines);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(sim ul):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "ever_loaded;" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "piecewise(x<1,1,x<3,9,4); pi e2mat(%);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "mp:= lin2mat(- 1,0,1,2,2,-1,3,0); mat_plo(mp);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 83 "piecewise(x<-1,0,x<3,1,0); mf:= pie2mat(%): mat_int(mf, x): mf := clin(1/%,mf,0,mf);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "pi ecewise(x<1,0,x<6,1,0); mg:= pie2mat(%): mat_int(mg, x): mg:= clin(1/% ,mg,0,mg);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 70 "lin2mat(-3,0, -2,1,3,0,4,1,5,0): mat_int(%, x): mh:= clin(1/%,%%,0,%%);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "glob_assu:= zolt, positive;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "mfg:= convol(mf,mg); mat_plo(mfg);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "mfgh:= convol(mfg,mh): mat_plo(mfgh );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "convol(mfgh,mfgh): pl 1:= mat_plo(%):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "ev:= map ([mat_var], [mf,mg,mh]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 88 "add(ev[j,1], j=1..3)*2, sqrt(add(ev[j,2], j=1..3)*2);\npl2:= plot(nor law(%,t), t=-7..27):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plo ts[display](pl1, pl2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }