\ 4tH library - 2ROT 2OVER - Copyright 2004 J.L. Bezemer \ You can redistribute this file and/or modify it under \ the terms of the GNU General Public License [UNDEFINED] 2ROT [IF] : 2OVER 2>R 2DUP 2R> 2SWAP ; : 2ROT 2>R 2SWAP 2R> 2SWAP ; [THEN]