How to include the integral of a certain function in another .m file function?

I have fun1.m file that I want to include in it the integral of cos(x) provided that the integral of cos(x) has to be in a different file too e.g. fun2.m

fun1()

fun2()

Answer 1

[Walter Roberson]

function r = fun1(x)
  y1 = fun2(x);           %numeric using all x values
  y2 = fun3(x);           %symbolic using first and last x values
  r = y1(x) - y2(x);

function result = fun2(x)
  result = trapz( x, cos(x) );    %one form of numeric integral

function result = fun3(x)
  syms X
  xint = int(cos(X), X, x(1), x(end));  %symbolic integral between endpoints
  result = double(xint);