:: deftheorem Def1 defines Pell's_solution PELLS_EQ:def 1 :
for D being Nat
for b2 being Element of [:INT,INT:] holds
( b2 is Pell's_solution of D iff ((b2 `1) ^2) - (D * ((b2 `2) ^2)) = 1 );