Mortgages Douglas Lewit Consider the problem of borrowing $250,000 to buy a house. You borrow the money at a fixed interest rate of 4.8% compounded monthly. The term of the mortgage is for 20 years. However, you decide against making minimum payments. Instead you decide to pay an additional $200 every month. How long will it take you to pay off the loan and how much have you saved on interest by paying off the loan early? .048/12; JCIrKysrK1MhIzc= I'm not happy with all those "trailing zeros". We can clean those up by opening up the Rule Assistant options box and then selecting the option, "Strip trailing zeros from floats" (note that this option is available only if you are using Extended Typesetting, which is not on by default.). Typesetting:-RuleAssistant(); .048/12; JCIrKysrK1MhIzc= with(Finance,annuity); NyNJKGFubnVpdHlHNiI= 20*12; IiRTIw== solve(annuity(payment,0.004,240)=250000,payment); JCIrdk9SQTshIic= payment:=; JCIrdk9SQTshIic= Payment:=payment+200; JCIrdk9SQT0hIic= balance:=[250000]; NyMiJysrRA== Balance:=[250000]; NyMiJysrRA== Now let's generate the list of values that reflect making the minimum payment every month. We can use a simple "for" loop to accomplish the task. for n to 240 do a:=nops(balance): b:=1.004*balance[a]-payment: balance:=[op(balance),b]: end do: a:='a': b:='b': nops(balance); IiRUIw== balance[241]; (* The final balance should be very close to 0, or just 0. There is probably some roundoff error. *) JCElLCEpISIn Now let's generate the list of values that model the problem of paying an additional $200 per month. for n to 240 do a:=nops(Balance): b:=1.004*Balance[a]-Payment: Balance:=[op(Balance),b]: end do: a:='a': b:='b': nops(Balance); IiRUIw== balance[241]; JCElLCEpISIn Balance[241]; (* This curve reached $0 before the 240th payment! That's great news for the borrower. Ideally, we should all strive to pay off our debts early. That way we will owe less in interest. *) JCErazldTCEpISIm balance2:=[seq([n-1,balance[n]],n=1..241)]: # generate the paired data values for the first graph. Balance2:=[seq([n-1,Balance[n]],n=1..241)]: # generate the paired data values for the second graph. with(plots): plot1:=listplot(balance2,color=black,thickness=3,axis[1]=[gridlines=[spacing(20),color=[COLOR(RGB,0,0.65,0.65)]]],axis[2]=[gridlines=[spacing(25000),color=[COLOR(RGB,0,0.65,0.65)]]],tickmarks=[[seq(40*n,n=0..6)],[seq(25000*n,n=-3..10)]],font=[Helvetica,Bold,9]): plot2:=listplot(Balance2,color=red,thickness=3,axis[1]=[gridlines=[spacing(20),color=[COLOR(RGB,0,0.65,0.65)]]],axis[2]=[gridlines=[spacing(25000),color=[COLOR(RGB,0,0.65,0.65)]]],tickmarks=[[seq(40*n,n=0..6)],[seq(25000*n,n=-3..10)]],font=[Helvetica,Bold,9]): display(plot1,plot2); LSUlUExPVEc2KS0lJ0NVUlZFU0c2JjddejckJCIiISEiIiQiKCsrXSMhIiI3JCQiIzUhIiIkIitqZ3gkXCMhIiU3JCQiIz8hIiIkIipCRnZbIyEiJDckJCIjSSEiIiQiKy1NRCJbIyEiJTckJCIjUyEiIiQiK3pXJlxaIyEiJTckJCIjXSEiIiQiKk9JJ29DISIkNyQkIiNnISIiJCIrVzRHaUMhIiU3JCQiI3EhIiIkIitKaCFmWCMhIiU3JCQiIyEpISIiJCIrPmVdXEMhIiU3JCQiIyEqISIiJCIrMCp6SVcjISIlNyQkIiQrIiEiIiQiKylHR21WIyEiJTckJCIkNSIhIiIkIitrMzpJQyEiJTckJCIkPyIhIiIkIipgWk9VIyEiJDckJCIkSSIhIiIkIiskPT1yVCMhIiU3JCQiJFMiISIiJCIrPkZjNUMhIiU3JCQiJF0iISIiJCIrTDUpUlMjISIlNyQkIiRnIiEiIiQiKi10dFIjISIkNyQkIiRxIiEiIiQiK3YmUTJSIyEiJTckJCIkIT0hIiIkIisjZnhTUSMhIiU3JCQiJCE+ISIiJCIrbCoqUXhCISIlNyQkIiQrIyEiIiQiKylldjFQIyEiJTckJCIkNSMhIiIkIitgViRSTyMhIiU3JCQiJD8jISIiJCIrYGg7ZEIhIiU3JCQiJEkjISIiJCIrIikzUF1CISIlNyQkIiRTIyEiIiQiK0clW05NIyEiJTckJCIkXSMhIiIkIismbylwT0IhIiU3JCQiJGcjISIiJCIrVjojKUhCISIlNyQkIiRxIyEiIiQiKyMqbyJISyMhIiU3JCQiJCFHISIiJCIrQlkpZkojISIlNyQkIiQhSCEiIiQiK0NZLTRCISIlNyQkIiQrJCEiIiQiKyZ5Tz9JIyEiJTckJCIkNSQhIiIkIismKjQtJkgjISIlNyQkIiQ/JCEiIiQiK1VyKHpHIyEiJTckJCIkSSQhIiIkIis5XiE0RyMhIiU3JCQiJFMkISIiJCIrKHovUUYjISIlNyQkIiRdJCEiIiQiK3pnbm1BISIlNyQkIiRnJCEiIiQiK1kpPSZmQSEiJTckJCIkcSQhIiIkIislKUhMX0EhIiU3JCQiJCFRISIiJCIreiQ9XkMjISIlNyQkIiQhUiEiIiQiKztcKHlCIyEiJTckJCIkKyUhIiIkIit6Q2dJQSEiJTckJCIkNSUhIiIkIitfNElCQSEiJTckJCIkPyUhIiIkIis+LShmQCMhIiU3JCQiJEklISIiJCIraixoM0EhIiU3JCQiJFMlISIiJCIrbjFBLEEhIiU3JCQiJF0lISIiJCIrODshUT4jISIlNyQkIiRnJSEiIiQiKyMpR04nPSMhIiU3JCQiJHElISIiJCIrZFYoKXlAISIlNyQkIiQhWyEiIiQiKzxmT3JAISIlNyQkIiQhXCEiIiQiK1d1I1E7IyEiJTckJCIkKyYhIiIkIis8KWVpOiMhIiU3JCQiJDUmISIiJCIrOipmJ1tAISIlNyQkIiQ/JiEiIiQiKz0xLlRAISIlNyQkIiRJJiEiIiQiKy4zUExAISIlNyQkIiRTJiEiIiQiK1wub0RAISIlNyQkIiRdJiEiIiQiK0wiZno2IyEiJTckJCIkZyYhIiIkIitMcT81QCEiJTckJCIkcSYhIiIkIitDUlUtQCEiJTckJCIkIWUhIiIkIiskbzRZNCMhIiU3JCQiJCFmISIiJCIrJj1rbjMjISIlNyQkIiQrJyEiIiQiKzB0KSl5PyEiJTckJCIkNSchIiIkIis8Knk0MiMhIiU3JCQiJD8nISIiJCIrJyopUUkxIyEiJTckJCIkSSchIiIkIis6cjFiPyEiJTckJCIkUychIiIkIitZTTFaPyEiJTckJCIkXSchIiIkIitqeC1SPyEiJTckJCIkZychIiIkIitQKmY0LiMhIiU3JCQiJHEnISIiJCIqJSlmRy0jISIkNyQkIiQhbyEiIiQiK1V0czk/ISIlNyQkIiQhcCEiIiQiKzlCYzE/ISIlNyQkIiQrKCEiIiQiK0VZTykqPiEiJTckJCIkNSghIiIkIitbVDghKj4hIiU3JCQiJD8oISIiJCIrWzIoPSk+ISIlNyQkIiRJKCEiIiQiKyVIdU4oPiEiJTckJCIkUyghIiIkIithWUNsPiEiJTckJCIkXSghIiIkIisncCIpbyY+ISIlNyQkIiRnKCEiIiQiKydHJltbPiEiJTckJCIkcSghIiIkIipIYislPiEiJDckJCIkIXkhIiIkIit1OmZKPiEiJTckJCIkIXohIiIkIisuUzRCPiEiJTckJCIkKykhIiIkIitVQ2M5PiEiJTckJCIkNSkhIiIkIitibipmIT4hIiU3JCQiJD8pISIiJCIrMG9SKCo9ISIlNyQkIiRJKSEiIiQiK2JDdykpPSEiJTckJCIkUykhIiIkIitvTjQhKT0hIiU3JCQiJF0pISIiJCIrMCtScj0hIiU3JCQiJGcpISIiJCIrRztsaT0hIiU3JCQiJHEpISIiJCIrKUh5USY9ISIlNyQkIiQhKSkhIiIkIit1KXBdJT0hIiU3JCQiJCEqKSEiIiQiKztpQU89ISIlNyQkIiQrKiEiIiQiKyU9WnQjPSEiJTckJCIkNSohIiIkIitPRVY9PSEiJTckJCIkPyohIiIkIipWI1s0PSEiJDckJCIkSSohIiIkIitCa1wrPSEiJTckJCIkUyohIiIkIitzV1oieiIhIiU3JCQiJF0qISIiJCIrTGtUI3kiISIlNyQkIiRnKiEiIiQiK2lAS3Q8ISIlNyQkIiRxKiEiIiQiKzk6Pms8ISIlNyQkIiQhKSohIiIkIitWVi1iPCEiJTckJCIkISoqISIiJCIrLjAjZXUiISIlNyQkIiUrNSEiIiQiK1spemx0IiEiJTckJCIlNTUhIiIkIipCLXRzIiEiJDckJCIlPzUhIiIkIistdil6ciIhIiU3JCQiJUk1ISIiJCIrOmJqMzwhIiU3JCQiJVM1ISIiJCIqN1kjKnAiISIkNyQkIiVdNSEiIiQiK24iPikqbyIhIiU3JCQiJWc1ISIiJCIrMlhOIW8iISIlNyQkIiVxNSEiIiQiKykpPiYzbiIhIiU3JCQiJSEzIiEiIiQiK2Y5Smg7ISIlNyQkIiUhNCIhIiIkIitvRnReOyEiJTckJCIlKzYhIiIkIitpZDZVOyEiJTckJCIlNTYhIiIkIispR2dDaiIhIiU3JCQiJT82ISIiJCIrIz5tRmkiISIlNyQkIiVJNiEiIiQiKktMSWgiISIkNyQkIiVTNiEiIiQiKzs6RS47ISIlNyQkIiVdNiEiIiQiK0QxWCRmIiEiJTckJCIlZzYhIiIkIisiXCtPZSIhIiU3JCQiJXE2ISIiJCIrYzRydDohIiU3JCQiJSE9IiEiIiQiK2o9eWo6ISIlNyQkIiUhPiIhIiIkIitgSSJRYiIhIiU3JCQiJSs3ISIiJCIrb1YhUWEiISIlNyQkIiU1NyEiIiQiK1tjdkw6ISIlNyQkIiU/NyEiIiQiK01ubUI6ISIlNyQkIiVJNyEiIiQiK2t1YDg6ISIlNyQkIiVTNyEiIiQiK3h3Ty46ISIlNyQkIiVdNyEiIiQiKzZzOiRcIiEiJTckJCIlZzchIiIkIisuZiFIWyIhIiU3JCQiJXE3ISIiJCIqZjhFWiIhIiQ3JCQiJSFHIiEiIiQiKzIsR2k5ISIlNyQkIiUhSCIhIiIkIipIMD5YIiEiJDckJCIlKzghIiIkIit1KilbVDkhIiU3JCQiJTU4ISIiJCIrJCo0Lko5ISIlNyQkIiU/OCEiIiQiKj1KMFUiISIkNyQkIiVJOCEiIiQiK28kKikqNDkhIiU3JCQiJVM4ISIiJCIrKVEwJSpSIiEiJTckJCIlXTghIiIkIit0IXooKVEiISIlNyQkIiVnOCEiIiQiK18tNnk4ISIlNyQkIiVxOCEiIiQiK2MoKVJuOCEiJTckJCIlIVEiISIiJCIrOVdrYzghIiU3JCQiJSFSIiEiIiQiK2JxJWVNIiEiJTckJCIlKzkhIiIkIisxbCtOOCEiJTckJCIlNTkhIiIkIismZkFUSyIhIiU3JCQiJT85ISIiJCIrW14+ODghIiU3JCQiJUk5ISIiJCIrIypSQS04ISIlNyQkIiVTOSEiIiQiK14qMzdIIiEiJTckJCIlXTkhIiIkIiomKVwsRyIhIiQ3JCQiJWc5ISIiJCIrN2wvcDchIiU3JCQiJXE5ISIiJCIraCgpKnlEIiEiJTckJCIlIVsiISIiJCIrPmtxWTchIiU3JCQiJSFcIiEiIiQiKzMkcGFCIiEiJTckJCIlKzohIiIkIitbcz1DNyEiJTckJCIlNTohIiIkIioxZ0dAIiEiJDckJCIlPzohIiIkIitqdlssNyEiJTckJCIlSTohIiIkIit3JnArPiIhIiU3JCQiJVM6ISIiJCIrPGZneTYhIiU3JCQiJV06ISIiJCIrL2s0bjYhIiU3JCQiJWc6ISIiJCIrYDNhYjYhIiU3JCQiJXE6ISIiJCIreiFSUjkiISIlNyQkIiUhZSIhIiIkIispKjNISzYhIiU3JCQiJSFmIiEiIiQiK0RoZj82ISIlNyQkIiUrOyEiIiQiK3RYJikzNiEiJTckJCIlNTshIiIkIithZzEoNCIhIiU3JCQiJT87ISIiJCIrIlFJXzMiISIlNyQkIiVJOyEiIiQiK210TXQ1ISIlNyQkIiVTOyEiIiQiKz1vVGg1ISIlNyQkIiVdOyEiIiQiK1smUSVcNSEiJTckJCIlZzshIiIkIitsQlRQNSEiJTckJCIlcTshIiIkIit4IVFgLSIhIiU3JCQiJSFvIiEiIiQiKyNcOkssIiEiJTckJCIlIXAiISIiJCIrPFcvLDUhIiU3JCQiJSs8ISIiJCIrI2VZIykpKSohIiY3JCQiJTU8ISIiJCIpLWNsKCohIiQ3JCQiJT88ISIiJCIrdUlRVScqISImNyQkIiVJPCEiIiQiK1FLcj0mKiEiJjckJCIlUzwhIiIkIitDKFtYUiohIiY3JCQiJV08ISIiJCIrX3YpKXAjKiEiJjckJCIlZzwhIiIkIitNeHNXIiohIiY3JCQiJXE8ISIiJCIreXMxPiEqISImNyQkIiUheSIhIiIkIio9L0gqKSkhIiU3JCQiJSF6IiEiIiQiKlZPaXcpISIlNyQkIiUrPSEiIiQiKzM/MVInKSEiJjckJCIlNT0hIiIkIispKSl5OF4pISImNyQkIiU/PSEiIiQiK09dPSRRKSEiJjckJCIlST0hIiIkIiszJXlXRCkhIiY3JCQiJVM9ISIiJCIrYXBERCIpISImNyQkIiVdPSEiIiQiKzknPWIqeiEiJjckJCIlZz0hIiIkIipLaF8neSEiJTckJCIlcT0hIiIkIispKkhbTXghIiY3JCQiJSEpPSEiIiQiK2k6PS53ISImNyQkIiUhKj0hIiIkIiojXE5ydSEiJTckJCIlKz4hIiIkIitzNCtSdCEiJjckJCIlNT4hIiIkIiszdzYxcyEiJjckJCIlPz4hIiIkIipyLUYyKCEiJTckJCIlST4hIiIkIithVHZRcCEiJjckJCIlUz4hIiIkIisvKXBVIW8hIiY3JCQiJV0+ISIiJCIrO3ZDcG0hIiY3JCQiJWc+ISIiJCIrUV5vTGwhIiY3JCQiJXE+ISIiJCIrNzBlKFInISImNyQkIiUhKT4hIiIkIittOSQ0RSchIiY3JCQiJSEqPiEiIiQiK0NldEJoISImNyQkIiUrPyEiIiQiKTkqZilmISIkNyQkIiU1PyEiIiQiKykqZnBaZSEiJjckJCIlPz8hIiIkIis5dSUpM2QhIiY3JCQiJUk/ISIiJCIrT01XcGIhIiY3JCQiJVM/ISIiJCIrVT1bSGEhIiY3JCQiJV0/ISIiJCIrLS8nKilHJiEiJjckJCIlZz8hIiIkIit3byh5OSYhIiY3JCQiJXE/ISIiJCIrOyFIaSsmISImNyQkIiUhMyMhIiIkIitrWCxrWyEiJjckJCIlITQjISIiJCIrYTdCQFohIiY3JCQiJStAISIiJCIrN28oeWQlISImNyQkIiU1QCEiIiQiK18qW1JWJSEiJjckJCIlP0AhIiIkIipRWCUqRyUhIiU3JCQiJUlAISIiJCIrJXpqVjklISImNyQkIiVTQCEiIiQiKyMpPXEpKlIhIiY3JCQiJV1AISIiJCIrQXRYX1EhIiY3JCQiJWdAISIiJCIrJXlGY3EkISImNyQkIiVxQCEiIiQiK0c0QGVOISImNyQkIiUhPSMhIiIkIisvVz81TSEiJjckJCIlIT4jISIiJCIrYWVnaEshIiY3JCQiJStBISIiJCIqIkhUN0ohIiU3JCQiJTVBISIiJCIrJT5CRSdIISImNyQkIiU/QSEiIiQiKktNQSJHISIlNyQkIiVJQSEiIiQiKipRQ2hFISIlNyQkIiVTQSEiIiQiKylcXCc0RCEiJjckJCIlXUEhIiIkIitHKFt1TiMhIiY3JCQiJWdBISIiJCIrYyJSWT8jISImNyQkIiVxQSEiIiQiK1kkPTcwIyEiJjckJCIlIUcjISIiJCIrX1E9KCo9ISImNyQkIiUhSCMhIiIkIipBTER1IiEiJTckJCIlK0IhIiIkIisnKVJFKGUiISImNyQkIiU1QiEiIiQiK3VPUEo5ISImNyQkIiU/QiEiIiQiKy0pZltGIiEiJjckJCIlSUIhIiIkIit1KT54NiIhIiY3JCQiJVNCISIiJCIrYlFeKmYqISInNyQkIiVdQiEiIiQiK04jPWIsKSEiJzckJCIlZ0IhIiIkIitMbT1EayEiJzckJCIlcUIhIiIkIiswUFxHWyEiJzckJCIlIVEjISIiJCIrMFNUREshIic3JCQiJSFSIyEiIiQiKycpPiNmaCIhIic3JCQiJStDISIiJCElLCEpISInLSUmQ09MT1JHNiYlJFJHQkckIiIhISIiJCIiISEiIiQiIiEhIiItJSpUSElDS05FU1NHNiMiIiQtJSVGT05URzYlJSpIRUxWRVRJQ0FHJSVCb2xkRyIiKi0lJ0NVUlZFU0c2JjddejckJCIiISEiIiQiKCsrXSMhIiI3JCQiIzUhIiIkIitqZ3giXCMhIiU3JCQiIz8hIiIkIipCPk5bIyEiJDckJCIjSSEiIiQiKlBIX1ojISIkNyQkIiNTISIiJCIqTjFwWSMhIiQ3JCQiI10hIiIkIitRK2JlQyEiJTckJCIjZyEiIiQiKywuO11DISIlNyQkIiNxISIiJCIrMHF0VEMhIiU3JCQiIyEpISIiJCIrOytHTEMhIiU3JCQiIyEqISIiJCIrKj4qeUNDISIlNyQkIiQrIiEiIiQiKz5XRTtDISIlNyQkIiQ1IiEiIiQiKmEweFMjISIkNyQkIiQ/IiEiIiQiK0RDNipSIyEiJTckJCIkSSIhIiIkIitRXFshUiMhIiU3JCQiJFMiISIiJCIrVEgjPVEjISIlNyQkIiRdIiEiIiQiKydIRUpQIyEiJTckJCIkZyIhIiIkIitrW1JrQiEiJTckJCIkcSIhIiIkIisxJkdjTiMhIiU3JCQiJCE9ISIiJCIrJDNGb00jISIlNyQkIiQhPiEiIiQiK2EvKnpMIyEiJTckJCIkKyMhIiIkIit6JT0iSEIhIiU3JCQiJDUjISIiJCIrOzVAP0IhIiU3JCQiJD8jISIiJCIrQnpFNkIhIiU3JCQiJEkjISIiJCIrZSEqRy1CISIlNyQkIiRTIyEiIiQiK3hVRiRIIyEiJTckJCIkXSMhIiIkIitQTUElRyMhIiU3JCQiJGcjISIiJCIrJVJPXkYjISIlNyQkIiRxIyEiIiQiKy5JLG1BISIlNyQkIiQhRyEiIiQiKz1KJm9EIyEiJTckJCIkIUghIiIkIiskZmN3QyMhIiU3JCQiJCskISIiJCIrI0dCJVFBISIlNyQkIiQ1JCEiIiQiK1FJOkhBISIlNyQkIiQ/JCEiIiQiKzhkJSk+QSEiJTckJCIkSSQhIiIkIitmNl01QSEiJTckJCIkUyQhIiIkIitGIz42PyMhIiU3JCQiJF0kISIiJCIrbigqcCI+IyEiJTckJCIkZyQhIiIkIitIRUMjPSMhIiU3JCQiJHEkISIiJCIrand1c0AhIiU3JCQiJCFRISIiJCIrPFpAakAhIiU3JCQiJCFSISIiJCIrUk9rYEAhIiU3JCQiJCslISIiJCIreFUuV0AhIiU3JCQiJDUlISIiJCIreGtRTUAhIiU3JCQiJD8lISIiJCIrJzMrWjcjISIlNyQkIiRJJSEiIiQiK1xcKFw2IyEiJTckJCIkUyUhIiIkIis3NEAwQCEiJTckJCIkXSUhIiIkIis+eVMmNCMhIiU3JCQiJGclISIiJCIrOGJjJjMjISIlNyQkIiRxJSEiIiQiK1FRb3Y/ISIlNyQkIiQhWyEiIiQiK09Fd2w/ISIlNyQkIiQhXCEiIiQiKnYsZTAjISIkNyQkIiQrJiEiIiQiKi0sZS8jISIkNyQkIiQ1JiEiIiQiKyhHZ2QuIyEiJTckJCIkPyYhIiIkIisiUnpjLSMhIiU3JCQiJEkmISIiJCIrcyJlYiwjISIlNyQkIiRTJiEiIiQiK29rUjA/ISIlNyQkIiRdJiEiIiQiKzxUPiYqPiEiJTckJCIkZyYhIiIkIitjNCZcKT4hIiU3JCQiJHEmISIiJCIrQm9tdT4hIiU3JCQiJCFlISIiJCIrYDpNaz4hIiU3JCQiJCFmISIiJCIrIylcKFImPiEiJTckJCIkKychIiIkIitYcGNWPiEiJTckJCIkNSchIiIkIit3czZMPiEiJTckJCIkPychIiIkIiszZWlBPiEiJTckJCIkSSchIiIkIit1QjQ3PiEiJTckJCIkUychIiIkIisxb14sPiEiJTckJCIkXSchIiIkIitPKikqMyo9ISIlNyQkIiRnJyEiIiQiKyZmUS0pPSEiJTckJCIkcSchIiIkIis3Y2BwPSEiJTckJCIkIW8hIiIkIis8KSp5ZT0hIiU3JCQiJCFwISIiJCIrUjUrWz0hIiU3JCQiJCsoISIiJCIrMSJwciQ9ISIlNyQkIiQ1KCEiIiQiK1hRSEU9ISIlNyQkIiQ/KCEiIiQiKyQzdmAiPSEiJTckJCIkSSghIiIkIitZRVQvPSEiJTckJCIkUyghIiIkIipPMU16IiEiJDckJCIkXSghIiIkIitbZ04jeSIhIiU3JCQiJGcoISIiJCIrTjpFcjwhIiU3JCQiJHEoISIiJCIrV0U3ZzwhIiU3JCQiJCF5ISIiJCIrKT5SKls8ISIlNyQkIiQheiEiIiQiKz01clA8ISIlNyQkIiQrKSEiIiQiK0R6VkU8ISIlNyQkIiQ1KSEiIiQiKnU+XnIiISIkNyQkIiQ/KSEiIiQiKyNHY1BxIiEiJTckJCIkSSkhIiIkIipQWkJwIiEiJDckJCIkUykhIiIkIitBRyozbyIhIiU3JCQiJF0pISIiJCIrY0NScDshIiU3JCQiJGcpISIiJCIrKjNZeWwiISIlNyQkIiRxKSEiIiQiK09ORFk7ISIlNyQkIiQhKSkhIiIkIis4WWhNOyEiJTckJCIkISopISIiJCIrTSJISGkiISIlNyQkIiQrKiEiIiQiKzlwPjY7ISIlNyQkIiQ1KiEiIiQiK2x4VCpmIiEiJTckJCIkPyohIiIkIisqXCJmKGUiISIlNyQkIiRJKiEiIiQiK0d6cnY6ISIlNyQkIiRTKiEiIiQiK2pvemo6ISIlNyQkIiRdKiEiIiQiKzgiRz1iIiEiJTckJCIkZyohIiIkIispWzYpUjohIiU3JCQiJHEqISIiJCIrKHpZeF8iISIlNyQkIiQhKSohIiIkIitaUWo6OiEiJTckJCIkISoqISIiJCIrWENaLjohIiU3JCQiJSs1ISIiJCIrKVJpN1wiISIlNyQkIiU1NSEiIiQiKzZOK3o5ISIlNyQkIiU/NSEiIiQiKyllJnBtOSEiJTckJCIlSTUhIiIkIitMJVFWWCIhIiU3JCQiJVM1ISIiJCIqJj0kPlciISIkNyQkIiVdNSEiIiQiKmt2JUg5ISIkNyQkIiVnNSEiIiQiKzEncHBUIiEiJTckJCIlcTUhIiIkIitaTlQvOSEiJTckJCIlITMiISIiJCIra3MhPVIiISIlNyQkIiUhNCIhIiIkIitjMDp6OCEiJTckJCIlKzYhIiIkIitAS1dtOCEiJTckJCIlNTYhIiIkIitkXW9gOCEiJTckJCIlPzYhIiIkIionZSgzTSIhIiQ3JCQiJUk2ISIiJCIrRWEsRzghIiU3JCQiJVM2ISIiJCIrXk41OjghIiU3JCQiJV02ISIiJCIrRys5LTghIiU3JCQiJWc2ISIiJCIrXlk3KkciISIlNyQkIiVxNiEiIiQiKzhzMHc3ISIlNyQkIiUhPSIhIiIkIiswdiRIRSIhIiU3JCQiJSE+IiEiIiQiKz1gd1w3ISIlNyQkIiUrNyEiIiQiK1UvYU83ISIlNyQkIiU1NyEiIiQiK25FRUI3ISIlNyQkIiU/NyEiIiQiKyJ5Sio0NyEiJTckJCIlSTchIiIkIitydmEnPiIhIiU3JCQiJVM3ISIiJCIrQyk0Sj0iISIlNyQkIiVdNyEiIiQiK0UkPSdwNiEiJTckJCIlZzchIiIkIitpRzJjNiEiJTckJCIlcTchIiIkIis7S1pVNiEiJTckJCIlIUciISIiJCIrcyI+KUc2ISIlNyQkIiUhSCIhIiIkIis3MDY6NiEiJTckJCIlKzghIiIkIis8cU0sNiEiJTckJCIlNTghIiIkIitvJUd2MyIhIiU3JCQiJT84ISIiJCIrWFlsdDUhIiU3JCQiJUk4ISIiJCIrRmBzZjUhIiU3JCQiJVM4ISIiJCIrIkhTZC8iISIlNyQkIiVdOCEiIiQiKzokKnBKNSEiJTckJCIlZzghIiIkIit2QGc8NSEiJTckJCIlcTghIiIkIitaJ1tNKyIhIiU3JCQiJSFRIiEiIiQiK19dUSMqKSohIiY3JCQiJSFSIiEiIiQiK0NfclwoKiEiJjckJCIlKzkhIiIkIis9WloxJyohIiY3JCQiJTU5ISIiJCIqRGhFWSohIiU3JCQiJT85ISIiJCIrR0RGPSQqISImNyQkIiVJOSEiIiQiKkQxTDwqISIlNyQkIiVTOSEiIiQiKzMsd0YhKiEiJjckJCIlXTkhIiIkIip5SjspKSkhIiU3JCQiJWc5ISIiJCIqJSo9XHQpISIlNyQkIiVxOSEiIiQiK1sjPndlKSEiJjckJCIlIVsiISIiJCIrZS50UiUpISImNyQkIiUhXCIhIiIkIis3Klw3SCkhIiY3JCQiJSs6ISIiJCIrV2I8VSIpISImNyQkIiU1OiEiIiQiK3lbXSMqeiEiJjckJCIlPzohIiIkIipgTkEleSEiJTckJCIlSTohIiIkIisvXk8icCghIiY3JCQiJVM6ISIiJCIrJz4iKilSdiEiJjckJCIlXTohIiIkIislUjZ5USghIiY3JCQiJWc6ISIiJCIrc0s3TnMhIiY3JCQiJXE6ISIiJCIrKVJDPTMoISImNyQkIiUhZSIhIiIkIitHQiJ6I3AhIiY3JCQiJSFmIiEiIiQiKmglUXRuISIlNyQkIiUrOyEiIiQiKnlRIz1tISIlNyQkIiU1OyEiIiQiK29CWmlrISImNyQkIiU/OyEiIiQiKipHMzFqISIlNyQkIiVJOyEiIiQiK2F5MVxoISImNyQkIiVTOyEiIiQiK2VaVSIqZiEiJjckJCIlXTshIiIkIio0XkokZSEiJTckJCIlZzshIiIkIitFVkN1YyEiJjckJCIlcTshIiIkIitPPnE5YiEiJjckJCIlIW8iISIiJCIrdzhfYWAhIiY3JCQiJSFwIiEiIiQiKyU0K1A+JiEiJjckJCIlKzwhIiIkIitFYkJLXSEiJjckJCIlNTwhIiIkIileN3FbISIkNyQkIiU/PCEiIiQiK0tpTzJaISImNyQkIiVJPCEiIiQiKkxjUmElISIlNyQkIiVTPCEiIiQiKyl5IyopelYhIiY3JCQiJV08ISIiJCIrIypIPDpVISImNyQkIiVnPCEiIiQiKztWelxTISImNyQkIiVxPCEiIiQiK0VUdiQpUSEiJjckJCIlIXkiISIiJCIrdyhccXIkISImNyQkIiUheiIhIiIkIiszJ3knXE4hIiY3JCQiJSs9ISIiJCIrYXpqIlEkISImNyQkIiU1PSEiIiQiK1FeI0hAJCEiJjckJCIlPz0hIiIkIitzdWBWSSEiJjckJCIlST0hIiIkIithQVp0RyEiJjckJCIlUz0hIiIkIit3bnMtRiEiJjckJCIlXT0hIiIkIis7JClISkQhIiY3JCQiJWc9ISIiJCIrVVQ9ZkIhIiY3JCQiJXE9ISIiJCIrNzpRJz0jISImNyQkIiUhKT0hIiIkIipuKClHLCMhIiU3JCQiJSEqPSEiIiQiK2EpKnBRPSEiJjckJCIlKz4hIiIkIisnRzpRbSIhIiY3JCQiJTU+ISIiJCIqPUojKVsiISIlNyQkIiU/PiEiIiQiK1FaJT5KIiEiJjckJCIlST4hIiIkIio6YFw4IiEiJTckJCIlUz4hIiIkIitiZmBzJiohIic3JCQiJV0+ISIiJCIrQ0NWKXkoISInNyQkIiVnPiEiIiQiK3pDPigqZiEiJzckJCIlcT4hIiIkIit1dnkpPiUhIic3JCQiJSEpPiEiIiQiK1whKj0kUiMhIic3JCQiJSEqPiEiIiQiKThvLmUhIiY3JCQiJSs/ISIiJCErc1NxUjchIic3JCQiJTU/ISIiJCEramwwbkkhIic3JCQiJT8/ISIiJCErayU9PCFcISInNyQkIiVJPyEiIiQhKzghPlB1JyEiJzckJCIlUz8hIiIkIStrdjMkZikhIic3JCQiJV0/ISIiJCErZmApXC8iISImNyQkIiVnPyEiIiQhK29ZU0o3ISImNyQkIiVxPyEiIiQhK2EncCY9OSEiJjckJCIlITMjISIiJCEpTFsxOyEiJDckJCIlITQjISIiJCEpJ1teeiIhIiQ3JCQiJStAISIiJCEraSZvWCk+ISImNyQkIiU1QCEiIiQhKy9pdXVAISImNyQkIiU/QCEiIiQhK2NYb2xCISImNyQkIiVJQCEiIiQhK2ltUWREISImNyQkIiVTQCEiIiQhK3diJilcRiEiJjckJCIlXUAhIiIkISttVjRWSCEiJjckJCIlZ0AhIiIkISo2MXI4JCEiJTckJCIlcUAhIiIkISstUio9TCQhIiY3JCQiJSE9IyEiIiQhK1kzWUZOISImNyQkIiUhPiMhIiIkIStjKyJRcyQhIiY3JCQiJStBISIiJCEra1klNCNSISImNyQkIiU1QSEiIiQhKiJ5Jyk9VCEiJTckJCIlP0EhIiIkIStbRWU8ViEiJjckJCIlSUEhIiIkIStZQjQ8WCEiJjckJCIlU0EhIiIkISsjMyt1ciUhIiY3JCQiJV1BISIiJCEqMDQmPVwhIiU3JCQiJWdBISIiJCErYUNVP14hIiY3JCQiJXFBISIiJCErN045QmAhIiY3JCQiJSFHIyEiIiQhK2FhbkViISImNyQkIiUhSCMhIiIkIStDOi1KZCEiJjckJCIlK0IhIiIkISt5XD1PZiEiJjckJCIlNUIhIiIkISsnM3BAOSchIiY3JCQiJT9CISIiJCEqOHgqW2ohIiU3JCQiJUlCISIiJCErMUNoY2whIiY3JCQiJVNCISIiJCErQyN5XXcnISImNyQkIiVdQiEiIiQhKy96UHVwISImNyQkIiVnQiEiIiQhKyV5OVg9KCEiJjckJCIlcUIhIiIkISpAI1wmUighIiU3JCQiJSFRIyEiIiQhK1lOSjJ3ISImNyQkIiUhUiMhIiIkIStvQCkqPnkhIiY3JCQiJStDISIiJCErazldTCEpISImLSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJCIiISEiIiQiIiEhIiItJSpUSElDS05FU1NHNiMiIiQtJSVGT05URzYlJSpIRUxWRVRJQ0FHJSVCb2xkRyIiKi0mJSZfQVhJU0c2IyIiIjYnLSUrX0dSSURMSU5FU0c2JC0lKV9TUEFDSU5HRzYkJCIkKyMhIiIkIiIhISIiLSUmQ09MT1JHNiYlJFJHQkckIiIhISIiJCIoLyk0bCEiKCQiKC8pNGwhIigtJSZDT0xPUkc2JiUkUkdCRyQiIiEhIiIkIiIhISIiJCIiISEiIi0lKkxJTkVTVFlMRUc2IyIiIi0lKlRISUNLTkVTU0c2IyIiIS0lLVRSQU5TUEFSRU5DWUc2IyQiIiEhIiItJiUmX0FYSVNHNiMiIiM2Jy0lK19HUklETElORVNHNiQtJSlfU1BBQ0lOR0c2JCQiJysrRCEiIiQiIiEhIiItJSZDT0xPUkc2JiUkUkdCRyQiIiEhIiIkIigvKTRsISIoJCIoLyk0bCEiKC0lJkNPTE9SRzYmJSRSR0JHJCIiISEiIiQiIiEhIiIkIiIhISIiLSUqTElORVNUWUxFRzYjIiIiLSUqVEhJQ0tORVNTRzYjIiIhLSUtVFJBTlNQQVJFTkNZRzYjJCIiISEiIi0lKkFYRVNUSUNLU0c2JDcpJCIiISEiIiQiJCslISIiJCIkKykhIiIkIiUrNyEiIiQiJSs7ISIiJCIlKz8hIiIkIiUrQyEiIjcwJCEnKyt2ISIiJCEnKytdISIiJCEnKytEISIiJCIiISEiIiQiJysrRCEiIiQiJysrXSEiIiQiJysrdiEiIiQiKCsrKyIhIiIkIigrK0QiISIiJCIoKytdIiEiIiQiKCsrdiIhIiIkIigrKysjISIiJCIoKytEIyEiIiQiKCsrXSMhIiItJSVGT05URzYlJSpIRUxWRVRJQ0FHJSVCb2xkRyIiKi0lJVJPT1RHNictJSlCT1VORFNfWEc2IyQiJCFlISIiLSUpQk9VTkRTX1lHNiMkIiQ1IiEiIi0lLUJPVU5EU19XSURUSEc2IyQiJXFbISIiLSUuQk9VTkRTX0hFSUdIVEc2IyQiJTVWISIiLSUpQ0hJTERSRU5HNiI= payment; JCIrdk9SQTshIic= Payment; JCIrdk9SQT0hIic= balance2[241]; NyQiJFMjJCElLCEpISIn Balance2[201]; NyQiJCsjJCErc1NxUjchIic= 240*payment-250000; JCIrP1t1JFIiISIl 200*Payment-250000; JCIrXXR5VzYhIiU= -; JCIqcXUmKlsjISIl By paying an additional $200 every month, you have reduced the cost of the loan by almost $25,000. Not bad! That's actually a pretty big savings, especially in today's dubious economy.