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

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

    define clonaMonton()
        {
        if( nextToABeeper )
            {
            pickbeeper();
            move();
            putbeeper();
            backmove();
            halfturn();
            clonaMonton();
            putbeeper();
            }
        }

    define multiplica()
        {
        while(nextToABeeper)
            {
            pickbeeper();
            move();
            clonaMonton();
            backmove();
            halfturn();
            }
        }

    program()
        {
        multiplica();
        turnoff();
        }
    }