:: deftheorem Def28 defines PI SIN_COS:def 28 :
for b1 being Real holds
( b1 = PI iff ( tan . (b1 / 4) = 1 & b1 in ].0,4.[ ) );