1\THEOREM INSERT_DEF pred_sets
2|- !x s. x INSERT s = {{y | (y = x) \/ y IN s}}
3\ENDTHEOREM
4