theorem :: Restricted cut rule, No.1
  (|-_IPC r) & ({r} |-_IPC q) implies |-_IPC q
proof
  assume A1: (|-_IPC r) & ({r} |-_IPC q); then
  |-_IPC r => q by Th54;
  hence thesis by A1,Th37;
end;
