{VERSION 1 0 "X11/Motif" "1.0"}{GLOBALS 3 1}{FONT 0 "-adobe-helve
tica-bold-r-normal--*-140-*" "helvetica" "Helvetica-Bold" 8 14 0 
"Helvetica-Bold" 12}{FONT 1 "-adobe-times-medium-r-normal--*-140-
*" "times" "Times-Roman" 4 14 64 "Times-Roman" 12}{FONT 2 "-adobe
-courier-medium-r-normal--*-140-*" "courier" "Courier" 4 14 192 "
Courier" 12}{SCP_R 1 0 16{INP_R 2 0 "> "{TEXT 0 76 "A:=plot(t*exp
(-t),t=0..5,color=cyan,style=point, symbol=circle,thickness=3):"}
}{SEP_R 3 0}{INP_R 4 0 "> "{TEXT 0 64 "s1:=\{exp(-t)*sinh(t*i/10)
/(i/10) $ i=1..10\}: B:=plot(s1,t=0..5):"}}{SEP_R 5 0}{INP_R 6 0 
"> "{TEXT 0 3 "s1;"}}{OUT_R 7 0 6{DAG %2,B*5(3n3\`exp`,2+3n3\`t`i
2x0001j2x0001(3n4\`sinh`,2p8pC+3*5p3pC(3pF,2+3p8/3j2x0009j2x0010p
C/3p21p1F+3*5p3pC(3pF,2+3p8/3j2x0004j2x0005pC/3p33p31+3*5p3pC(3pF
,2+3p8/3j2x0003p33pC/3p33p43+3*5p3pC(3pF,2+3p8/3j2x0007p21pC/3p21
p54+3*5p3pC(3pF,2+3p8/3pCp33pCp33+3*5p3pC(3pF,2+3p8/3j2x0002p33pC
/3p33p73+3*5p3pC(3pF,2+3p8/3pCp21pCp21+3*5p3pC(3pF,2+3p8/3p43p21p
C/3p21p43+3*5p3pC(3pF,2+3p8/3pCp73pCp73}}{SEP_R 8 0}{INP_R 9 0 ">
 "{TEXT 0 63 "s2:=\{exp(-t)*sin(t*i/10)/(i/10) $ i=1..10\}: C:=pl
ot(s2,t=0..5):"}}{SEP_R 10 0}{INP_R 11 0 "> "{TEXT 0 12 "with(plo
ts):"}}{SEP_R 12 0}{INP_R 13 0 "> "{TEXT 0 17 "display([A,B,C]);"
}}{SEP_R 14 0}{INP_R 15 0 "> "{TEXT 0 77 "s3:=\{exp(-t)*sin(t*sqr
t(i/10))/sqrt((i+0.001)/10) $i=-5..5\}: plot(s3,t=0..5);"}}{SEP_R
 16 0}{INP_R 17 0 "> "{TEXT 0 0 ""}}}{END}