Q := proc( n )
        option remember, system;
        if n = 1 or n = 2 then
                1
        else
                thisproc( n - thisproc( n - 1 ) ) + thisproc( n - thisproc( n - 2 ) )
        end if
end proc: