gp.load.ant.solution

标准的GP源代码,由Andy Singleton维护

% gp.load ant "solution" GP1 page 154 $Revision: 1.1 $ WBL 10 Feb 1997
ant	= (IfFoodAhead (Move)
		(Prog3 (Left)
			(Prog2	(IfFoodAhead (Move)
					(Right))
				(Prog2	(Right)
					(Prog2	(Left)
						(Right))))
			(Prog2	(IfFoodAhead (Move)
					(Left))
				(Move))))