class program
    {
    define turnright()
        {
        iterate(3)
            turnleft();
        }

    define halfturn()
        {
        turnleft();
        turnleft();
        }

    define backmove()
        {
        halfturn();
        move();
        }

    define leftmove()
        {
        turnleft();
        move();
        }

    define caminaAPared()
        {
        while( frontIsClear )
            move();
        }

    define colocaMonton()
        {
        while( anyBeepersInBeeperBag )
            putbeeper();
        }

    define cuentaHombres()
        {
        while( nextToABeeper )
            {
            turnleft();
            while(nextToABeeper)
                {
                pickbeeper();
                if( notNextToABeeper )
                    putbeeper();
                move();
                }
            halfturn();
            caminaAPared();
            backmove();
            turnright();
            move();
            }
        halfturn();
        caminaAPared();
        leftmove();
        leftmove();
        colocaMonton();
        }

    define cuentaMujeres()
        {
        while( nextToABeeper )
            {
            turnleft();
            while(nextToABeeper)
                {
                pickbeeper();
                move();
                }
            halfturn();
            caminaAPared();
            backmove();
            turnright();
            move();
            }
        halfturn();
        caminaAPared();
        turnleft();
        move();
        colocaMonton();
        }

    define resta()
        {
        if( nextToABeeper )
            {
            pickbeeper();
            leftmove();
            pickbeeper();
            backmove();
            turnleft();
            resta();
            putbeeper();
            }
        }

    program()
        {
        move();
        turnright();
        cuentaHombres();
        leftmove();
        leftmove();
        halfturn();
        cuentaMujeres();
        leftmove();
        turnleft();
        resta();
        turnoff();
        }
    }