version 1.3, 1998/07/05 20:50:02
|
version 1.4, 2001/09/03 09:06:14
|
Line 175 DOES> 1+ rot 2* 2* rot + 2* + ;
|
Line 175 DOES> 1+ rot 2* 2* rot + 2* + ;
|
Create scratch ," " |
Create scratch ," " |
DOES> 1+ rot 2* 2* rot + 2* + ; |
DOES> 1+ rot 2* 2* rot + 2* + ; |
|
|
create bricks brick1 1 + , brick2 1 + , brick3 1 + , brick4 1 + , |
create bricks brick1 1 + a, brick2 1 + a, brick3 1 + a, brick4 1 + a, |
brick5 1 + , brick6 1 + , brick7 1 + , |
brick5 1 + a, brick6 1 + a, brick7 1 + a, |
|
|
create brick-val 1 c, 2 c, 3 c, 3 c, 4 c, 5 c, 5 c, |
create brick-val 1 c, 2 c, 3 c, 3 c, 4 c, 5 c, 5 c, |
|
|