loaddata("../data/dataz.in7");
algebra
{
	DCONS = diff(CONS, 1);
	DINC = diff(INC, 1);
	DOUTPUT = diff(OUTPUT, 1);
	"CONS-INC" = CONS-INC;
	"INC-OUTPUT" = INC-OUTPUT;
	"S1973(3)" = dummy(1973,3,1992,3);
}

module("PcGive");
package("PcGive", "Multiple-equation");
usedata("dataz.in7");
system
{
    Y = DCONS, DINC, INFLAT, DOUTPUT;
    Z = DCONS_1, DINC_1, INFLAT_1, DOUTPUT_1, "CONS-INC_1", 
        "INC-OUTPUT_1", "S1973(3)", OUTPUT_1;
    U = Constant;
}
model
{
	"DCONS" = "CONS-INC_1", "DINC", "INFLAT";
	"DINC" = "INC-OUTPUT_1", "DCONS", "DOUTPUT";
	"INFLAT" = "INFLAT_1", "OUTPUT_1", "S1973(3)";
	"DOUTPUT" = "INFLAT_1", "OUTPUT_1", "S1973(3)";
}
estimate("FIML", 1953, 3, 1992, 3);
