update fica constant

db4
Doug Coleman 2010-01-04 10:59:00 -05:00
parent 2ca0375dee
commit cbef261fde
1 changed files with 1 additions and 0 deletions

View File

@ -9,6 +9,7 @@ ERROR: fica-base-unknown ;
: fica-base-rate ( year -- x )
H{
{ 2009 106800 }
{ 2008 102000 }
{ 2007 97500 }
} at [ fica-base-unknown ] unless* ;