Summary
Bank account simulator for compound interest calculated daily and paid monthly

Metadata

Tags:	examples
Authors:	Alex Chapman

Words

Tuple classes

Class	Superclass	Slots
account	tuple	name interest-rate interest-payment-day opening-date transactions unpaid-interest interest-last-paid
transaction	tuple	date amount description

Ordinary words

Word	Stack effect
<account>	( name interest-rate interest-payment-day opening-date -- account )
<transaction>	( date amount description -- transaction )
>>transaction	( account transaction -- account )
?pay-interest	( account date -- )
accumulate-interest	( account date -- )
balance-on-date	( account date -- balance )
balance>>	( account -- balance )
daily-rate	( yearly-rate day -- daily-rate )
daily-rate>>	( account date -- rate )
each-day	( ... quot: ( ... day -- ... ) start end -- ... )
inserting-transactions	( account transactions -- account )
interest-payment-day?	( account date -- ? )
open-account	( name interest-rate interest-payment-day opening-date opening-balance -- account )
pay-interest	( account date -- )
process-day	( account date -- )
process-to-date	( account date -- account )
total	( transactions -- balance )
transactions-on-date	( account date -- transactions )
unpaid-interest+	( account amount -- account )

Class predicate words

Word	Stack effect
account?	( object -- ? )
transaction?	( object -- ? )

Files


Metadata files