Paste: test

Author: slava
Mode: factor
Date: Wed, 19 Nov 2008 03:49:47
Plain Text | 
IN: ui.gadgets.buttons.private

: checkmark-points ( dim -- points )
    {
        [ { 0 0 } v* { 0.5 0.5 } v+ ]
        [ { 1 1 } v* { 0.5 0.5 } v+ ]
        [ { 1 0 } v* { -0.3 0.5 } v+ ]
        [ { 0 1 } v* { -0.3 0.5 } v+ ]
    } cleave 4array ;

New Annotation

Summary:
Author:
Mode:
Body: