Lines Matching refs:over
57 : tuck ( y x -- x y x) swap over ;
58 : within ( test low high -- flag ) over - >r - r> u< ;
65 rot over - dup 0< if
72 rot over - dup 0< if
78 swap over dabs <# #s rot sign #> type space ;
81 -rot swap over dabs <# #s rot sign #>
82 rot over - dup 0< if
91 -rot <# #s #> rot over - dup 0< if drop else spaces then type space ;
101 over
114 2over 2over
122 2over 2over
158 /dump @ over + swap