steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove >r r>

db4
Doug Coleman 2008-12-14 00:44:23 -06:00
parent 1ef79bc87f
commit 3b5a6b8dc9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/taxes/usa/federal/federal.factor
View File

@ -56,4 +56,4 @@ M: federal withholding* ( salary w4 tax-table entity -- x )
] if ; ] if ;
: net ( salary w4 collector -- x ) : net ( salary w4 collector -- x )
>r dupd r> total-withholding - ; [ dupd ] dip total-withholding - ;