].0,PI.[ /\ (sin " {0}) = {}
proof end;
then A3: ].0,PI.[ misses sin " {0} by XBOOLE_0:def 7;
].0,PI.[ \ (sin " {0}) c= (dom sin) \ (sin " {0}) by SIN_COS:24, XBOOLE_1:33;
then ].0,PI.[ c= (dom sin) \ (sin " {0}) by A3, XBOOLE_1:83;
then ].0,PI.[ c= (dom cos) /\ ((dom sin) \ (sin " {0})) by SIN_COS:24, XBOOLE_1:19;
hence ].0,PI.[ c= dom cot by RFUNCT_1:def 1; :: thesis: verum