Handbook
Glossary
default-coordinate-system ( gadget -- gadget )
Vocabulary
ui
.
gadgets
.
slate
Inputs
gadget
an
object
Outputs
gadget
an
object
Definition
USING:
combinators
kernel
math
opengl.gl
;
IN:
ui.gadgets.slate
:
default-coordinate-system
( gadget -- gadget )
dup
{
[
drop
0
]
[
width
1
-
]
[
height
1
-
]
[
drop
0
]
}
cleave
-1 1
glOrtho
;