User Portlet User Portlet

Why does my function CountChange not work the same way, Wellin says it does on page 117 of his book Essential of Programming...? CountChange is CountChange[coins_Llist] := Total[coins /. {p -> .01, n -> .05, d -> .10, q -> .25}] ...
Alex I am happy I asked you the question. Thank you. I will forward your elegant solution to Guillermo so that he can improve his text. Sam
I found out the answer to my problem. To be correct you need to replace n='1' by `1`. However, I do not understand why I receive {Null} as output. Any suggestions will be very helpful.
Got it. Thank you. Clear[x1, x2] {{x1[t_], x2[t2_]}} = {x1[t], x2[t]} /. DSolve[ {x1'[t] == 1 - 2.5 x1[t] + x2[t], x2'[t] == 2 x1[t] - x2[t], x1[0] == 0, x2[0] == 0}, {x1[t], x2[t]}, t] {{E^(-3.5 t) (-0.219131 E^(0.149219 t) + ...
Pretty stupid of me. Thank you. I will try being more careful before commenting next time. Thank you.