%QR2    Specifications for examples in qr2.tex

beta  = .95;
alpha = .33;
tau   = 1.5;
rho   = .95;
delta = 0;
kbar  = (beta*alpha/(1-beta*(1-delta)))^(1/(1-alpha));
fbar  = kbar^alpha;
cbar  = fbar-delta*kbar;
kgrid = [5:2.5:25];
tgrid = [.6:.1:1.4];


nk    = length(kgrid);
nt    = length(tgrid);
k     = kgrid(:)*ones(1,nt);
theta = ones(nk,1)*tgrid(:)';
f     = theta.*k.^alpha;
lq    = qr2lq([alpha;beta;delta;rho;0;tau],1);
clq   = f-(lq(1)*k+lq(2)+lq(3)*log(theta));
c75   = .75*f;
cext  = (1-beta*alpha)*f;
cpro  = (cbar/fbar)*theta.*k.^alpha;

