Alex, : set-start-location ( piece board-width -- ) 2 / floor over piece-width 2 / floor - 0 2array swap set-piece-location ;
I think / floor can be replaced with /i : : set-start-location ( piece board-width -- ) 2 /i over piece-width 2 /i - 0 2array swap set-piece-location ; Ed ------------------------------------------------------------------------- Using Tomcat but need to do more? Need to support web services, security? Get stuff done quickly with pre-integrated technology to make your job easier. Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642 _______________________________________________ Factor-talk mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/factor-talk
