

function utot = TotalFieldPlotsStuds(uinc,uscat,uscex,NTAE,NFS)

% NTAE is the number of terms included in the Karp Expansion
% uscaex(i,j) is the exact solution matrix
% uscat(i,j) is the numerical solution matrix
% NFS is the number of terms included in the series representation of the
% exact solution

%Globals
global k;
global rmax;
global N m;
global x y;

utot = uinc + uscat;

%Approximated Total Field
figure;
surf(x,y,abs(utot));
 str={['Approximated Total Field for '],...
      [ '   Terms Exp = ' num2str(NTAE)], ...
      [num2str(N) 'x'  num2str(m+1)   '    k= ' num2str(k)  '   R= '...
      num2str(rmax)]};
 title(str);
shading interp;
view(35,82);
colorbar;

end