34 lines
471 B
Modula-2
34 lines
471 B
Modula-2
// --+ options: nostrict +--
|
|
|
|
/*
|
|
** Same as ex5.mod, but price is treated as an exoenous variable.
|
|
*/
|
|
|
|
parameters a0, a1, b0, b1;
|
|
|
|
a0 = 1.0;
|
|
a1 = 0.1;
|
|
b0 = 0.5;
|
|
b1 = 0.2;
|
|
|
|
model;
|
|
|
|
[endogenous='D']
|
|
D = a0 - a1*p;
|
|
|
|
[endogenous='S']
|
|
S = b0 + b1*p;
|
|
|
|
//[endogenous='p']
|
|
//S = D;
|
|
|
|
end;
|
|
|
|
if ~isequal(length(intersect(M_.endo_names, {'D'; 'S'})), 2)
|
|
error('Endogenous variables are wrong.')
|
|
end
|
|
|
|
if ~isequal(M_.exo_names, {'p'})
|
|
error('Exogenous variables are wrong.')
|
|
end
|