dollarConvert.frink

View or download dollarConvert.frink in plain text format


// Function convert a dollar value to its value in another year and print
// it out in values for the specified year.
dollar[amount, year, targetYear=2000] :=
{
   targetUnit = eval["dollar_$targetYear"]
   value = format[eval["$amount dollar_$year"], targetUnit, 2]
   println["$year\t$amount\t$value"]
}

// The default is to convert to year 2000 dollars.  If you want some other
// year, pass it as the third argument to the function, like:
//  dollar[12344565, 1968, 2006]

dollar[8228012, 1981]
dollar[7985974, 1982]
dollar[8361120, 1983]
dollar[7927070, 1984]
dollar[8763176, 1985]
dollar[9738023, 1986]
dollar[10195740, 1987]



View or download dollarConvert.frink in plain text format


This is a program written in the programming language Frink.
For more information, view the Frink Documentation or see More Sample Frink Programs.

Alan Eliasen was born 17592 days, 15 hours, 37 minutes ago.