Paste: constrain

Author: randy
Mode: factor
Date: Fri, 5 Dec 2008 11:05:04
Plain Text | 
: constrain ( n a b -- n ) 
2dup > [ swap ] when
rot min max ;

Annotation: +1

Author: randy
Mode: factor
Date: Fri, 5 Dec 2008 11:06:13
Plain Text | 
order of a and b doesn't matter now.

New Annotation

Summary:
Author:
Mode:
Body: