function er=er28(x)
% er28		- Example problem 2.8 solution
global ns
ti=sept(1,x,[.83333,0,.16667],5);
sep(ti,5,[4 3])
er=.25-ns(3,1)./ns(3,2);
