theorem :: INTEGR14:26
for n being Nat
for A being non empty closed_interval Subset of REAL
for f being PartFunc of REAL,REAL
for Z being open Subset of REAL st A c= Z & ( for x being Real st x in Z holds
f . x = (n * (sin . x)) / ((cos . x) #Z (n + 1)) ) & Z c= dom ((#Z n) * sec) & 1 <= n & Z = dom f & f | A is continuous holds
integral (f,A) = (((#Z n) * sec) . (upper_bound A)) - (((#Z n) * sec) . (lower_bound A))