comp.lang.ada
 help / color / mirror / Atom feed
From: Andrew <eagletalon@chartermi.net>
Subject: Re: interest computing problem
Date: Wed, 17 Sep 2003 02:47:48 -0500
Date: 2003-09-17T02:47:48-05:00	[thread overview]
Message-ID: <vmg4fe84jd79f9@corp.supernews.com> (raw)
In-Reply-To: <E8S9b.275464$2x.77127@rwcrnsc52.ops.asp.att.net>



tmoran@acm.org wrote:
>>Your ending balance will be  1.00022E+03
> 
>   If you use Long_Float instead of Float you will get
> 1.02014488268319E+03
> Raising to the 365th, rather than 364th (7*52=364) power gives
> 1.02020078103290
> which matches within rounding error what your banker friend says.
i just tried to use long_float

although I am probably mis-using it

here is my attempted implementation of it .. sorry about the spelling 
it's now 2:42 am

=========
procedure Interest is
    Initialamt : Long_Float;
    Interest : Long_Float;
    TimeNWeeks : Integer;
    DRate : Long_Float;
    Days : Integer;
    Balance : Long_Float;
 

    package NUMBER_IO is new INTEGER_IO(INTEGER);
    use NUMBER_IO;
    package Float1_IO is new Float_IO(FLOAT);
    use Float1_IO;
 

===========

do I need to also make
package Float1_IO is new Float_IO(FLOAT);
be
package Float1_IO is new Float_IO(Long_FLOAT);

actually I'll try that...

nope that didn't help either....

i'm probably not using "Long_Float" correctly...

if you want could you show me the correct syntax..

either that or else I'll try to look it up in the morning.. i need some 
slpee.. err sleep




  reply	other threads:[~2003-09-17  7:47 UTC|newest]

Thread overview: 17+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-09-16 15:27 interest computing problem Andrew
2003-09-16 15:54 ` Ludovic Brenta
2003-09-16 17:21   ` tmoran
2003-09-17  4:26     ` Andrew
2003-09-16 21:52 ` Robert I. Eachus
2003-09-17  3:48   ` Andrew
2003-09-17  4:28     ` Andrew
2003-09-17  5:18     ` tmoran
2003-09-17  7:47       ` Andrew [this message]
2003-09-17 16:05         ` Andrew
2003-09-17 16:32           ` Martin Dowie
2003-09-17 16:36           ` Stupid! -was- " Andrew
2003-09-17 17:00             ` Stephane Richard
2003-09-17 17:15               ` Andrew
2003-09-19  4:07 ` Leon Winslow
2003-09-21 22:55   ` Andrew
  -- strict thread matches above, loose matches on Subject: below --
2003-09-22  0:44 Robert I. Eachus
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox