REDUCE_RULE : (thm -> thm)
#REDUCE_RULE (ASSUME "x = (100 + (60 - 17))");; . |- x = 143 #REDUCE_RULE (REFL "100 + 12 DIV 6");; |- T