theorem :: INTEGRA8:100
for A being non empty closed_interval Subset of REAL holds integral ((exp_R (#) exp_R),A) = (1 / 2) * (((exp_R . (upper_bound A)) ^2) - ((exp_R . (lower_bound A)) ^2))