Area under curve `=` (average height) `times` (length of interval),
average height `=` (area under curve)/(length of interval),
average height `= 1/(b-a) int_a^b ftext[(]t text[)] dt`.