kill(all);

van=facebook.com/LearningCalculus$

     Using wxMaxima's ode2 command solve:

equation:'diff(m,t) = -k*m;

ode2(equation,m,t);

eqn:ic1(ode2(equation,m,t),t=0,m=m[0])$

m(k,t):=''(rhs(eqn))$ m(k,t);

m(k,t);

m(float(log(2)/8.0197),4*8.0197);