let a, b be Nat; :: thesis: ( a <= b implies seq_n^ a in Big_Oh (seq_n^ b) )
assume AS: a <= b ; :: thesis: seq_n^ a in Big_Oh (seq_n^ b)
per cases ( a = b or a < b ) by AS, XXREAL_0:1;
end;