`*`(Sample, `*`(Solution)), `*`(Problem, `*`(D1)) 

 

`:=`(sol, dsolve({y(0) = 0, (D(y))(0) = 1, ((`@@`(D, 2))(y))(t) = `*`(t, `*`(y(t)))}, y(t), numeric)); -1; `:=`(ysol, proc (u) options operator, arrow; subs(sol(u), y(t)) end proc); -1; `:=`(plot1, pl...
`:=`(sol, dsolve({y(0) = 0, (D(y))(0) = 1, ((`@@`(D, 2))(y))(t) = `*`(t, `*`(y(t)))}, y(t), numeric)); -1; `:=`(ysol, proc (u) options operator, arrow; subs(sol(u), y(t)) end proc); -1; `:=`(plot1, pl...
`:=`(sol, dsolve({y(0) = 0, (D(y))(0) = 1, ((`@@`(D, 2))(y))(t) = `*`(t, `*`(y(t)))}, y(t), numeric)); -1; `:=`(ysol, proc (u) options operator, arrow; subs(sol(u), y(t)) end proc); -1; `:=`(plot1, pl...
`:=`(sol, dsolve({y(0) = 0, (D(y))(0) = 1, ((`@@`(D, 2))(y))(t) = `*`(t, `*`(y(t)))}, y(t), numeric)); -1; `:=`(ysol, proc (u) options operator, arrow; subs(sol(u), y(t)) end proc); -1; `:=`(plot1, pl...
`:=`(sol, dsolve({y(0) = 0, (D(y))(0) = 1, ((`@@`(D, 2))(y))(t) = `*`(t, `*`(y(t)))}, y(t), numeric)); -1; `:=`(ysol, proc (u) options operator, arrow; subs(sol(u), y(t)) end proc); -1; `:=`(plot1, pl... 

Plot_2d
 

`:=`(plot3, plot(ysol, -18 .. -14, color = black, linestyle = 3)); -1; plots[display](plot3) 

Plot_2d
 

max(seq(ysol(`+`(`-`(18), `*`(.1, `*`(k)))), k = 0 .. 40)) 

.636468570437884740 (1)
 

min(seq(ysol(`+`(`-`(18), `*`(.1, `*`(k)))), k = 0 .. 40)) 

-.634721829192157139 (2)
 

`:=`(plot4, plot(`+`(`*`(.64, `*`(sin(`+`(`*`(4, `*`(t)), 65))))), t = -18 .. -14, color = black)); -1; plots[display](plot3, plot4) 

Plot_2d
 

`:=`(plot5, plot(ysol, 14 .. 18, color = black, linestyle = 3)); -1; plots[display](plot5) 

Plot_2d
 

`:=`(c[1], `+`(`/`(`*`(2, `*`(ysol(18))), `*`(exp(`*`(4, 18)))))); -1; evalf(c[1]) 

0.4247231048e-9 (3)
 

`:=`(plot6, plot(`*`(c[1], `*`(sinh(`+`(`*`(4, `*`(t)))))), t = 14 .. 18, color = black)); -1; plots[display](plot5, plot6) 

Plot_2d
 

`:=`(plot7, plots[logplot](ysol, 14 .. 18, color = black, linestyle = 3)); -1; `:=`(plot8, plots[logplot](`*`(c[1], `*`(sinh(`+`(`*`(4, `*`(t)))))), t = 14 .. 18, color = black)); -1; plots[display](p...
`:=`(plot7, plots[logplot](ysol, 14 .. 18, color = black, linestyle = 3)); -1; `:=`(plot8, plots[logplot](`*`(c[1], `*`(sinh(`+`(`*`(4, `*`(t)))))), t = 14 .. 18, color = black)); -1; plots[display](p...
`:=`(plot7, plots[logplot](ysol, 14 .. 18, color = black, linestyle = 3)); -1; `:=`(plot8, plots[logplot](`*`(c[1], `*`(sinh(`+`(`*`(4, `*`(t)))))), t = 14 .. 18, color = black)); -1; plots[display](p... 

Plot_2d
 

plot(ysol, -20 .. 2, color = black, linestyle = 3) 

Plot_2d