theorem
  cosh.p >= 1
proof
  (exp_R.p + exp_R.-p)/2 >= 2/2 by Lm24,XREAL_1:72;
  hence thesis by Def3;
end;
