#
#  19. janúar 2009
#
#  Æfing í Applied computational economics and finance  
#  
#  set path í compecon samkvæmt leiðbeiningum í README-skrá sem fylgir compecon 
#
#
# virkaði í 2.1.73
#
#cepath='/home/helgi/ymislegt/matlabbaekur/applied_computational_economics_and_finance/www4.ncsu.edu/~pfackler/compecon/compecon'; path([cepath 'cetools;' cepath 'cedemos'],path);
#
#  Eftir update í 3.0.3 þurfti
#
cepath='$HOME/compecon/';
#
#  í linux 
#
#  eða t.d.
#
#
cepath='c:\compecon
#
#  og síðan að nota addpath
#
addpath $HOME/compecon/CEtools

addpath $HOME/compecon/CEdemos
#
# eða í windows
#
addpath c:\compecon\CEtools

addpath c:\compecon\CEdemos
#
# síðan á þetta að virka
#
# æfing á blaðsíðu 4.
#
[y,w]= qnwnorm(10,1,0.1);
a=1;
for it=1:100
   aold=a;
   p = 3 -2*a*y;
   f = w'*max(p,1);
   a= 0.5 +0.5*f
   if abs(a-aold) < 1.e-8, break end
end
disp(a);disp(w'*p);disp(f);
