:: deftheorem Rescher defines Rescher_implication FUZIMPL1:def 20 :
for b1 being BinOp of [.0,1.] holds
( b1 = Rescher_implication iff for x, y being Element of [.0,1.] holds
( ( x <= y implies b1 . (x,y) = 1 ) & ( x > y implies b1 . (x,y) = 0 ) ) );