dynare/tests/block_bytecode/multimod.mod

2777 lines
127 KiB
Modula-2

var
CA_A CA_ACT CA_B CA_BT CA_C CA_COIL CA_CPI CA_CU CA_CURBAL CA_C_DI CA_C_PI CA_DLGDP CA_DLLF CA_ER CA_FACT CA_GDEF CA_GDP CA_GDP_FE CA_GE CA_GNP
CA_IM CA_INFL CA_INVEST CA_IOIL CA_IT CA_K CA_LF CA_M CA_MPC CA_MPCINV CA_MPK CA_NEER CA_NFA CA_P CA_PFM CA_PGNP CA_PGNPNO CA_PIM CA_PIMA CA_PIT
CA_PXM CA_PXT CA_Q CA_R CA_RCI CA_RL CA_RLR CA_RS CA_RSR CA_TAX CA_TAXH CA_TAXK CA_TB CA_TFP_FE CA_TRATE CA_UNR CA_UNR_A CA_W CA_WH CA_WH1 CA_WH2
CA_WH3 CA_WK CA_XM CA_XMA CA_XT CA_YD
DC_A DC_CTOT DC_DEBT DC_GDP DC_GDP_FE DC_IM DC_INVEST DC_INVESTC DC_INVESTM DC_IOIL DC_IT DC_K DC_KC DC_KM DC_NFA DC_NNPCAP DC_P DC_PGNP
DC_PIM DC_PIMA DC_PIT DC_PXM DC_PXT DC_QNT DC_XCOM DC_XM DC_XMA DC_XOIL DC_XSM DC_XT
FR_A FR_ACT FR_B FR_BT FR_C FR_COIL FR_CPI FR_CU FR_CURBAL FR_C_DI FR_C_PI FR_DLGDP FR_DLLF FR_ER FR_FACT FR_GDEF FR_GDP FR_GDP_FE FR_GE FR_GNP
FR_IM FR_INFL FR_INVEST FR_IOIL FR_IT FR_K FR_LF FR_M FR_MPC FR_MPCINV FR_MPK FR_NEER FR_NFA FR_P FR_PFM FR_PGNP FR_PGNPNO FR_PIM FR_PIMA FR_PIT
FR_PXM FR_PXT FR_Q FR_R FR_RCI FR_RL FR_RLR FR_RS FR_RSR FR_TAX FR_TAXH FR_TAXK FR_TB FR_TFP_FE FR_TRATE FR_UNR FR_UNR_A FR_W FR_WH FR_WH1 FR_WH2
FR_WH3 FR_WK FR_XM FR_XMA FR_XT FR_YD
GR_A GR_ACT GR_B GR_BT GR_C GR_COIL GR_CPI GR_CU GR_CURBAL GR_C_DI GR_C_PI GR_DLGDP GR_DLLF GR_ER GR_FACT GR_GDEF GR_GDP GR_GDP_FE GR_GE GR_GNP
GR_IM GR_INFL GR_INVEST GR_IOIL GR_IT GR_K GR_LF GR_M GR_MPC GR_MPCINV GR_MPK GR_NEER GR_NFA GR_P GR_PFM GR_PGNP GR_PGNPNO GR_PIM GR_PIMA GR_PIT
GR_PXM GR_PXT GR_Q GR_R GR_RCI GR_RL GR_RLR GR_RS GR_RSR GR_TAX GR_TAXH GR_TAXK GR_TB GR_TFP_FE GR_TRATE GR_UNR GR_UNR_A GR_W GR_WH GR_WH1 GR_WH2
GR_WH3 GR_WK GR_XM GR_XMA GR_XT GR_YD
HO_A HO_GDP HO_ICOM HO_IM HO_IT HO_NFA HO_PIT HO_PXT HO_XOIL HO_XT
IT_A IT_ACT IT_B IT_BT IT_C IT_COIL IT_CPI IT_CU IT_CURBAL IT_C_DI IT_C_PI IT_DLGDP IT_DLLF IT_ER IT_FACT IT_GDEF IT_GDP IT_GDP_FE IT_GE IT_GNP
IT_IM IT_INFL IT_INVEST IT_IOIL IT_IT IT_K IT_LF IT_M IT_MPC IT_MPCINV IT_MPK IT_NEER IT_NFA IT_P IT_PFM IT_PGNP IT_PGNPNO IT_PIM IT_PIMA IT_PIT
IT_PXM IT_PXT IT_Q IT_R IT_RCI IT_RL IT_RLR IT_RS IT_RSR IT_TAX IT_TAXH IT_TAXK IT_TB IT_TFP_FE IT_TRATE IT_UNR IT_UNR_A IT_W IT_WH IT_WH1 IT_WH2
IT_WH3 IT_WK IT_XM IT_XMA IT_XT IT_YD
JA_A JA_ACT JA_B JA_BT JA_C JA_COIL JA_CPI JA_CU JA_CURBAL JA_C_DI JA_C_PI JA_DLGDP JA_DLLF JA_ER JA_FACT JA_GDEF JA_GDP JA_GDP_FE JA_GE JA_GNP
JA_IM JA_INFL JA_INVEST JA_IOIL JA_IT JA_K JA_LF JA_M JA_MPC JA_MPCINV JA_MPK JA_NEER JA_NFA JA_P JA_PFM JA_PGNP JA_PGNPNO JA_PIM JA_PIMA JA_PIT
JA_PXM JA_PXT JA_Q JA_R JA_RCI JA_RL JA_RLR JA_RS JA_RSR JA_TAX JA_TAXH JA_TAXK JA_TB JA_TFP_FE JA_TRATE JA_UNR JA_UNR_A JA_W JA_WH JA_WH1 JA_WH2
JA_WH3 JA_WK JA_XM JA_XMA JA_XT JA_YD
PCOM POIL
RES_CA_ICOM
RES_FR_ICOM
RES_GR_ICOM
RES_IT_ICOM
RES_JA_ICOM
RES_SI_ICOM
RES_UK_ICOM
RES_US_ICOM
RW_FACT RW_IM RW_NEER RW_PFM RW_PIM RW_PIMA RW_PXM RW_RCI RW_XCOM RW_XM RW_XMA RW_XOIL
SI_A SI_ACT SI_B SI_BT SI_C SI_COIL SI_CPI SI_CU SI_CURBAL SI_C_DI SI_C_PI SI_DLGDP SI_DLLF SI_ER SI_FACT SI_GDEF SI_GDP SI_GDP_FE SI_GE SI_GNP
SI_IM SI_INFL SI_INVEST SI_IOIL SI_IT SI_K SI_LF SI_M SI_MPC SI_MPCINV SI_MPK SI_NEER SI_NFA SI_P SI_PFM SI_PGNP SI_PGNPNO SI_PIM SI_PIMA SI_PIT
SI_PXM SI_PXT SI_Q SI_R SI_RCI SI_RL SI_RLR SI_RS SI_RSR SI_TAX SI_TAXH SI_TAXK SI_TB SI_TFP_FE SI_TRATE SI_UNR SI_UNR_A SI_W SI_WH SI_WH1 SI_WH2
SI_WH3 SI_WK SI_XM SI_XMA SI_XT SI_YD
UK_A UK_ACT UK_B UK_BT UK_C UK_COIL UK_CPI UK_CU UK_CURBAL UK_C_DI UK_C_PI UK_DLGDP UK_DLLF UK_ER UK_FACT UK_GDEF UK_GDP UK_GDP_FE UK_GE UK_GNP
UK_IM UK_INFL UK_INVEST UK_IOIL UK_IT UK_K UK_LF UK_M UK_MPC UK_MPCINV UK_MPK UK_NEER UK_NFA UK_P UK_PFM UK_PGNP UK_PGNPNO UK_PIM UK_PIMA UK_PIT
UK_PXM UK_PXT UK_Q UK_R UK_RCI UK_RL UK_RLR UK_RS UK_RSR UK_TAX UK_TAXH UK_TAXK UK_TB UK_TFP_FE UK_TRATE UK_UNR UK_UNR_A UK_W UK_WH UK_WH1 UK_WH2
UK_WH3 UK_WK UK_XM UK_XMA UK_XT UK_YD
US_A US_ACT US_B US_BT US_C US_COIL US_CPI US_CU US_CURBAL US_C_DI US_C_PI US_DLGDP US_DLLF US_ER US_FACT US_GDEF US_GDP US_GDP_FE US_GE US_GNP
US_IM US_INFL US_INVEST US_IOIL US_IT US_K US_LF US_M US_MPC US_MPCINV US_MPK US_NEER US_NFA US_P US_PFM US_PGNP US_PGNPNO US_PIM US_PIMA US_PIT
US_PXM US_PXT US_Q US_R US_RCI US_RL US_RLR US_RR US_RS US_RSR US_TAX US_TAXH US_TAXK US_TB US_TFP_FE US_TRATE US_UNR US_UNR_A US_W US_WH US_WH1 US_WH2
US_WH3 US_WK US_XM US_XMA US_XT US_YD
WTRADE WTRADER
;
varexo
CA_ALPHA1 CA_ALPHA2 CA_ALPHA3 CA_BCHI1 CA_BCHI2 CA_BETA CA_BT_GDP_RAT CA_CPI_GAP_EXOG CA_CPI_TAR CA_DELTA CA_DELTA_SS CA_DEM3 CA_DLLF_SS CA_G CA_GDP_GAP_EXOG
CA_GEXOG CA_ICOM CA_LAMBDA CA_LAMBDA1 CA_LAMBDA2 CA_LAMBDA3 CA_MGROW CA_MT CA_NEER_PAR CA_NLIN CA_PAR CA_PART CA_PARUS CA_PGNPNO_GAP_EXOG CA_PGNPNO_TAR
CA_PGNP_GAP_EXOG CA_PGNP_TAR CA_PHI CA_POP CA_PREM CA_PROB CA_PRODOIL CA_P_GAP_EXOG CA_P_TAR CA_RSCON CA_RSCON2 CA_RS_EXOG CA_SIGMA CA_TAXK_ALPHA CA_TAXK_SHAR
CA_TPREM CA_TRATEK CA_TRATE_ALPHA CA_TRATE_EXOG CA_UNR_FE CA_UNR_GAP_EXOG CA_XOIL CA_X_RS1 CA_X_RS2
DC_BETA DC_DELTA DC_INFL DC_KCOMSHR DC_OILSHR DC_PROD DC_XOILSHR DC_XTNDHIST
FR_ALPHA1 FR_ALPHA2 FR_ALPHA3 FR_BCHI1 FR_BCHI2 FR_BETA FR_BT_GDP_RAT FR_CPI_GAP_EXOG FR_CPI_TAR FR_DELTA FR_DELTA_SS FR_DEM3 FR_DLLF_SS FR_G FR_GDP_GAP_EXOG
FR_GEXOG FR_ICOM FR_LAMBDA FR_LAMBDA1 FR_LAMBDA2 FR_LAMBDA3 FR_MGROW FR_MT FR_NEER_PAR FR_NLIN FR_PAR FR_PART FR_PARUS FR_PGNPNO_GAP_EXOG FR_PGNPNO_TAR
FR_PGNP_GAP_EXOG FR_PGNP_TAR FR_PHI FR_POP FR_PREM FR_PROB FR_PRODOIL FR_P_GAP_EXOG FR_P_TAR FR_RSCON FR_RSCON2 FR_RS_EXOG FR_SIGMA FR_TAXK_ALPHA FR_TAXK_SHAR
FR_TPREM FR_TRATEK FR_TRATE_ALPHA FR_TRATE_EXOG FR_UNR_FE FR_UNR_GAP_EXOG FR_XOIL FR_X_RS1 FR_X_RS2
GREAL GREAL_SS
GR_ALPHA1 GR_ALPHA2 GR_ALPHA3 GR_BCHI1 GR_BCHI2 GR_BETA GR_BT_GDP_RAT GR_CPI_GAP_EXOG GR_CPI_TAR GR_DELTA GR_DELTA_SS GR_DEM3 GR_DLLF_SS GR_G GR_GDP_GAP_EXOG
GR_GEXOG GR_ICOM GR_LAMBDA GR_LAMBDA1 GR_LAMBDA2 GR_LAMBDA3 GR_MGROW GR_MT GR_NEER_PAR GR_NLIN GR_PAR GR_PART GR_PARUS GR_PGNPNO_GAP_EXOG GR_PGNPNO_TAR
GR_PGNP_GAP_EXOG GR_PGNP_TAR GR_PHI GR_POP GR_PREM GR_PROB GR_PRODOIL GR_P_GAP_EXOG GR_P_TAR GR_RSCON GR_RSCON2 GR_RS_EXOG GR_SIGMA GR_TAXK_ALPHA GR_TAXK_SHAR
GR_TPREM GR_TRATEK GR_TRATE_ALPHA GR_TRATE_EXOG GR_UNR_FE GR_UNR_GAP_EXOG GR_XOIL GR_X_RS1 GR_X_RS2
HO_IOIL HO_QNT HO_XM
IT_ALPHA1 IT_ALPHA2 IT_ALPHA3 IT_BCHI1 IT_BCHI2 IT_BETA IT_BT_GDP_RAT IT_CPI_GAP_EXOG IT_CPI_TAR IT_DELTA IT_DELTA_SS IT_DEM3 IT_DLLF_SS IT_G IT_GDP_GAP_EXOG
IT_GEXOG IT_ICOM IT_LAMBDA IT_LAMBDA1 IT_LAMBDA2 IT_LAMBDA3 IT_MGROW IT_MT IT_NEER_PAR IT_NLIN IT_PAR IT_PART IT_PARUS IT_PGNPNO_GAP_EXOG IT_PGNPNO_TAR
IT_PGNP_GAP_EXOG IT_PGNP_TAR IT_PHI IT_POP IT_PREM IT_PROB IT_PRODOIL IT_P_GAP_EXOG IT_P_TAR IT_RSCON IT_RSCON2 IT_RS_EXOG IT_SIGMA IT_TAXK_ALPHA IT_TAXK_SHAR
IT_TPREM IT_TRATEK IT_TRATE_ALPHA IT_TRATE_EXOG IT_UNR_FE IT_UNR_GAP_EXOG IT_XOIL IT_X_RS1 IT_X_RS2
JA_ALPHA1 JA_ALPHA2 JA_ALPHA3 JA_BCHI1 JA_BCHI2 JA_BETA JA_BT_GDP_RAT JA_CPI_GAP_EXOG JA_CPI_TAR JA_DELTA JA_DELTA_SS JA_DEM3 JA_DLLF_SS JA_G JA_GDP_GAP_EXOG
JA_GEXOG JA_ICOM JA_LAMBDA JA_LAMBDA1 JA_LAMBDA2 JA_LAMBDA3 JA_MGROW JA_MT JA_NEER_PAR JA_NLIN JA_PAR JA_PART JA_PARUS JA_PGNPNO_GAP_EXOG JA_PGNPNO_TAR
JA_PGNP_GAP_EXOG JA_PGNP_TAR JA_PHI JA_POP JA_PREM JA_PROB JA_PRODOIL JA_P_GAP_EXOG JA_P_TAR JA_RSCON JA_RSCON2 JA_RS_EXOG JA_SIGMA JA_TAXK_ALPHA JA_TAXK_SHAR
JA_TPREM JA_TRATEK JA_TRATE_ALPHA JA_TRATE_EXOG JA_UNR_FE JA_UNR_GAP_EXOG JA_XOIL JA_X_RS1 JA_X_RS2
RES_CA_COIL RES_CA_CPI RES_CA_C_DI RES_CA_ER RES_CA_GNP RES_CA_IM RES_CA_IOIL RES_CA_K RES_CA_M RES_CA_MPC RES_CA_NFA RES_CA_P RES_CA_PGNP RES_CA_PIM RES_CA_PXM
RES_CA_RL RES_CA_RS RES_CA_TFP_FE RES_CA_TRATE RES_CA_UNR_A RES_CA_WH1 RES_CA_WH2 RES_CA_WH3 RES_CA_WK RES_CA_XM
RES_DC_CTOT RES_DC_DEBT RES_DC_GDP_FE RES_DC_IT RES_DC_NFA RES_DC_PGNP RES_DC_PIM RES_DC_PIMA RES_DC_PXM RES_DC_QNT RES_DC_XOIL RES_DC_XSM
RES_FR_COIL RES_FR_CPI RES_FR_C_DI RES_FR_ER RES_FR_GNP RES_FR_IM RES_FR_IOIL RES_FR_K RES_FR_M RES_FR_MPC RES_FR_NFA RES_FR_P RES_FR_PGNP RES_FR_PIM RES_FR_PXM
RES_FR_RL RES_FR_RS RES_FR_TFP_FE RES_FR_TRATE RES_FR_UNR_A RES_FR_WH1 RES_FR_WH2 RES_FR_WH3 RES_FR_WK RES_FR_XM
RES_GR_COIL RES_GR_CPI RES_GR_C_DI RES_GR_ER RES_GR_GNP RES_GR_IM RES_GR_IOIL RES_GR_K RES_GR_M RES_GR_MPC RES_GR_NFA RES_GR_P RES_GR_PGNP RES_GR_PIM RES_GR_PXM
RES_GR_RL RES_GR_RS RES_GR_TFP_FE RES_GR_TRATE RES_GR_UNR_A RES_GR_WH1 RES_GR_WH2 RES_GR_WH3 RES_GR_WK RES_GR_XM
RES_HO_ICOM RES_HO_IM RES_HO_PIT RES_HO_PXT
RES_IT_COIL RES_IT_CPI RES_IT_C_DI RES_IT_ER RES_IT_GNP RES_IT_IM RES_IT_IOIL RES_IT_K RES_IT_M RES_IT_MPC RES_IT_NFA RES_IT_P RES_IT_PGNP RES_IT_PIM RES_IT_PXM
RES_IT_RL RES_IT_RS RES_IT_TFP_FE RES_IT_TRATE RES_IT_UNR_A RES_IT_WH1 RES_IT_WH2 RES_IT_WH3 RES_IT_WK RES_IT_XM
RES_JA_COIL RES_JA_CPI RES_JA_C_DI RES_JA_ER RES_JA_GNP RES_JA_IM RES_JA_IOIL RES_JA_K RES_JA_M RES_JA_MPC RES_JA_NFA RES_JA_P RES_JA_PGNP RES_JA_PIM RES_JA_PXM
RES_JA_RL RES_JA_RS RES_JA_TFP_FE RES_JA_TRATE RES_JA_UNR_A RES_JA_WH1 RES_JA_WH2 RES_JA_WH3 RES_JA_WK RES_JA_XM
RES_PCOM
RES_RW_PIM RES_RW_PXM RES_RW_XM
RES_SI_COIL RES_SI_CPI RES_SI_C_DI RES_SI_ER RES_SI_GNP RES_SI_IM RES_SI_IOIL RES_SI_K RES_SI_M RES_SI_MPC RES_SI_NFA RES_SI_P RES_SI_PGNP RES_SI_PIM RES_SI_PXM
RES_SI_RL RES_SI_RS RES_SI_TFP_FE RES_SI_TRATE RES_SI_UNR_A RES_SI_WH1 RES_SI_WH2 RES_SI_WH3 RES_SI_WK RES_SI_XM
RES_UK_COIL RES_UK_CPI RES_UK_C_DI RES_UK_ER RES_UK_GNP RES_UK_IM RES_UK_IOIL RES_UK_K RES_UK_M RES_UK_MPC RES_UK_NFA RES_UK_P RES_UK_PGNP RES_UK_PIM RES_UK_PXM
RES_UK_RL RES_UK_RS RES_UK_TFP_FE RES_UK_TRATE RES_UK_UNR_A RES_UK_WH1 RES_UK_WH2 RES_UK_WH3 RES_UK_WK RES_UK_XM
RES_US_COIL RES_US_CPI RES_US_C_DI RES_US_ER RES_US_GNP RES_US_IM RES_US_IOIL RES_US_K RES_US_M RES_US_MPC RES_US_NFA RES_US_P RES_US_PGNP RES_US_PIM RES_US_PXM
RES_US_RL RES_US_RS RES_US_TFP_FE RES_US_TRATE RES_US_UNR_A RES_US_WH1 RES_US_WH2 RES_US_WH3 RES_US_WK RES_US_XM
RES_WTRADE RES_WTRADER RPOIL
RW_ER RW_INFL
SI_ALPHA1 SI_ALPHA2 SI_ALPHA3 SI_BCHI1 SI_BCHI2 SI_BETA SI_BT_GDP_RAT SI_CPI_GAP_EXOG SI_CPI_TAR SI_DELTA SI_DELTA_SS SI_DEM3 SI_DLLF_SS SI_G SI_GDP_GAP_EXOG
SI_GEXOG SI_ICOM SI_LAMBDA SI_LAMBDA1 SI_LAMBDA2 SI_LAMBDA3 SI_MGROW SI_MT SI_NEER_PAR SI_NLIN SI_PAR SI_PART SI_PARUS SI_PGNPNO_GAP_EXOG SI_PGNPNO_TAR
SI_PGNP_GAP_EXOG SI_PGNP_TAR SI_PHI SI_POP SI_PREM SI_PROB SI_PRODOIL SI_P_GAP_EXOG SI_P_TAR SI_RSCON SI_RSCON2 SI_RS_EXOG SI_SIGMA SI_TAXK_ALPHA SI_TAXK_SHAR
SI_TPREM SI_TRATEK SI_TRATE_ALPHA SI_TRATE_EXOG SI_UNR_FE SI_UNR_GAP_EXOG SI_XOIL SI_X_RS1 SI_X_RS2
TME
UK_ALPHA1 UK_ALPHA2 UK_ALPHA3 UK_BCHI1 UK_BCHI2 UK_BETA UK_BT_GDP_RAT UK_CPI_GAP_EXOG UK_CPI_TAR UK_DELTA UK_DELTA_SS UK_DEM3 UK_DLLF_SS UK_G UK_GDP_GAP_EXOG
UK_GEXOG UK_ICOM UK_LAMBDA UK_LAMBDA1 UK_LAMBDA2 UK_LAMBDA3 UK_MGROW UK_MT UK_NEER_PAR UK_NLIN UK_PAR UK_PART UK_PARUS UK_PGNPNO_GAP_EXOG UK_PGNPNO_TAR
UK_PGNP_GAP_EXOG UK_PGNP_TAR UK_PHI UK_POP UK_PREM UK_PROB UK_PRODOIL UK_P_GAP_EXOG UK_P_TAR UK_RSCON UK_RSCON2 UK_RS_EXOG UK_SIGMA UK_TAXK_ALPHA UK_TAXK_SHAR
UK_TPREM UK_TRATEK UK_TRATE_ALPHA UK_TRATE_EXOG UK_UNR_FE UK_UNR_GAP_EXOG UK_XOIL UK_X_RS1 UK_X_RS2
US_ALPHA1 US_ALPHA2 US_ALPHA3 US_BCHI1 US_BCHI2 US_BETA US_BT_GDP_RAT US_CPI_GAP_EXOG US_CPI_TAR US_DELTA US_DELTA_SS US_DEM3 US_DLLF_SS US_G US_GDP_GAP_EXOG
US_GEXOG US_ICOM US_LAMBDA US_LAMBDA1 US_LAMBDA2 US_LAMBDA3 US_MGROW US_MT US_NEER_PAR US_NLIN US_PAR US_PART US_PARUS US_PGNPNO_GAP_EXOG US_PGNPNO_TAR
US_PGNP_GAP_EXOG US_PGNP_TAR US_PHI US_POP US_PREM US_PROB US_PRODOIL US_P_GAP_EXOG US_P_TAR US_RRBAR US_RSCON US_RSCON2 US_RS_EXOG US_SIGMA US_TAXK_ALPHA
US_TAXK_SHAR US_TPREM US_TRATEK US_TRATE_ALPHA US_TRATE_EXOG US_UNR_FE US_UNR_GAP_EXOG US_XOIL US_X_RS1 US_X_RS2;
parameters
CA_CHI CA_COIL0 CA_COIL1 CA_COIL2 CA_COIL3 CA_COIL4 CA_CPI1 CA_CPI2 CA_C_MPROP CA_DELTA_PI CA_E96 CA_GAMMA CA_G_MPROP CA_IC0 CA_IC1 CA_IC2 CA_IC3 CA_IC4
CA_IC5 CA_IM0 CA_IM1 CA_IM2 CA_IM3 CA_INVEST_MPROP CA_K1 CA_K2 CA_M0 CA_M2 CA_M4 CA_PXM0 CA_PXM1 CA_PXM2 CA_RS1 CA_RS1PERM CA_RS2 CA_RS3 CA_RS4 CA_RS5
CA_RS6 CA_RTARC1 CA_RTARC2 CA_RTARC3 CA_RTARC4 CA_RTARF1 CA_RTARF2 CA_RTARF3 CA_RTARF4 CA_UNR_1 CA_UNR_2 CA_WT CA_XM0 CA_XM1 CA_XM2 CA_XM3 CA_XT_MPROP
DC_C0 DC_C1 DC_C2 DC_DEBT1 DC_DEBT2 DC_GDP_FE0
FR_CHI FR_COIL0 FR_COIL1 FR_COIL2 FR_COIL3 FR_COIL4 FR_CPI1 FR_CPI2 FR_C_MPROP FR_DELTA_PI FR_E96 FR_GAMMA FR_G_MPROP FR_IC0 FR_IC1 FR_IC2 FR_IC3 FR_IC4
FR_IC5 FR_IM0 FR_IM1 FR_IM2 FR_IM3 FR_INVEST_MPROP FR_K1 FR_K2 FR_M0 FR_M2 FR_M4 FR_PXM0 FR_PXM1 FR_PXM2 FR_RS1 FR_RS1PERM FR_RS2 FR_RS3 FR_RS4 FR_RS5
FR_RS6 FR_RTARC1 FR_RTARC2 FR_RTARC3 FR_RTARC4 FR_RTARF1 FR_RTARF2 FR_RTARF3 FR_RTARF4 FR_UNR_1 FR_UNR_2 FR_WT FR_XM0 FR_XM1 FR_XM2 FR_XM3 FR_XT_MPROP
GR_CHI GR_COIL0 GR_COIL1 GR_COIL2 GR_COIL3 GR_COIL4 GR_CPI1 GR_CPI2 GR_C_MPROP GR_DELTA_PI GR_E96 GR_GAMMA GR_G_MPROP GR_IC0 GR_IC1 GR_IC2 GR_IC3 GR_IC4
GR_IC5 GR_IM0 GR_IM1 GR_IM2 GR_IM3 GR_INVEST_MPROP GR_K1 GR_K2 GR_M0 GR_M2 GR_M4 GR_PXM0 GR_PXM1 GR_PXM2 GR_RS1 GR_RS1PERM GR_RS2 GR_RS3 GR_RS4 GR_RS5
GR_RS6 GR_RTARC1 GR_RTARC2 GR_RTARC3 GR_RTARC4 GR_RTARF1 GR_RTARF2 GR_RTARF3 GR_RTARF4 GR_UNR_1 GR_UNR_2 GR_WT GR_XM0 GR_XM1 GR_XM2 GR_XM3 GR_XT_MPROP
HO_A0 HO_A1 HO_IC2
ISR
IT_CHI IT_COIL0 IT_COIL1 IT_COIL2 IT_COIL3 IT_COIL4 IT_CPI1 IT_CPI2 IT_C_MPROP IT_DELTA_PI IT_E96 IT_GAMMA IT_G_MPROP IT_IC0 IT_IC1 IT_IC2 IT_IC3 IT_IC4
IT_IC5 IT_IM0 IT_IM1 IT_IM2 IT_IM3 IT_INVEST_MPROP IT_K1 IT_K2 IT_M0 IT_M2 IT_M4 IT_PXM0 IT_PXM1 IT_PXM2 IT_RS1 IT_RS1PERM IT_RS2 IT_RS3 IT_RS4 IT_RS5
IT_RS6 IT_RTARC1 IT_RTARC2 IT_RTARC3 IT_RTARC4 IT_RTARF1 IT_RTARF2 IT_RTARF3 IT_RTARF4 IT_UNR_1 IT_UNR_2 IT_WT IT_XM0 IT_XM1 IT_XM2 IT_XM3 IT_XT_MPROP
JA_CHI JA_COIL0 JA_COIL1 JA_COIL2 JA_COIL3 JA_COIL4 JA_CPI1 JA_CPI2 JA_C_MPROP JA_DELTA_PI JA_E96 JA_GAMMA JA_G_MPROP JA_IC0 JA_IC1 JA_IC2 JA_IC3 JA_IC4
JA_IC5 JA_IM0 JA_IM1 JA_IM2 JA_IM3 JA_INVEST_MPROP JA_K1 JA_K2 JA_M0 JA_M2 JA_M4 JA_PXM0 JA_PXM1 JA_PXM2 JA_RS1 JA_RS1PERM JA_RS2 JA_RS3 JA_RS4 JA_RS5
JA_RS6 JA_RTARC1 JA_RTARC2 JA_RTARC3 JA_RTARC4 JA_RTARF1 JA_RTARF2 JA_RTARF3 JA_RTARF4 JA_UNR_1 JA_UNR_2 JA_WT JA_XM0 JA_XM1 JA_XM2 JA_XM3 JA_XT_MPROP
RW_E96 RW_PXM1 RW_PXM2 RW_XCOM1 RW_XM0 RW_XM1 RW_XM2 RW_XM3 RW_XSM1
S0101 S0102 S0103 S0104 S0105 S0106 S0107 S0108 S0109
S0201 S0202 S0203 S0204 S0205 S0206 S0207 S0208 S0209
S0301 S0302 S0303 S0304 S0305 S0306 S0307 S0308 S0309
S0401 S0402 S0403 S0404 S0405 S0406 S0407 S0408 S0409
S0501 S0502 S0503 S0504 S0505 S0506 S0507 S0508 S0509
S0601 S0602 S0603 S0604 S0605 S0606 S0607 S0608 S0609
S0701 S0702 S0703 S0704 S0705 S0706 S0707 S0708 S0709
S0801 S0802 S0803 S0804 S0805 S0806 S0807 S0808 S0809
S0901 S0902 S0903 S0904 S0905 S0906 S0907 S0908 S0909
SI_CHI SI_COIL0 SI_COIL1 SI_COIL2 SI_COIL3 SI_COIL4 SI_CPI1 SI_CPI2 SI_C_MPROP SI_DELTA_PI SI_E96 SI_GAMMA SI_G_MPROP SI_IC0 SI_IC1 SI_IC2 SI_IC3 SI_IC4
SI_IC5 SI_IM0 SI_IM1 SI_IM2 SI_IM3 SI_INVEST_MPROP SI_K1 SI_K2 SI_M0 SI_M2 SI_M4 SI_PXM0 SI_PXM1 SI_PXM2 SI_RS1 SI_RS1PERM SI_RS2 SI_RS3 SI_RS4 SI_RS5
SI_RS6 SI_RTARC1 SI_RTARC2 SI_RTARC3 SI_RTARC4 SI_RTARF1 SI_RTARF2 SI_RTARF3 SI_RTARF4 SI_UNR_1 SI_UNR_2 SI_WT SI_XM0 SI_XM1 SI_XM2 SI_XM3 SI_XT_MPROP
T01 T02 T03 T04 T05 T06 T07 T08 T09
TAU1 TRDE TRDER
UK_CHI UK_COIL0 UK_COIL1 UK_COIL2 UK_COIL3 UK_COIL4 UK_CPI1 UK_CPI2 UK_C_MPROP UK_DELTA_PI UK_E96 UK_GAMMA UK_G_MPROP UK_IC0 UK_IC1 UK_IC2 UK_IC3 UK_IC4
UK_IC5 UK_IM0 UK_IM1 UK_IM2 UK_IM3 UK_INVEST_MPROP UK_K1 UK_K2 UK_M0 UK_M2 UK_M4 UK_PXM0 UK_PXM1 UK_PXM2 UK_RS1 UK_RS1PERM UK_RS2 UK_RS3 UK_RS4 UK_RS5
UK_RS6 UK_RTARC1 UK_RTARC2 UK_RTARC3 UK_RTARC4 UK_RTARF1 UK_RTARF2 UK_RTARF3 UK_RTARF4 UK_UNR_1 UK_UNR_2 UK_WT UK_XM0 UK_XM1 UK_XM2 UK_XM3 UK_XT_MPROP
US_CHI US_COIL0 US_COIL1 US_COIL2 US_COIL3 US_COIL4 US_CPI1 US_CPI2 US_C_MPROP US_DELTA_PI US_E96 US_GAMMA US_G_MPROP US_IC0 US_IC1 US_IC2 US_IC3 US_IC4
US_IC5 US_IM0 US_IM1 US_IM2 US_IM3 US_INVEST_MPROP US_K1 US_K2 US_M0 US_M2 US_M4 US_PXM0 US_PXM1 US_PXM2 US_RS1 US_RS1PERM US_RS2 US_RS3 US_RS4 US_RS5
US_RS6 US_RTARC1 US_RTARC2 US_RTARC3 US_RTARC4 US_RTARF1 US_RTARF2 US_RTARF3 US_RTARF4 US_UNR_1 US_UNR_2 US_WT US_XM0 US_XM1 US_XM2 US_XM3 US_XT_MPROP
V0102 V0103 V0104 V0105 V0106 V0107 V0108
V0201 V0203 V0204 V0205 V0206 V0207 V0208
V0301 V0302 V0304 V0305 V0306 V0307 V0308
V0401 V0402 V0403 V0405 V0406 V0407 V0408
V0501 V0502 V0503 V0504 V0506 V0507 V0508
V0601 V0602 V0603 V0604 V0605 V0607 V0608
V0701 V0702 V0703 V0704 V0705 V0706 V0708
V0801 V0802 V0803 V0804 V0805 V0806 V0807
W0101 W0102 W0103 W0104 W0105 W0106 W0107 W0108 W0109
W0201 W0202 W0203 W0204 W0205 W0206 W0207 W0208 W0209
W0301 W0302 W0303 W0304 W0305 W0306 W0307 W0308 W0309
W0401 W0402 W0403 W0404 W0405 W0406 W0407 W0408 W0409
W0501 W0502 W0503 W0504 W0505 W0506 W0507 W0508 W0509
W0601 W0602 W0603 W0604 W0605 W0606 W0607 W0608 W0609
W0701 W0702 W0703 W0704 W0705 W0706 W0707 W0708 W0709
W0801 W0802 W0803 W0804 W0805 W0806 W0807 W0808 W0809
W0901 W0902 W0903 W0904 W0905 W0906 W0907 W0908 W0909;
CA_CHI=12;
CA_COIL0=-0.23205499351;
CA_COIL1=0.971576988697;
CA_COIL2=-0.0460230000317;
CA_COIL3=-0.0477560013533;
CA_COIL4=0.0639569982886;
CA_CPI1=0.0885436907411;
CA_CPI2=0.584154784679;
CA_C_MPROP=0.178070038557;
CA_DELTA_PI=0.53;
CA_E96=0.733423769474;
CA_GAMMA=1.77305098623;
CA_G_MPROP=0.184400975704;
CA_IC0=-3.32013988495;
CA_IC1=2.43067002296;
CA_IC2=-1.11615002155;
CA_IC3=-0.562039971352;
CA_IC4=0.662097990513;
CA_IC5=-1;
CA_IM0=0.0133133819327;
CA_IM1=-0.339117258787;
CA_IM2=0.0625357478857;
CA_IM3=-0.991348028183;
CA_INVEST_MPROP=0.515719473362;
CA_K1=0.0328033864498;
CA_K2=0.0473355539143;
CA_M0=-0.0607150010765;
CA_M2=-0.0054020001553;
CA_M4=0.788931012154;
CA_PXM0=-0.0128829535097;
CA_PXM1=0.645817816257;
CA_PXM2=0.0349373221397;
CA_RS1=0.333;
CA_RS1PERM=0.333;
CA_RS2=0;
CA_RS3=0;
CA_RS4=0;
CA_RS5=0;
CA_RS6=0;
CA_RTARC1=0;
CA_RTARC2=0;
CA_RTARC3=0;
CA_RTARC4=0;
CA_RTARF1=0;
CA_RTARF2=0;
CA_RTARF3=0;
CA_RTARF4=0;
CA_UNR_1=-0.42063587904;
CA_UNR_2=0.32201731205;
CA_WT=6.36961058059e-006;
CA_XM0=-0.00616873381659;
CA_XM1=-0.419528901577;
CA_XM2=0.0101102301851;
CA_XM3=-1.74084436893;
CA_XT_MPROP=0.15729150176;
DC_C0=-0.433786988258;
DC_C1=0.366304010153;
DC_C2=0.372914999723;
DC_DEBT1=0.600000023842;
DC_DEBT2=0.15000000596;
DC_GDP_FE0=3.73925995827;
FR_CHI=12;
FR_COIL0=-0.234044000506;
FR_COIL1=2.4851899147;
FR_COIL2=-0.0460230000317;
FR_COIL3=-0.0477560013533;
FR_COIL4=0.0639569982886;
FR_CPI1=0.133349880576;
FR_CPI2=0.822861135006;
FR_C_MPROP=0.164363101125;
FR_DELTA_PI=1;
FR_E96=0.195483461022;
FR_GAMMA=1.13691873848;
FR_G_MPROP=0.0880697220564;
FR_IC0=-0.19662900269;
FR_IC1=1.18206000328;
FR_IC2=-0.317216992378;
FR_IC3=-0.126195997;
FR_IC4=0.271228998899;
FR_IC5=-0.513716995716;
FR_IM0=0.00227451790124;
FR_IM1=-0.339117258787;
FR_IM2=0.140992045403;
FR_IM3=-0.991348028183;
FR_INVEST_MPROP=0.330241620541;
FR_K1=0.0328033864498;
FR_K2=0.0473355539143;
FR_M0=0.125633999705;
FR_M2=-0.0054020001553;
FR_M4=0.788931012154;
FR_PXM0=-0.00220575975254;
FR_PXM1=0.705334246159;
FR_PXM2=0.0349373221397;
FR_RS1=0;
FR_RS1PERM=0.333;
FR_RS2=2000000;
FR_RS3=0;
FR_RS4=0;
FR_RS5=0;
FR_RS6=0;
FR_RTARC1=0;
FR_RTARC2=0;
FR_RTARC3=0;
FR_RTARC4=0;
FR_RTARF1=0;
FR_RTARF2=0;
FR_RTARF3=0;
FR_RTARF4=0;
FR_UNR_1=-0.295711427927;
FR_UNR_2=0.437749415636;
FR_WT=1.6754593069e-005;
FR_XM0=-0.00668761134148;
FR_XM1=-0.482208490372;
FR_XM2=0.014295168221;
FR_XM3=-1.74084436893;
FR_XT_MPROP=0.153821244836;
GR_CHI=12;
GR_COIL0=-0.235900998116;
GR_COIL1=1.66013002396;
GR_COIL2=-0.0460230000317;
GR_COIL3=-0.0477560013533;
GR_COIL4=0.0639569982886;
GR_CPI1=0.154569670558;
GR_CPI2=0.557855904102;
GR_C_MPROP=0.166775077581;
GR_DELTA_PI=0.53;
GR_E96=0.66455155611;
GR_GAMMA=0.819746218622;
GR_G_MPROP=0.0776999294758;
GR_IC0=-0.014525000006;
GR_IC1=1.10573005676;
GR_IC2=-0.48298099637;
GR_IC3=0;
GR_IC4=0;
GR_IC5=0;
GR_IM0=0.0129903983325;
GR_IM1=-0.339117258787;
GR_IM2=0.133345082402;
GR_IM3=-0.991348028183;
GR_INVEST_MPROP=0.197875678539;
GR_K1=0.0328033864498;
GR_K2=0.0473355539143;
GR_M0=0.136906996369;
GR_M2=-0.0054020001553;
GR_M4=0.788931012154;
GR_PXM0=-0.00301471399143;
GR_PXM1=0.808721482754;
GR_PXM2=0.0349373221397;
GR_RS1=0.333;
GR_RS1PERM=0.333;
GR_RS2=0;
GR_RS3=0;
GR_RS4=0;
GR_RS5=0;
GR_RS6=0;
GR_RTARC1=0;
GR_RTARC2=0;
GR_RTARC3=0;
GR_RTARC4=0;
GR_RTARF1=0;
GR_RTARF2=0;
GR_RTARF3=0;
GR_RTARF4=0;
GR_UNR_1=-0.337131500244;
GR_UNR_2=0.177726686001;
GR_WT=2.56170225665e-005;
GR_XM0=-0.00160425971262;
GR_XM1=-0.404824435711;
GR_XM2=0.0564797371626;
GR_XM3=-1.74084436893;
GR_XT_MPROP=0.248123139143;
HO_A0=0;
HO_A1=0.140000000596;
HO_IC2=-1.03489995003;
ISR=0.0299999993294;
IT_CHI=12;
IT_COIL0=-0.231263995171;
IT_COIL1=0.593788981438;
IT_COIL2=-0.0460230000317;
IT_COIL3=-0.0477560013533;
IT_COIL4=0.0639569982886;
IT_CPI1=0.0572924762964;
IT_CPI2=0.849322021008;
IT_C_MPROP=0.170956239104;
IT_DELTA_PI=1;
IT_E96=0.648110522889;
IT_GAMMA=2.30496358126;
IT_G_MPROP=0.0941127538681;
IT_IC0=-0.746583998203;
IT_IC1=2.10226988792;
IT_IC2=-0.430978000164;
IT_IC3=-0.278881013393;
IT_IC4=0.292979985476;
IT_IC5=-0.616999983788;
IT_IM0=-0.0256050173193;
IT_IM1=-0.339117258787;
IT_IM2=0.344494223595;
IT_IM3=-0.991348028183;
IT_INVEST_MPROP=0.166337579489;
IT_K1=0.0328033864498;
IT_K2=0.0473355539143;
IT_M0=0.161681994796;
IT_M2=-0.0054020001553;
IT_M4=0.788931012154;
IT_PXM0=0.000566755014006;
IT_PXM1=0.658845901489;
IT_PXM2=0.0349373221397;
IT_RS1=0;
IT_RS1PERM=0.333;
IT_RS2=2000000;
IT_RS3=0;
IT_RS4=0;
IT_RS5=0;
IT_RS6=0;
IT_RTARC1=0;
IT_RTARC2=0;
IT_RTARC3=0;
IT_RTARC4=0;
IT_RTARF1=0;
IT_RTARF2=0;
IT_RTARF3=0;
IT_RTARF4=0;
IT_UNR_1=-0.0943256691098;
IT_UNR_2=0.793544411659;
IT_WT=1.32181730735e-005;
IT_XM0=-0.0253433175385;
IT_XM1=-0.387458562851;
IT_XM2=0.17049998045;
IT_XM3=-1.74084436893;
IT_XT_MPROP=0.165393054485;
JA_CHI=12;
JA_COIL0=-0.320129007101;
JA_COIL1=1.22408998013;
JA_COIL2=-0.0460230000317;
JA_COIL3=-0.0477560013533;
JA_COIL4=0.0639569982886;
JA_CPI1=0.0650515928864;
JA_CPI2=0.791279554367;
JA_C_MPROP=0.0782259404659;
JA_DELTA_PI=0.53;
JA_E96=9.19294636697;
JA_GAMMA=9.10910964012;
JA_G_MPROP=0.0464610271156;
JA_IC0=-1.10236001015;
JA_IC1=0.436967998743;
JA_IC2=-0.423990011215;
JA_IC3=-0.337971001863;
JA_IC4=0.210978001356;
JA_IC5=-0.458155989647;
JA_IM0=-0.0712840557098;
JA_IM1=-0.339117258787;
JA_IM2=0.347616523504;
JA_IM3=-0.991348028183;
JA_INVEST_MPROP=0.0722297132015;
JA_K1=0.0328033864498;
JA_K2=0.0473355539143;
JA_M0=0.029030000791;
JA_M2=-0.0054020001553;
JA_M4=0.788931012154;
JA_PXM0=-0.00688820658252;
JA_PXM1=0.64994853735;
JA_PXM2=0.0349373221397;
JA_RS1=0.333;
JA_RS1PERM=0.333;
JA_RS2=0;
JA_RS3=0;
JA_RS4=0;
JA_RS5=0;
JA_RS6=0;
JA_RTARC1=0;
JA_RTARC2=0;
JA_RTARC3=0;
JA_RTARC4=0;
JA_RTARF1=0;
JA_RTARF2=0;
JA_RTARF3=0;
JA_RTARF4=0;
JA_UNR_1=-0.0611038096249;
JA_UNR_2=0.48595276475;
JA_WT=5.00687931675e-005;
JA_XM0=0.024151481688;
JA_XM1=-0.459041416645;
JA_XM2=0.364201933146;
JA_XM3=-1.74084436893;
JA_XT_MPROP=0.0883775576949;
RW_E96=1;
RW_PXM1=-0.40000000596;
RW_PXM2=-0.10000000149;
RW_XCOM1=0.300000011921;
RW_XM0=-0.00616873381659;
RW_XM1=-0.419528901577;
RW_XM2=0.0101102301851;
RW_XM3=-1.74084436893;
RW_XSM1=0.40000000596;
S0101=0;
S0102=0.211428981673;
S0103=0.0518315242932;
S0104=0.0499099911459;
S0105=0.0461929631515;
S0106=0.107709788268;
S0107=0.755355733991;
S0108=0.102362944882;
S0109=0.25825817487;
S0201=0.140730977983;
S0202=0;
S0203=0.0402535143414;
S0204=0.0186281396133;
S0205=0.0178380540457;
S0206=0.0435290672186;
S0207=0.0291917712961;
S0208=0.0498749237363;
S0209=0.206865929608;
S0301=0.0496485427176;
S0302=0.0441081698314;
S0303=0;
S0304=0.193178152483;
S0305=0.200114990415;
S0306=0.14276178335;
S0307=0.015950421856;
S0308=0.262332248098;
S0309=0.126014094315;
S0401=0.021532626072;
S0402=0.0167699758807;
S0403=0.108500266691;
S0404=0;
S0405=0.138882342615;
S0406=0.0935827744846;
S0407=0.0109323931691;
S0408=0.128842129226;
S0409=0.0649077327766;
S0501=0.0229825548319;
S0502=0.0174868984566;
S0503=0.0964474330303;
S0504=0.108455598703;
S0505=0;
S0506=0.0564481958061;
S0507=0.010383992488;
S0508=0.0836702594125;
S0509=0.0699498052739;
S0601=0.0391029180375;
S0602=0.0208742140953;
S0603=0.0650511176965;
S0604=0.0836065042775;
S0605=0.0602465540559;
S0606=0;
S0607=0.0175125547848;
S0608=0.116874153448;
S0609=0.0646555060199;
S0701=0.204879168808;
S0702=0.0233890814121;
S0703=0.00508720134929;
S0704=0.00419850099405;
S0705=0.00503869062909;
S0706=0.00975502690095;
S0707=0;
S0708=0.00782505967526;
S0709=0.0142728223294;
S0801=0.0670277430388;
S0802=0.0995331039443;
S0803=0.405142668132;
S0804=0.348010416891;
S0805=0.26853217235;
S0806=0.317507537454;
S0807=0.0434426679092;
S0808=0;
S0809=0.195075934808;
S0901=0.454095468511;
S0902=0.566409574707;
S0903=0.227686274466;
S0904=0.194012695892;
S0905=0.263154232738;
S0906=0.228705826518;
S0907=0.117230464506;
S0908=0.248218281522;
S0909=0;
SI_CHI=12;
SI_COIL0=-0.220861002803;
SI_COIL1=0.764611005783;
SI_COIL2=-0.0460230000317;
SI_COIL3=-0.0477560013533;
SI_COIL4=0.0639569982886;
SI_CPI1=0.0885436907411;
SI_CPI2=0.584154784679;
SI_C_MPROP=0.178070038557;
SI_DELTA_PI=0.53;
SI_E96=1;
SI_GAMMA=2.68042981625;
SI_G_MPROP=0.184400975704;
SI_IC0=-1.8622200489;
SI_IC1=1.95882999897;
SI_IC2=-0.451727002859;
SI_IC3=-0.135161995888;
SI_IC4=0.498308986425;
SI_IC5=-0.599273979664;
SI_IM0=0.0133133819327;
SI_IM1=-0.339117258787;
SI_IM2=0.0625357478857;
SI_IM3=-0.991348028183;
SI_INVEST_MPROP=0.515719473362;
SI_K1=0.0328033864498;
SI_K2=0.0473355539143;
SI_M0=-0.0292150005698;
SI_M2=-0.0054020001553;
SI_M4=0.788931012154;
SI_PXM0=-0.0128829535097;
SI_PXM1=0.645817816257;
SI_PXM2=0.0349373221397;
SI_RS1=0.333;
SI_RS1PERM=0.333;
SI_RS2=0;
SI_RS3=0;
SI_RS4=0;
SI_RS5=0;
SI_RS6=0;
SI_RTARC1=0;
SI_RTARC2=0;
SI_RTARC3=0;
SI_RTARC4=0;
SI_RTARF1=0;
SI_RTARF2=0;
SI_RTARF3=0;
SI_RTARF4=0;
SI_UNR_1=-0.414891779423;
SI_UNR_2=0.367525577545;
SI_WT=3.509713705e-005;
SI_XM0=-0.00616873381659;
SI_XM1=-0.419528901577;
SI_XM2=0.0101102301851;
SI_XM3=-1.74084436893;
SI_XT_MPROP=0.15729150176;
T01=0.16637001296;
T02=0.0851782429459;
T03=0.112577622798;
T04=0.0672679615184;
T05=0.051428852688;
T06=0.0635713068531;
T07=0.0437942590402;
T08=0.168281015113;
T09=0.241530726083;
TAU1=0.2;
TRDE=1000;
TRDER=1000;
UK_CHI=12;
UK_COIL0=-0.295890003443;
UK_COIL1=1.26555001736;
UK_COIL2=-0.0432269982994;
UK_COIL3=-0.0499509982765;
UK_COIL4=0.0755050033331;
UK_CPI1=0.135559409857;
UK_CPI2=0.739067137241;
UK_C_MPROP=0.236572146416;
UK_DELTA_PI=0.53;
UK_E96=1.56173992157;
UK_GAMMA=2.36357469112;
UK_G_MPROP=0.117712050676;
UK_IC0=-0.0400650016963;
UK_IC1=1.13595998287;
UK_IC2=-0.480706006289;
UK_IC3=0;
UK_IC4=0;
UK_IC5=0;
UK_IM0=-0.00298645487055;
UK_IM1=-0.339117258787;
UK_IM2=0.259559065104;
UK_IM3=-0.991348028183;
UK_INVEST_MPROP=0.326577752829;
UK_K1=0.0328033864498;
UK_K2=0.0473355539143;
UK_M0=-0.0982170030475;
UK_M2=-0.0054020001553;
UK_M4=0.788931012154;
UK_PXM0=-0.00295503181405;
UK_PXM1=0.63050109148;
UK_PXM2=0.0349373221397;
UK_RS1=0.333;
UK_RS1PERM=0.333;
UK_RS2=0;
UK_RS3=0;
UK_RS4=0;
UK_RS5=0;
UK_RS6=0;
UK_RTARC1=0;
UK_RTARC2=0;
UK_RTARC3=0;
UK_RTARC4=0;
UK_RTARF1=0;
UK_RTARF2=0;
UK_RTARF3=0;
UK_RTARF4=0;
UK_UNR_1=-0.33446392417;
UK_UNR_2=0.683579683304;
UK_WT=1.2619961324e-005;
UK_XM0=0.00526482798159;
UK_XM1=-0.451665729284;
UK_XM2=0.130913674831;
UK_XM3=-1.74084436893;
UK_XT_MPROP=0.15884745121;
US_CHI=12;
US_COIL0=-0.234869003296;
US_COIL1=0.851813018322;
US_COIL2=-0.0460230000317;
US_COIL3=-0.0477560013533;
US_COIL4=0.0639569982886;
US_CPI1=0.0600003153086;
US_CPI2=0.978459060192;
US_C_MPROP=0.0787769183517;
US_DELTA_PI=0.53;
US_E96=1;
US_GAMMA=1.25564420596;
US_G_MPROP=0.0697601884603;
US_IC0=-4.08905982971;
US_IC1=2.08457994461;
US_IC2=-0.722373008728;
US_IC3=-0.219500005245;
US_IC4=0.815505981445;
US_IC5=-0.823925971985;
US_IM0=0.0275149382651;
US_IM1=-0.339117258787;
US_IM2=0.0594643093646;
US_IM3=-0.991348028183;
US_INVEST_MPROP=0.174478381872;
US_K1=0.0328033864498;
US_K2=0.0473355539143;
US_M0=0.0839120000601;
US_M2=-0.0054020001553;
US_M4=0.788931012154;
US_PXM0=-0.00524724042043;
US_PXM1=0.638190448284;
US_PXM2=0.0349373221397;
US_RS1=0.333;
US_RS1PERM=0.333;
US_RS2=0;
US_RS3=0;
US_RS4=0;
US_RS5=0;
US_RS6=0;
US_RTARC1=0;
US_RTARC2=0;
US_RTARC3=0;
US_RTARC4=0;
US_RTARF1=0;
US_RTARF2=0;
US_RTARF3=0;
US_RTARF4=0;
US_UNR_1=-0.418832212687;
US_UNR_2=0.20457854867;
US_WT=8.31260528269e-005;
US_XM0=0.0335212536156;
US_XM1=-0.42607691884;
US_XM2=0.0847327336669;
US_XM3=-1.74084436893;
US_XT_MPROP=0.068832308054;
V0102=0.302939;
V0103=0.1149987;
V0104=0.05839044;
V0105=0.04559976;
V0106=0.0890599;
V0107=0.2508736;
V0108=0.1381385;
V0201=0.5340386;
V0203=0.1368557;
V0204=0.04634024;
V0205=0.03792391;
V0206=0.06666363;
V0207=0.03194354;
V0208=0.1462343;
V0301=0.1048398;
V0302=0.07077477;
V0304=0.1628517;
V0305=0.1299371;
V0306=0.1107158;
V0307=0.0077914;
V0308=0.4130895;
V0401=0.09336697;
V0402=0.04203319;
V0403=0.2856347;
V0405=0.143795;
V0406=0.1087066;
V0407=0.007638456;
V0408=0.3188251;
V0501=0.09431349;
V0502=0.04449457;
V0503=0.2947892;
V0504=0.185996;
V0506=0.09233788;
V0507=0.007625379;
V0508=0.2804435;
V0601=0.1649267;
V0602=0.07002937;
V0603=0.2248978;
V0604=0.1258964;
V0605=0.08267559;
V0607=0.01384079;
V0608=0.3177335;
V0701=0.8238854;
V0702=0.05950828;
V0703=0.0280669;
V0704=0.01568794;
V0705=0.01210771;
V0706=0.02454505;
V0708=0.03619872;
V0801=0.0269276;
V0802=0.0324527;
V0803=0.08555825;
V0804=0.06546576;
V0805=0.0516105;
V0806=0.05701964;
V0807=0.006865961;
W0101=-1;
W0102=0.158314128764;
W0103=0.144148080288;
W0104=0.078498145888;
W0105=0.0731862618008;
W0106=0.0770074545758;
W0107=0.013557730213;
W0108=0.212383102831;
W0109=0.242905095639;
W0201=0.198243776352;
W0202=-1;
W0203=0.13303216642;
W0204=0.0713086550403;
W0205=0.0695296751108;
W0206=0.0712296426923;
W0207=0.0765000899962;
W0208=0.187864186254;
W0209=0.192291808135;
W0301=0.158728054259;
W0302=0.10595582598;
W0303=-1;
W0304=0.107333239352;
W0305=0.0847327465098;
W0306=0.0981502409584;
W0307=0.0275220178134;
W0308=0.167795340239;
W0309=0.249782534889;
W0401=0.138316983506;
W0402=0.0938147168545;
W0403=0.168836924388;
W0404=-1;
W0405=0.0747207012628;
W0406=0.0813418537478;
W0407=0.0220610834413;
W0408=0.194651586757;
W0409=0.226256150043;
W0501=0.142928956526;
W0502=0.102467450391;
W0503=0.150092928257;
W0504=0.0835779316292;
W0505=-1;
W0506=0.078777445823;
W0507=0.0247664878133;
W0508=0.217768101495;
W0509=0.199620698065;
W0601=0.138720021274;
W0602=0.102439099154;
W0603=0.168900001338;
W0604=0.0888147938683;
W0605=0.0768422939279;
W0606=-1;
W0607=0.0347617704635;
W0608=0.164211166816;
W0609=0.225310853159;
W0701=0.0332804830561;
W0702=0.164136190858;
W0703=0.0742635886407;
W0704=0.0347684058849;
W0705=0.0347291240407;
W0706=0.0510638287607;
W0707=-1;
W0708=0.100630284767;
W0709=0.507128093992;
W0801=0.166407280379;
W0802=0.115122730336;
W0803=0.137316258214;
W0804=0.102276661523;
W0805=0.101929410645;
W0806=0.0783535439484;
W0807=0.0278301070227;
W0808=-1;
W0809=0.270764007932;
W0901=0.149822902292;
W0902=0.11592454783;
W0903=0.15042408861;
W0904=0.082470009466;
W0905=0.0666627750021;
W0906=0.0800069594276;
W0907=0.147854375051;
W0908=0.206834342322;
W0909=-1;
model(block, bytecode, mfs = 3, cutoff =0);
//model(SPARSE,markowitz=2.0);
//model;
( log(US_CPI)-(log(US_CPI(-1)))) = US_CPI1*( log(US_PIM)-(log(US_PIM(-1))))+US_CPI2*( log(US_PGNP)-(log(US_PGNP(-1))))+(1-US_CPI1-US_CPI2)*log(US_CPI(-1)/US_CPI(-2))+RES_US_CPI ;
US_UNR_A = US_UNR_FE+US_UNR_1*100*log(US_GDP/US_GDP_FE)+US_UNR_2*(US_UNR(-1)-US_UNR_FE(-1))+RES_US_UNR_A ;
US_UNR = /*MAX(US_UNR_A;0.1)*/US_UNR_A ;
( log(US_PGNPNO)-(log(US_PGNPNO(-1)))) = US_LAMBDA*(US_DELTA_PI*( log(US_PGNPNO(1))-(log(US_PGNPNO)))+(1-US_DELTA_PI)*( log(US_PGNPNO(-1))-(log(US_PGNPNO(-2)))))+(1-US_LAMBDA)*( log(US_PGNPNO(-1))-(log(US_PGNPNO(-2))))+US_GAMMA/100*(US_NLIN-US_UNR)/(US_UNR-US_PHI)+RES_US_PGNP ;
US_INFL = US_MGROW/GREAL ;
US_DLLF = log(US_LF/US_LF(-1)) ;
US_DLGDP = log(US_GDP/US_GDP(-1)) ;
US_C = US_C_DI+US_C_PI ;
US_MPC = 1/US_MPCINV ;
US_MPCINV(1) = US_MPCINV-1-((1-US_SIGMA)*(US_RSR+US_PROB)-(RES_US_MPC+US_PROB))*US_MPCINV/US_SIGMA ;
US_WH1(1) = US_WH1*(1+US_RSR+US_ALPHA1+RES_US_WH1+US_PROB+exp(US_DLLF_SS)-1)-(((1-US_BETA)*US_GDP*US_PGNP-US_TAXH)/US_P+RES_US_WK*US_WK) ;
US_WH2(1) = US_WH2*(1+US_RSR+US_ALPHA2+RES_US_WH2+US_PROB+exp(US_DLLF_SS)-1)-(((1-US_BETA)*US_GDP*US_PGNP-US_TAXH)/US_P+RES_US_WK*US_WK) ;
US_WH3(1) = US_WH3*(1+US_RSR+US_ALPHA3+RES_US_WH3+US_PROB+exp(US_DLLF_SS)-1)-(((1-US_BETA)*US_GDP*US_PGNP-US_TAXH)/US_P+RES_US_WK*US_WK) ;
US_C_DI = (US_LAMBDA1*US_BCHI1+US_LAMBDA2*US_BCHI2+US_LAMBDA3*(1-US_BCHI1-US_BCHI2))*((1-US_BETA)*US_GDP*US_PGNP-US_TAXH)/US_P+RES_US_C_DI*GREAL^TME ;
US_C_PI = US_MPC*(US_WK+(US_M+US_B+US_NFA/US_ER)/US_P+US_BCHI1*(1-US_LAMBDA1)*US_WH1+US_BCHI2*(1-US_LAMBDA2)*US_WH2+(1-US_BCHI1-US_BCHI2)*(1-US_LAMBDA3)*US_WH3) ;
US_WH = US_BCHI1*US_WH1+US_BCHI2*US_WH2+(1-US_BCHI1-US_BCHI2)*US_WH3 ;
( log(US_COIL)-(log(US_COIL(-1)))) = US_COIL0+US_COIL1*( log(US_GDP)-(log(US_GDP(-1))))+US_COIL2*( log(POIL/US_ER/US_PGNP)-(log(POIL(-1)/US_ER(-1)/US_PGNP(-1))))+US_COIL3*log(POIL(-1)/US_ER(-1)/US_PGNP(-1))+US_COIL4*log(US_GDP(-1)/US_COIL(-1))+RES_US_COIL ;
US_INVEST/US_K(-1)-(US_DELTA_SS+GREAL_SS-1) = US_K1*(US_WK/US_K(-1)-1)+US_K2*(US_WK(-1)/US_K(-2)-1)+RES_US_K ;
US_MPK = US_BETA*US_GDP/US_K ;
US_Q = US_CHI*(US_INVEST/US_K(-1)-(US_DELTA_SS+GREAL_SS-1))+1 ;
US_WK(1) = US_WK*(1+US_RSR+US_K/US_K(-1)-1+US_DELTA+RES_US_WK)-(US_BETA*US_GDP*US_PGNP-US_TAXK)/US_P+(US_CHI/2*((US_Q-1)/US_CHI)^2+US_INVEST/US_K(-1)*(US_Q-1))*US_K(-1)*US_PGNP/US_P ;
US_INVEST = ( US_K-(US_K(-1)))+US_DELTA*US_K(-1) ;
( log(US_XM)-(log(US_XM(-1)))) = US_XM0+( log(US_FACT)-(log(US_FACT(-1))))+US_XM1*( US_RCI-(US_RCI(-1)))+US_XM2*(US_XM3*US_RCI(-1)+log(US_FACT(-1))-log(US_XM(-1)))+RES_US_XM ;
US_XMA = US_XM+T01*(WTRADER-TRDER*GREAL^TME)/US_E96 ;
US_XT = US_XMA+US_XOIL ;
US_ACT = US_C_MPROP*US_C+US_INVEST_MPROP*US_INVEST+US_G_MPROP*US_G+US_XT_MPROP*US_XT ;
( log(US_IM)-(log(US_IM(-1)))) = US_IM0+( log(US_ACT)-(log(US_ACT(-1))))+US_IM1*( log(US_PIMA/US_PGNPNO)-(log(US_PIMA(-1)/US_PGNPNO(-1))))+US_IM2*(US_IM3*log(US_PIMA(-1)/US_PGNPNO(-1))+log(US_ACT(-1))-log(US_IM(-1)))+RES_US_IM ;
US_IOIL = US_COIL+US_XOIL-US_PRODOIL+RES_US_IOIL*GREAL^TME ;
( log(US_ICOM)-(log(US_ICOM(-1)))) = US_IC0+US_IC2*( log(PCOM/US_ER/US_PGNP)-(log(PCOM(-1)/US_ER(-1)/US_PGNP(-1))))+US_IC1*( log(US_GDP)-(log(US_GDP(-1))))+US_IC3*log(PCOM(-1)/US_ER(-1)/US_PGNP(-1))+US_IC4*log(US_GDP(-1))+US_IC5*log(US_ICOM(-1))+RES_US_ICOM-(US_IC4+US_IC5)*log(GREAL^TME) ;
US_IT = US_IM+US_IOIL+US_ICOM ;
US_A = US_C+US_INVEST+US_G ;
US_GDP = US_A+US_XT-US_IT ;
US_GNP = US_GDP+(US_R+(US_PREM(-3)+US_PREM(-2)+US_PREM(-1))/3)*US_NFA(-1)/US_ER/US_PGNP+RES_US_GNP*GREAL^TME ;
US_W = US_WH+US_WK+(US_M+US_B+US_NFA/US_ER)/US_P ;
US_YD = (US_GDP*US_PGNP-US_TAX)/US_P-US_DELTA*US_K(-1) ;
US_GE = US_P*US_G+US_R*US_B(-1)+US_GEXOG ;
US_TAX = US_TRATE*US_PGNP*US_GNP ;
US_TAXK = US_TAXK_ALPHA*US_TAXK_SHAR*US_TAX+(1-US_TAXK_ALPHA)*US_TRATEK*US_BETA*US_GDP*US_PGNP ;
US_TAXH = US_TAX-US_TAXK ;
US_TRATE = US_TRATE_EXOG*(1-US_TRATE_ALPHA)+US_TRATE_ALPHA*((US_TRATE(-2)/5+US_TRATE(-1)/5+US_TRATE(0)/5+US_TRATE(1)/5+US_TRATE(2)/5)+TAU1*(US_B(1)/(US_GNP(1)*US_PGNP(1))-US_BT_GDP_RAT(1))+RES_US_TRATE) ;
US_BT = US_BT_GDP_RAT*US_GNP*US_PGNP ;
( US_B-(US_B(-1)))+( US_M-(US_M(-1))) = US_R*US_B(-1)+US_P*US_G-US_TAX ;
US_GDEF = ( US_B+US_M-(US_B(-1)+US_M(-1))) ;
log(US_M/US_P) = US_M0+(1-US_M4)*log(US_A)+US_M2*US_RS+US_M4*log(US_M(-1)/US_P(-1))+RES_US_M ;
US_RS = (1-US_X_RS1)*US_RS_EXOG+US_X_RS1*(US_RS(-1)+US_RS1*log(US_MT/US_M)/US_M2+US_RS2*log(GR_ER/US_ER/US_PAR)+US_RS3*log(US_ER/US_ER/US_PARUS)+US_RS4*log(US_NEER/US_NEER_PAR)+US_RS5*(US_UNR_FE-US_UNR-US_UNR_GAP_EXOG)+US_RS6*100*(log(US_GDP)-log(US_GDP_FE)-US_GDP_GAP_EXOG)+US_X_RS2*(-US_RS(-1)+US_RSCON+100*( log(US_P(1))-(log(US_P))))+100*(US_RTARC1*(( log(US_P)-(log(US_P(-1))))-( log(US_P_TAR)-(log(US_P_TAR(-1))))-US_P_GAP_EXOG)+US_RTARC2*(( log(US_PGNP)-(log(US_PGNP(-1))))-( log(US_PGNP_TAR)-(log(US_PGNP_TAR(-1))))-US_PGNP_GAP_EXOG)+US_RTARC3*(( log(US_CPI)-(log(US_CPI(-1))))-( log(US_CPI_TAR)-(log(US_CPI_TAR(-1))))-US_CPI_GAP_EXOG)+US_RTARC4*(( log(US_PGNPNO)-(log(US_PGNPNO(-1))))-( log(US_PGNPNO_TAR)-(log(US_PGNPNO_TAR(-1))))-US_PGNPNO_GAP_EXOG)+US_RTARF1*(( log(US_P(1))-(log(US_P)))-( log(US_P_TAR(1))-(log(US_P_TAR)))-US_P_GAP_EXOG(1))+US_RTARF2*(( log(US_PGNP(1))-(log(US_PGNP)))-( log(US_PGNP_TAR(1))-(log(US_PGNP_TAR)))-US_PGNP_GAP_EXOG(1))+US_RTARF3*(( log(US_CPI(1))-(log(US_CPI)))-( log(US_CPI_TAR(1))-(log(US_CPI_TAR)))-US_CPI_GAP_EXOG(1))+US_RTARF4*(( log(US_PGNPNO(1))-(log(US_PGNPNO)))-( log(US_PGNPNO_TAR(1))-(log(US_PGNPNO_TAR)))-US_PGNPNO_GAP_EXOG(1)))+US_RSCON2+RES_US_RS)+US_RS1PERM*0 ;
US_RL/100 = ((1+US_RS/100)*(1+US_RS(1)/100)*(1+US_RS(2)/100)*(1+US_RS(3)/100)*(1+US_RS(4)/100)*(1+US_RS(5)/100)*(1+US_RS(6)/100)*(1+US_RS(7)/100)*(1+US_RS(8)/100)*(1+US_RS(9)/100))^0.1*(1+US_TPREM)-1+RES_US_RL ;
US_R = 0.5*US_RS(-1)/100+0.5*(US_RL(-3)/100+US_RL(-2)/100+US_RL(-1)/100)/3 ;
US_RLR = (1+US_RL/100)/(US_P(10)/US_P)^0.1-1 ;
US_RSR = (1+US_RS/100)/(US_P(1)/US_P)-1 ;
US_PGNPNO = (US_GDP*US_PGNP-US_PRODOIL*POIL/US_ER*US_E96)/(US_GDP-US_PRODOIL) ;
US_PGNP = (US_P*US_A+US_XT*US_PXT-US_IT*US_PIT)/US_GDP+RES_US_P*US_PGNP ;
( log(US_PXM)-(log(US_PXM(-1)))) = US_PXM0+US_PXM1*( log(US_PGNPNO)-(log(US_PGNPNO(-1))))+(1-US_PXM1)*( log(US_PFM)-(log(US_PFM(-1))))+US_PXM2*log(US_PGNPNO(-1)/US_PXM(-1))+RES_US_PXM ;
US_PXT = (US_XMA*US_PXM+POIL/US_ER*US_E96*US_XOIL)/US_XT ;
US_PIM = (S0101*US_PXM+S0201*JA_PXM*JA_ER/JA_E96+S0301*GR_PXM*GR_ER/GR_E96+S0401*FR_PXM*FR_ER/FR_E96+S0501*IT_PXM*IT_ER/IT_E96+S0601*UK_PXM*UK_ER/UK_E96+S0701*CA_PXM*CA_ER/CA_E96+S0801*SI_PXM*SI_ER/SI_E96+S0901*RW_PXM*RW_ER/RW_E96)/(US_ER/US_E96)*(1+RES_US_PIM) ;
US_PIMA = US_PIM+T01*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/US_ER/US_IM ;
US_PIT = (US_IM*US_PIMA+US_IOIL*POIL/US_ER*US_E96+US_ICOM*PCOM/US_ER*US_E96)/US_IT ;
//log(US_TFP_FE) = RES_US_TFP_FE ;
US_TFP_FE = exp(RES_US_TFP_FE) ;
US_GDP_FE = US_TFP_FE*US_K^US_BETA*((1-US_UNR_FE/100)*US_LF)^(1-US_BETA) ;
US_LF = US_POP*US_PART/(1+US_DEM3) ;
US_CU = 100*US_GDP/US_GDP_FE ;
( US_NFA-(US_NFA(-1))) = (US_XT*US_PXT-US_IT*US_PIT)*US_ER+(US_R+(US_PREM(-3)+US_PREM(-2)+US_PREM(-1))/3)*US_NFA(-1)+RES_US_NFA*US_INFL^TME*GREAL^TME ;
US_TB = US_XT*US_PXT-US_IT*US_PIT ;
US_CURBAL = ( US_NFA-(US_NFA(-1))) ;
US_ER = 1+RES_US_ER ;
US_RR = (0.8*US_RS(-1)+0.2*(US_RL(-3)+US_RL(-2)+US_RL(-1))/3)/100 ;
US_RCI = log(US_PXM)-log(US_PFM) ;
US_FACT = (US_IM*US_E96*S0101+JA_IM*JA_E96*S0102+GR_IM*GR_E96*S0103+FR_IM*FR_E96*S0104+IT_IM*IT_E96*S0105+UK_IM*UK_E96*S0106+CA_IM*CA_E96*S0107+SI_IM*SI_E96*S0108+(HO_IM+DC_IM)*RW_E96*S0109)/US_E96 ;
log(US_PFM) = W0101*log(US_ER/US_E96)+W0102*log(JA_PXM*JA_ER/JA_E96)+W0103*log(GR_PXM*GR_ER/GR_E96)+W0104*log(FR_PXM*FR_ER/FR_E96)+W0105*log(IT_PXM*IT_ER/IT_E96)+W0106*log(UK_PXM*UK_ER/UK_E96)+W0107*log(CA_PXM*CA_ER/CA_E96)+W0108*log(SI_PXM*SI_ER/SI_E96)+W0109*log(RW_PXM*RW_ER/RW_E96) ;
US_NEER = exp(+(log(US_ER/US_E96))-V0102*log(JA_ER/JA_E96)-V0103*log(GR_ER/GR_E96)-V0104*log(FR_ER/FR_E96)-V0105*log(IT_ER/IT_E96)-V0106*log(UK_ER/UK_E96)-V0107*log(CA_ER/CA_E96)-V0108*log(SI_ER/SI_E96)) ;
( log(JA_CPI)-(log(JA_CPI(-1)))) = JA_CPI1*( log(JA_PIM)-(log(JA_PIM(-1))))+JA_CPI2*( log(JA_PGNP)-(log(JA_PGNP(-1))))+(1-JA_CPI1-JA_CPI2)*log(JA_CPI(-1)/JA_CPI(-2))+RES_JA_CPI ;
JA_UNR_A = JA_UNR_FE+JA_UNR_1*100*log(JA_GDP/JA_GDP_FE)+JA_UNR_2*(JA_UNR(-1)-JA_UNR_FE(-1))+RES_JA_UNR_A ;
JA_UNR = JA_UNR_A/*MAX(JA_UNR_A;0.1)*/ ;
( log(JA_PGNPNO)-(log(JA_PGNPNO(-1)))) = JA_LAMBDA*(JA_DELTA_PI*( log(JA_PGNPNO(1))-(log(JA_PGNPNO)))+(1-JA_DELTA_PI)*( log(JA_PGNPNO(-1))-(log(JA_PGNPNO(-2)))))+(1-JA_LAMBDA)*( log(JA_PGNPNO(-1))-(log(JA_PGNPNO(-2))))+JA_GAMMA/100*(JA_NLIN-JA_UNR)/(JA_UNR-JA_PHI)+RES_JA_PGNP ;
JA_INFL = JA_MGROW/GREAL ;
JA_DLLF = log(JA_LF/JA_LF(-1)) ;
JA_DLGDP = log(JA_GDP/JA_GDP(-1)) ;
JA_C = JA_C_DI+JA_C_PI ;
JA_MPC = 1/JA_MPCINV ;
JA_MPCINV(1) = JA_MPCINV-1-((1-JA_SIGMA)*(JA_RSR+JA_PROB)-(RES_JA_MPC+JA_PROB))*JA_MPCINV/JA_SIGMA ;
JA_WH1(1) = JA_WH1*(1+JA_RSR+JA_ALPHA1+RES_JA_WH1+JA_PROB+exp(JA_DLLF_SS)-1)-(((1-JA_BETA)*JA_GDP*JA_PGNP-JA_TAXH)/JA_P+RES_JA_WK*JA_WK) ;
JA_WH2(1) = JA_WH2*(1+JA_RSR+JA_ALPHA2+RES_JA_WH2+JA_PROB+exp(JA_DLLF_SS)-1)-(((1-JA_BETA)*JA_GDP*JA_PGNP-JA_TAXH)/JA_P+RES_JA_WK*JA_WK) ;
JA_WH3(1) = JA_WH3*(1+JA_RSR+JA_ALPHA3+RES_JA_WH3+JA_PROB+exp(JA_DLLF_SS)-1)-(((1-JA_BETA)*JA_GDP*JA_PGNP-JA_TAXH)/JA_P+RES_JA_WK*JA_WK) ;
JA_C_DI = (JA_LAMBDA1*JA_BCHI1+JA_LAMBDA2*JA_BCHI2+JA_LAMBDA3*(1-JA_BCHI1-JA_BCHI2))*((1-JA_BETA)*JA_GDP*JA_PGNP-JA_TAXH)/JA_P+RES_JA_C_DI*GREAL^TME ;
JA_C_PI = JA_MPC*(JA_WK+(JA_M+JA_B+JA_NFA/JA_ER)/JA_P+JA_BCHI1*(1-JA_LAMBDA1)*JA_WH1+JA_BCHI2*(1-JA_LAMBDA2)*JA_WH2+(1-JA_BCHI1-JA_BCHI2)*(1-JA_LAMBDA3)*JA_WH3) ;
JA_WH = JA_BCHI1*JA_WH1+JA_BCHI2*JA_WH2+(1-JA_BCHI1-JA_BCHI2)*JA_WH3 ;
( log(JA_COIL)-(log(JA_COIL(-1)))) = JA_COIL0+JA_COIL1*( log(JA_GDP)-(log(JA_GDP(-1))))+JA_COIL2*( log(POIL/JA_ER/JA_PGNP)-(log(POIL(-1)/JA_ER(-1)/JA_PGNP(-1))))+JA_COIL3*log(POIL(-1)/JA_ER(-1)/JA_PGNP(-1))+JA_COIL4*log(JA_GDP(-1)/JA_COIL(-1))+RES_JA_COIL ;
JA_INVEST/JA_K(-1)-(JA_DELTA_SS+GREAL_SS-1) = JA_K1*(JA_WK/JA_K(-1)-1)+JA_K2*(JA_WK(-1)/JA_K(-2)-1)+RES_JA_K ;
JA_MPK = JA_BETA*JA_GDP/JA_K ;
JA_Q = JA_CHI*(JA_INVEST/JA_K(-1)-(JA_DELTA_SS+GREAL_SS-1))+1 ;
JA_WK(1) = JA_WK*(1+JA_RSR+JA_K/JA_K(-1)-1+JA_DELTA+RES_JA_WK)-(JA_BETA*JA_GDP*JA_PGNP-JA_TAXK)/JA_P+(JA_CHI/2*((JA_Q-1)/JA_CHI)^2+JA_INVEST/JA_K(-1)*(JA_Q-1))*JA_K(-1)*JA_PGNP/JA_P ;
JA_INVEST = ( JA_K-(JA_K(-1)))+JA_DELTA*JA_K(-1) ;
( log(JA_XM)-(log(JA_XM(-1)))) = JA_XM0+( log(JA_FACT)-(log(JA_FACT(-1))))+JA_XM1*( JA_RCI-(JA_RCI(-1)))+JA_XM2*(JA_XM3*JA_RCI(-1)+log(JA_FACT(-1))-log(JA_XM(-1)))+RES_JA_XM ;
JA_XMA = JA_XM+T02*(WTRADER-TRDER*GREAL^TME)/JA_E96 ;
JA_XT = JA_XMA+JA_XOIL ;
JA_ACT = JA_C_MPROP*JA_C+JA_INVEST_MPROP*JA_INVEST+JA_G_MPROP*JA_G+JA_XT_MPROP*JA_XT ;
( log(JA_IM)-(log(JA_IM(-1)))) = JA_IM0+( log(JA_ACT)-(log(JA_ACT(-1))))+JA_IM1*( log(JA_PIMA/JA_PGNPNO)-(log(JA_PIMA(-1)/JA_PGNPNO(-1))))+JA_IM2*(JA_IM3*log(JA_PIMA(-1)/JA_PGNPNO(-1))+log(JA_ACT(-1))-log(JA_IM(-1)))+RES_JA_IM ;
JA_IOIL = JA_COIL+JA_XOIL-JA_PRODOIL+RES_JA_IOIL*GREAL^TME ;
( log(JA_ICOM)-(log(JA_ICOM(-1)))) = JA_IC0+JA_IC2*( log(PCOM/JA_ER/JA_PGNP)-(log(PCOM(-1)/JA_ER(-1)/JA_PGNP(-1))))+JA_IC1*( log(JA_GDP)-(log(JA_GDP(-1))))+JA_IC3*log(PCOM(-1)/JA_ER(-1)/JA_PGNP(-1))+JA_IC4*log(JA_GDP(-1))+JA_IC5*log(JA_ICOM(-1))+RES_JA_ICOM-(JA_IC4+JA_IC5)*log(GREAL^TME) ;
JA_IT = JA_IM+JA_IOIL+JA_ICOM ;
JA_A = JA_C+JA_INVEST+JA_G ;
JA_GDP = JA_A+JA_XT-JA_IT ;
JA_GNP = JA_GDP+(US_R+(JA_PREM(-3)+JA_PREM(-2)+JA_PREM(-1))/3)*JA_NFA(-1)/JA_ER/JA_PGNP+RES_JA_GNP*GREAL^TME ;
JA_W = JA_WH+JA_WK+(JA_M+JA_B+JA_NFA/JA_ER)/JA_P ;
JA_YD = (JA_GDP*JA_PGNP-JA_TAX)/JA_P-JA_DELTA*JA_K(-1) ;
JA_GE = JA_P*JA_G+JA_R*JA_B(-1)+JA_GEXOG ;
JA_TAX = JA_TRATE*JA_PGNP*JA_GNP ;
JA_TAXK = JA_TAXK_ALPHA*JA_TAXK_SHAR*JA_TAX+(1-JA_TAXK_ALPHA)*JA_TRATEK*JA_BETA*JA_GDP*JA_PGNP ;
JA_TAXH = JA_TAX-JA_TAXK ;
JA_TRATE = JA_TRATE_EXOG*(1-JA_TRATE_ALPHA)+JA_TRATE_ALPHA*((JA_TRATE(-2)/5+JA_TRATE(-1)/5+JA_TRATE(0)/5+JA_TRATE(1)/5+JA_TRATE(2)/5)+TAU1*(JA_B(1)/(JA_GNP(1)*JA_PGNP(1))-JA_BT_GDP_RAT(1))+RES_JA_TRATE) ;
JA_BT = JA_BT_GDP_RAT*JA_GNP*JA_PGNP ;
( JA_B-(JA_B(-1)))+( JA_M-(JA_M(-1))) = JA_R*JA_B(-1)+JA_P*JA_G-JA_TAX ;
JA_GDEF = ( JA_B+JA_M-(JA_B(-1)+JA_M(-1))) ;
log(JA_M/JA_P) = JA_M0+(1-JA_M4)*log(JA_A)+JA_M2*JA_RS+JA_M4*log(JA_M(-1)/JA_P(-1))+RES_JA_M ;
JA_RS = (1-JA_X_RS1)*JA_RS_EXOG+JA_X_RS1*(JA_RS(-1)+JA_RS1*log(JA_MT/JA_M)/JA_M2+JA_RS2*log(GR_ER/JA_ER/JA_PAR)+JA_RS3*log(US_ER/JA_ER/JA_PARUS)+JA_RS4*log(JA_NEER/JA_NEER_PAR)+JA_RS5*(JA_UNR_FE-JA_UNR-JA_UNR_GAP_EXOG)+JA_RS6*100*(log(JA_GDP)-log(JA_GDP_FE)-JA_GDP_GAP_EXOG)+JA_X_RS2*(-JA_RS(-1)+JA_RSCON+100*( log(JA_P(1))-(log(JA_P))))+100*(JA_RTARC1*(( log(JA_P)-(log(JA_P(-1))))-( log(JA_P_TAR)-(log(JA_P_TAR(-1))))-JA_P_GAP_EXOG)+JA_RTARC2*(( log(JA_PGNP)-(log(JA_PGNP(-1))))-( log(JA_PGNP_TAR)-(log(JA_PGNP_TAR(-1))))-JA_PGNP_GAP_EXOG)+JA_RTARC3*(( log(JA_CPI)-(log(JA_CPI(-1))))-( log(JA_CPI_TAR)-(log(JA_CPI_TAR(-1))))-JA_CPI_GAP_EXOG)+JA_RTARC4*(( log(JA_PGNPNO)-(log(JA_PGNPNO(-1))))-( log(JA_PGNPNO_TAR)-(log(JA_PGNPNO_TAR(-1))))-JA_PGNPNO_GAP_EXOG)+JA_RTARF1*(( log(JA_P(1))-(log(JA_P)))-( log(JA_P_TAR(1))-(log(JA_P_TAR)))-JA_P_GAP_EXOG(1))+JA_RTARF2*(( log(JA_PGNP(1))-(log(JA_PGNP)))-( log(JA_PGNP_TAR(1))-(log(JA_PGNP_TAR)))-JA_PGNP_GAP_EXOG(1))+JA_RTARF3*(( log(JA_CPI(1))-(log(JA_CPI)))-( log(JA_CPI_TAR(1))-(log(JA_CPI_TAR)))-JA_CPI_GAP_EXOG(1))+JA_RTARF4*(( log(JA_PGNPNO(1))-(log(JA_PGNPNO)))-( log(JA_PGNPNO_TAR(1))-(log(JA_PGNPNO_TAR)))-JA_PGNPNO_GAP_EXOG(1)))+JA_RSCON2+RES_JA_RS)+JA_RS1PERM*0 ;
JA_RL/100 = ((1+JA_RS/100)*(1+JA_RS(1)/100)*(1+JA_RS(2)/100)*(1+JA_RS(3)/100)*(1+JA_RS(4)/100)*(1+JA_RS(5)/100)*(1+JA_RS(6)/100)*(1+JA_RS(7)/100)*(1+JA_RS(8)/100)*(1+JA_RS(9)/100))^0.1*(1+JA_TPREM)-1+RES_JA_RL ;
JA_R = 0.5*JA_RS(-1)/100+0.5*(JA_RL(-3)/100+JA_RL(-2)/100+JA_RL(-1)/100)/3 ;
JA_RLR = (1+JA_RL/100)/(JA_P(10)/JA_P)^0.1-1 ;
JA_RSR = (1+JA_RS/100)/(JA_P(1)/JA_P)-1 ;
JA_PGNPNO = (JA_GDP*JA_PGNP-JA_PRODOIL*POIL/JA_ER*JA_E96)/(JA_GDP-JA_PRODOIL) ;
JA_PGNP = (JA_P*JA_A+JA_XT*JA_PXT-JA_IT*JA_PIT)/JA_GDP+RES_JA_P*JA_PGNP ;
( log(JA_PXM)-(log(JA_PXM(-1)))) = JA_PXM0+JA_PXM1*( log(JA_PGNPNO)-(log(JA_PGNPNO(-1))))+(1-JA_PXM1)*( log(JA_PFM)-(log(JA_PFM(-1))))+JA_PXM2*log(JA_PGNPNO(-1)/JA_PXM(-1))+RES_JA_PXM ;
JA_PXT = (JA_XMA*JA_PXM+POIL/JA_ER*JA_E96*JA_XOIL)/JA_XT ;
JA_PIM = (S0102*US_PXM+S0202*JA_PXM*JA_ER/JA_E96+S0302*GR_PXM*GR_ER/GR_E96+S0402*FR_PXM*FR_ER/FR_E96+S0502*IT_PXM*IT_ER/IT_E96+S0602*UK_PXM*UK_ER/UK_E96+S0702*CA_PXM*CA_ER/CA_E96+S0802*SI_PXM*SI_ER/SI_E96+S0902*RW_PXM*RW_ER/RW_E96)/(JA_ER/JA_E96)*(1+RES_JA_PIM) ;
JA_PIMA = JA_PIM+T02*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/JA_ER/JA_IM ;
JA_PIT = (JA_IM*JA_PIMA+JA_IOIL*POIL/JA_ER*JA_E96+JA_ICOM*PCOM/JA_ER*JA_E96)/JA_IT ;
//log(JA_TFP_FE) = RES_JA_TFP_FE ;
JA_TFP_FE = exp(RES_JA_TFP_FE );
JA_GDP_FE = JA_TFP_FE*JA_K^JA_BETA*((1-JA_UNR_FE/100)*JA_LF)^(1-JA_BETA) ;
JA_LF = JA_POP*JA_PART/(1+JA_DEM3) ;
JA_CU = 100*JA_GDP/JA_GDP_FE ;
( JA_NFA-(JA_NFA(-1))) = (JA_XT*JA_PXT-JA_IT*JA_PIT)*JA_ER+(US_R+(JA_PREM(-3)+JA_PREM(-2)+JA_PREM(-1))/3)*JA_NFA(-1)+RES_JA_NFA*US_INFL^TME*GREAL^TME ;
JA_TB = JA_XT*JA_PXT-JA_IT*JA_PIT ;
JA_CURBAL = ( JA_NFA-(JA_NFA(-1))) ;
1+US_RS/100 = (1+JA_RS/100)*JA_ER(1)/JA_ER-JA_PREM+RES_JA_ER ;
JA_RCI = log(JA_PXM)-log(JA_PFM) ;
JA_FACT = (US_IM*US_E96*S0201+JA_IM*JA_E96*S0202+GR_IM*GR_E96*S0203+FR_IM*FR_E96*S0204+IT_IM*IT_E96*S0205+UK_IM*UK_E96*S0206+CA_IM*CA_E96*S0207+SI_IM*SI_E96*S0208+(HO_IM+DC_IM)*RW_E96*S0209)/JA_E96 ;
log(JA_PFM) = W0201*log(US_PXM*US_ER/US_E96)+W0202*log(JA_ER/JA_E96)+W0203*log(GR_PXM*GR_ER/GR_E96)+W0204*log(FR_PXM*FR_ER/FR_E96)+W0205*log(IT_PXM*IT_ER/IT_E96)+W0206*log(UK_PXM*UK_ER/UK_E96)+W0207*log(CA_PXM*CA_ER/CA_E96)+W0208*log(SI_PXM*SI_ER/SI_E96)+W0209*log(RW_PXM*RW_ER/RW_E96) ;
JA_NEER = exp(-V0201*log(US_ER/US_E96)+log(JA_ER/JA_E96)-V0203*log(GR_ER/GR_E96)-V0204*log(FR_ER/FR_E96)-V0205*log(IT_ER/IT_E96)-V0206*log(UK_ER/UK_E96)-V0207*log(CA_ER/CA_E96)-V0208*log(SI_ER/SI_E96)) ;
( log(GR_CPI)-(log(GR_CPI(-1)))) = GR_CPI1*( log(GR_PIM)-(log(GR_PIM(-1))))+GR_CPI2*( log(GR_PGNP)-(log(GR_PGNP(-1))))+(1-GR_CPI1-GR_CPI2)*log(GR_CPI(-1)/GR_CPI(-2))+RES_GR_CPI ;
GR_UNR_A = GR_UNR_FE+GR_UNR_1*100*log(GR_GDP/GR_GDP_FE)+GR_UNR_2*(GR_UNR(-1)-GR_UNR_FE(-1))+RES_GR_UNR_A ;
GR_UNR = GR_UNR_A/*MAX(GR_UNR_A;0.1)*/ ;
( log(GR_PGNPNO)-(log(GR_PGNPNO(-1)))) = GR_LAMBDA*(GR_DELTA_PI*( log(GR_PGNPNO(1))-(log(GR_PGNPNO)))+(1-GR_DELTA_PI)*( log(GR_PGNPNO(-1))-(log(GR_PGNPNO(-2)))))+(1-GR_LAMBDA)*( log(GR_PGNPNO(-1))-(log(GR_PGNPNO(-2))))+GR_GAMMA/100*(GR_NLIN-GR_UNR)/(GR_UNR-GR_PHI)+RES_GR_PGNP ;
GR_INFL = GR_MGROW/GREAL ;
GR_DLLF = log(GR_LF/GR_LF(-1)) ;
GR_DLGDP = log(GR_GDP/GR_GDP(-1)) ;
GR_C = GR_C_DI+GR_C_PI ;
GR_MPC = 1/GR_MPCINV ;
GR_MPCINV(1) = GR_MPCINV-1-((1-GR_SIGMA)*(GR_RSR+GR_PROB)-(RES_GR_MPC+GR_PROB))*GR_MPCINV/GR_SIGMA ;
GR_WH1(1) = GR_WH1*(1+GR_RSR+GR_ALPHA1+RES_GR_WH1+GR_PROB+exp(GR_DLLF_SS)-1)-(((1-GR_BETA)*GR_GDP*GR_PGNP-GR_TAXH)/GR_P+RES_GR_WK*GR_WK) ;
GR_WH2(1) = GR_WH2*(1+GR_RSR+GR_ALPHA2+RES_GR_WH2+GR_PROB+exp(GR_DLLF_SS)-1)-(((1-GR_BETA)*GR_GDP*GR_PGNP-GR_TAXH)/GR_P+RES_GR_WK*GR_WK) ;
GR_WH3(1) = GR_WH3*(1+GR_RSR+GR_ALPHA3+RES_GR_WH3+GR_PROB+exp(GR_DLLF_SS)-1)-(((1-GR_BETA)*GR_GDP*GR_PGNP-GR_TAXH)/GR_P+RES_GR_WK*GR_WK) ;
GR_C_DI = (GR_LAMBDA1*GR_BCHI1+GR_LAMBDA2*GR_BCHI2+GR_LAMBDA3*(1-GR_BCHI1-GR_BCHI2))*((1-GR_BETA)*GR_GDP*GR_PGNP-GR_TAXH)/GR_P+RES_GR_C_DI*GREAL^TME ;
GR_C_PI = GR_MPC*(GR_WK+(GR_M+GR_B+GR_NFA/GR_ER)/GR_P+GR_BCHI1*(1-GR_LAMBDA1)*GR_WH1+GR_BCHI2*(1-GR_LAMBDA2)*GR_WH2+(1-GR_BCHI1-GR_BCHI2)*(1-GR_LAMBDA3)*GR_WH3) ;
GR_WH = GR_BCHI1*GR_WH1+GR_BCHI2*GR_WH2+(1-GR_BCHI1-GR_BCHI2)*GR_WH3 ;
( log(GR_COIL)-(log(GR_COIL(-1)))) = GR_COIL0+GR_COIL1*( log(GR_GDP)-(log(GR_GDP(-1))))+GR_COIL2*( log(POIL/GR_ER/GR_PGNP)-(log(POIL(-1)/GR_ER(-1)/GR_PGNP(-1))))+GR_COIL3*log(POIL(-1)/GR_ER(-1)/GR_PGNP(-1))+GR_COIL4*log(GR_GDP(-1)/GR_COIL(-1))+RES_GR_COIL ;
GR_INVEST/GR_K(-1)-(GR_DELTA_SS+GREAL_SS-1) = GR_K1*(GR_WK/GR_K(-1)-1)+GR_K2*(GR_WK(-1)/GR_K(-2)-1)+RES_GR_K ;
GR_MPK = GR_BETA*GR_GDP/GR_K ;
GR_Q = GR_CHI*(GR_INVEST/GR_K(-1)-(GR_DELTA_SS+GREAL_SS-1))+1 ;
GR_WK(1) = GR_WK*(1+GR_RSR+GR_K/GR_K(-1)-1+GR_DELTA+RES_GR_WK)-(GR_BETA*GR_GDP*GR_PGNP-GR_TAXK)/GR_P+(GR_CHI/2*((GR_Q-1)/GR_CHI)^2+GR_INVEST/GR_K(-1)*(GR_Q-1))*GR_K(-1)*GR_PGNP/GR_P ;
GR_INVEST = ( GR_K-(GR_K(-1)))+GR_DELTA*GR_K(-1) ;
( log(GR_XM)-(log(GR_XM(-1)))) = GR_XM0+( log(GR_FACT)-(log(GR_FACT(-1))))+GR_XM1*( GR_RCI-(GR_RCI(-1)))+GR_XM2*(GR_XM3*GR_RCI(-1)+log(GR_FACT(-1))-log(GR_XM(-1)))+RES_GR_XM ;
GR_XMA = GR_XM+T03*(WTRADER-TRDER*GREAL^TME)/GR_E96 ;
GR_XT = GR_XMA+GR_XOIL ;
GR_ACT = GR_C_MPROP*GR_C+GR_INVEST_MPROP*GR_INVEST+GR_G_MPROP*GR_G+GR_XT_MPROP*GR_XT ;
( log(GR_IM)-(log(GR_IM(-1)))) = GR_IM0+( log(GR_ACT)-(log(GR_ACT(-1))))+GR_IM1*( log(GR_PIMA/GR_PGNPNO)-(log(GR_PIMA(-1)/GR_PGNPNO(-1))))+GR_IM2*(GR_IM3*log(GR_PIMA(-1)/GR_PGNPNO(-1))+log(GR_ACT(-1))-log(GR_IM(-1)))+RES_GR_IM ;
GR_IOIL = GR_COIL+GR_XOIL-GR_PRODOIL+RES_GR_IOIL*GREAL^TME ;
( log(GR_ICOM)-(log(GR_ICOM(-1)))) = GR_IC0+GR_IC2*( log(PCOM/GR_ER/GR_PGNP)-(log(PCOM(-1)/GR_ER(-1)/GR_PGNP(-1))))+GR_IC1*( log(GR_GDP)-(log(GR_GDP(-1))))+GR_IC3*log(PCOM(-1)/GR_ER(-1)/GR_PGNP(-1))+GR_IC4*log(GR_GDP(-1))+GR_IC5*log(GR_ICOM(-1))+RES_GR_ICOM-(GR_IC4+GR_IC5)*log(GREAL^TME) ;
GR_IT = GR_IM+GR_IOIL+GR_ICOM ;
GR_A = GR_C+GR_INVEST+GR_G ;
GR_GDP = GR_A+GR_XT-GR_IT ;
GR_GNP = GR_GDP+(US_R+(GR_PREM(-3)+GR_PREM(-2)+GR_PREM(-1))/3)*GR_NFA(-1)/GR_ER/GR_PGNP+RES_GR_GNP*GREAL^TME ;
GR_W = GR_WH+GR_WK+(GR_M+GR_B+GR_NFA/GR_ER)/GR_P ;
GR_YD = (GR_GDP*GR_PGNP-GR_TAX)/GR_P-GR_DELTA*GR_K(-1) ;
GR_GE = GR_P*GR_G+GR_R*GR_B(-1)+GR_GEXOG ;
GR_TAX = GR_TRATE*GR_PGNP*GR_GNP ;
GR_TAXK = GR_TAXK_ALPHA*GR_TAXK_SHAR*GR_TAX+(1-GR_TAXK_ALPHA)*GR_TRATEK*GR_BETA*GR_GDP*GR_PGNP ;
GR_TAXH = GR_TAX-GR_TAXK ;
GR_TRATE = GR_TRATE_EXOG*(1-GR_TRATE_ALPHA)+GR_TRATE_ALPHA*((GR_TRATE(-2)/5+GR_TRATE(-1)/5+GR_TRATE(0)/5+GR_TRATE(1)/5+GR_TRATE(2)/5)+TAU1*(GR_B(1)/(GR_GNP(1)*GR_PGNP(1))-GR_BT_GDP_RAT(1))+RES_GR_TRATE) ;
GR_BT = GR_BT_GDP_RAT*GR_GNP*GR_PGNP ;
( GR_B-(GR_B(-1)))+( GR_M-(GR_M(-1))) = GR_R*GR_B(-1)+GR_P*GR_G-GR_TAX ;
GR_GDEF = ( GR_B+GR_M-(GR_B(-1)+GR_M(-1))) ;
log(GR_M/GR_P) = GR_M0+(1-GR_M4)*log(GR_A)+GR_M2*GR_RS+GR_M4*log(GR_M(-1)/GR_P(-1))+RES_GR_M ;
GR_RS = (1-GR_X_RS1)*GR_RS_EXOG+GR_X_RS1*(GR_RS(-1)+GR_RS1*log(GR_MT/GR_M)/GR_M2+GR_RS2*log(GR_ER/GR_ER/GR_PAR)+GR_RS3*log(US_ER/GR_ER/GR_PARUS)+GR_RS4*log(GR_NEER/GR_NEER_PAR)+GR_RS5*(GR_UNR_FE-GR_UNR-GR_UNR_GAP_EXOG)+GR_RS6*100*(log(GR_GDP)-log(GR_GDP_FE)-GR_GDP_GAP_EXOG)+GR_X_RS2*(-GR_RS(-1)+GR_RSCON+100*( log(GR_P(1))-(log(GR_P))))+100*(GR_RTARC1*(( log(GR_P)-(log(GR_P(-1))))-( log(GR_P_TAR)-(log(GR_P_TAR(-1))))-GR_P_GAP_EXOG)+GR_RTARC2*(( log(GR_PGNP)-(log(GR_PGNP(-1))))-( log(GR_PGNP_TAR)-(log(GR_PGNP_TAR(-1))))-GR_PGNP_GAP_EXOG)+GR_RTARC3*(( log(GR_CPI)-(log(GR_CPI(-1))))-( log(GR_CPI_TAR)-(log(GR_CPI_TAR(-1))))-GR_CPI_GAP_EXOG)+GR_RTARC4*(( log(GR_PGNPNO)-(log(GR_PGNPNO(-1))))-( log(GR_PGNPNO_TAR)-(log(GR_PGNPNO_TAR(-1))))-GR_PGNPNO_GAP_EXOG)+GR_RTARF1*(( log(GR_P(1))-(log(GR_P)))-( log(GR_P_TAR(1))-(log(GR_P_TAR)))-GR_P_GAP_EXOG(1))+GR_RTARF2*(( log(GR_PGNP(1))-(log(GR_PGNP)))-( log(GR_PGNP_TAR(1))-(log(GR_PGNP_TAR)))-GR_PGNP_GAP_EXOG(1))+GR_RTARF3*(( log(GR_CPI(1))-(log(GR_CPI)))-( log(GR_CPI_TAR(1))-(log(GR_CPI_TAR)))-GR_CPI_GAP_EXOG(1))+GR_RTARF4*(( log(GR_PGNPNO(1))-(log(GR_PGNPNO)))-( log(GR_PGNPNO_TAR(1))-(log(GR_PGNPNO_TAR)))-GR_PGNPNO_GAP_EXOG(1)))+GR_RSCON2+RES_GR_RS)+GR_RS1PERM*0 ;
GR_RL/100 = ((1+GR_RS/100)*(1+GR_RS(1)/100)*(1+GR_RS(2)/100)*(1+GR_RS(3)/100)*(1+GR_RS(4)/100)*(1+GR_RS(5)/100)*(1+GR_RS(6)/100)*(1+GR_RS(7)/100)*(1+GR_RS(8)/100)*(1+GR_RS(9)/100))^0.1*(1+GR_TPREM)-1+RES_GR_RL ;
GR_R = 0.5*GR_RS(-1)/100+0.5*(GR_RL(-3)/100+GR_RL(-2)/100+GR_RL(-1)/100)/3 ;
GR_RLR = (1+GR_RL/100)/(GR_P(10)/GR_P)^0.1-1 ;
GR_RSR = (1+GR_RS/100)/(GR_P(1)/GR_P)-1 ;
GR_PGNPNO = (GR_GDP*GR_PGNP-GR_PRODOIL*POIL/GR_ER*GR_E96)/(GR_GDP-GR_PRODOIL) ;
GR_PGNP = (GR_P*GR_A+GR_XT*GR_PXT-GR_IT*GR_PIT)/GR_GDP+RES_GR_P*GR_PGNP ;
( log(GR_PXM)-(log(GR_PXM(-1)))) = GR_PXM0+GR_PXM1*( log(GR_PGNPNO)-(log(GR_PGNPNO(-1))))+(1-GR_PXM1)*( log(GR_PFM)-(log(GR_PFM(-1))))+GR_PXM2*log(GR_PGNPNO(-1)/GR_PXM(-1))+RES_GR_PXM ;
GR_PXT = (GR_XMA*GR_PXM+POIL/GR_ER*GR_E96*GR_XOIL)/GR_XT ;
GR_PIM = (S0103*US_PXM+S0203*JA_PXM*JA_ER/JA_E96+S0303*GR_PXM*GR_ER/GR_E96+S0403*FR_PXM*FR_ER/FR_E96+S0503*IT_PXM*IT_ER/IT_E96+S0603*UK_PXM*UK_ER/UK_E96+S0703*CA_PXM*CA_ER/CA_E96+S0803*SI_PXM*SI_ER/SI_E96+S0903*RW_PXM*RW_ER/RW_E96)/(GR_ER/GR_E96)*(1+RES_GR_PIM) ;
GR_PIMA = GR_PIM+T03*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/GR_ER/GR_IM ;
GR_PIT = (GR_IM*GR_PIMA+GR_IOIL*POIL/GR_ER*GR_E96+GR_ICOM*PCOM/GR_ER*GR_E96)/GR_IT ;
//log(GR_TFP_FE) = RES_GR_TFP_FE ;
GR_TFP_FE = exp(RES_GR_TFP_FE) ;
GR_GDP_FE = GR_TFP_FE*GR_K^GR_BETA*((1-GR_UNR_FE/100)*GR_LF)^(1-GR_BETA) ;
GR_LF = GR_POP*GR_PART/(1+GR_DEM3) ;
GR_CU = 100*GR_GDP/GR_GDP_FE ;
( GR_NFA-(GR_NFA(-1))) = (GR_XT*GR_PXT-GR_IT*GR_PIT)*GR_ER+(US_R+(GR_PREM(-3)+GR_PREM(-2)+GR_PREM(-1))/3)*GR_NFA(-1)+RES_GR_NFA*US_INFL^TME*GREAL^TME ;
GR_TB = GR_XT*GR_PXT-GR_IT*GR_PIT ;
GR_CURBAL = ( GR_NFA-(GR_NFA(-1))) ;
1+US_RS/100 = (1+GR_RS/100)*GR_ER(1)/GR_ER-GR_PREM+RES_GR_ER ;
GR_RCI = log(GR_PXM)-log(GR_PFM) ;
GR_FACT = (US_IM*US_E96*S0301+JA_IM*JA_E96*S0302+GR_IM*GR_E96*S0303+FR_IM*FR_E96*S0304+IT_IM*IT_E96*S0305+UK_IM*UK_E96*S0306+CA_IM*CA_E96*S0307+SI_IM*SI_E96*S0308+(HO_IM+DC_IM)*RW_E96*S0309)/GR_E96 ;
log(GR_PFM) = W0301*log(US_PXM*US_ER/US_E96)+W0302*log(JA_PXM*JA_ER/JA_E96)+W0303*log(GR_ER/GR_E96)+W0304*log(FR_PXM*FR_ER/FR_E96)+W0305*log(IT_PXM*IT_ER/IT_E96)+W0306*log(UK_PXM*UK_ER/UK_E96)+W0307*log(CA_PXM*CA_ER/CA_E96)+W0308*log(SI_PXM*SI_ER/SI_E96)+W0309*log(RW_PXM*RW_ER/RW_E96) ;
GR_NEER = exp(-V0301*log(US_ER/US_E96)-V0302*log(JA_ER/JA_E96)+log(GR_ER/GR_E96)-V0304*log(FR_ER/FR_E96)-V0305*log(IT_ER/IT_E96)-V0306*log(UK_ER/UK_E96)-V0307*log(CA_ER/CA_E96)-V0308*log(SI_ER/SI_E96)) ;
( log(FR_CPI)-(log(FR_CPI(-1)))) = FR_CPI1*( log(FR_PIM)-(log(FR_PIM(-1))))+FR_CPI2*( log(FR_PGNP)-(log(FR_PGNP(-1))))+(1-FR_CPI1-FR_CPI2)*log(FR_CPI(-1)/FR_CPI(-2))+RES_FR_CPI ;
FR_UNR_A = FR_UNR_FE+FR_UNR_1*100*log(FR_GDP/FR_GDP_FE)+FR_UNR_2*(FR_UNR(-1)-FR_UNR_FE(-1))+RES_FR_UNR_A ;
FR_UNR = FR_UNR_A/*MAX(FR_UNR_A;0.1)*/ ;
( log(FR_PGNPNO)-(log(FR_PGNPNO(-1)))) = FR_LAMBDA*(FR_DELTA_PI*( log(FR_PGNPNO(1))-(log(FR_PGNPNO)))+(1-FR_DELTA_PI)*( log(FR_PGNPNO(-1))-(log(FR_PGNPNO(-2)))))+(1-FR_LAMBDA)*( log(FR_PGNPNO(-1))-(log(FR_PGNPNO(-2))))+FR_GAMMA/100*(FR_NLIN-FR_UNR)/(FR_UNR-FR_PHI)+RES_FR_PGNP ;
FR_INFL = FR_MGROW/GREAL ;
FR_DLLF = log(FR_LF/FR_LF(-1)) ;
FR_DLGDP = log(FR_GDP/FR_GDP(-1)) ;
FR_C = FR_C_DI+FR_C_PI ;
FR_MPC = 1/FR_MPCINV ;
FR_MPCINV(1) = FR_MPCINV-1-((1-FR_SIGMA)*(FR_RSR+FR_PROB)-(RES_FR_MPC+FR_PROB))*FR_MPCINV/FR_SIGMA ;
FR_WH1(1) = FR_WH1*(1+FR_RSR+FR_ALPHA1+RES_FR_WH1+FR_PROB+exp(FR_DLLF_SS)-1)-(((1-FR_BETA)*FR_GDP*FR_PGNP-FR_TAXH)/FR_P+RES_FR_WK*FR_WK) ;
FR_WH2(1) = FR_WH2*(1+FR_RSR+FR_ALPHA2+RES_FR_WH2+FR_PROB+exp(FR_DLLF_SS)-1)-(((1-FR_BETA)*FR_GDP*FR_PGNP-FR_TAXH)/FR_P+RES_FR_WK*FR_WK) ;
FR_WH3(1) = FR_WH3*(1+FR_RSR+FR_ALPHA3+RES_FR_WH3+FR_PROB+exp(FR_DLLF_SS)-1)-(((1-FR_BETA)*FR_GDP*FR_PGNP-FR_TAXH)/FR_P+RES_FR_WK*FR_WK) ;
FR_C_DI = (FR_LAMBDA1*FR_BCHI1+FR_LAMBDA2*FR_BCHI2+FR_LAMBDA3*(1-FR_BCHI1-FR_BCHI2))*((1-FR_BETA)*FR_GDP*FR_PGNP-FR_TAXH)/FR_P+RES_FR_C_DI*GREAL^TME ;
FR_C_PI = FR_MPC*(FR_WK+(FR_M+FR_B+FR_NFA/FR_ER)/FR_P+FR_BCHI1*(1-FR_LAMBDA1)*FR_WH1+FR_BCHI2*(1-FR_LAMBDA2)*FR_WH2+(1-FR_BCHI1-FR_BCHI2)*(1-FR_LAMBDA3)*FR_WH3) ;
FR_WH = FR_BCHI1*FR_WH1+FR_BCHI2*FR_WH2+(1-FR_BCHI1-FR_BCHI2)*FR_WH3 ;
( log(FR_COIL)-(log(FR_COIL(-1)))) = FR_COIL0+FR_COIL1*( log(FR_GDP)-(log(FR_GDP(-1))))+FR_COIL2*( log(POIL/FR_ER/FR_PGNP)-(log(POIL(-1)/FR_ER(-1)/FR_PGNP(-1))))+FR_COIL3*log(POIL(-1)/FR_ER(-1)/FR_PGNP(-1))+FR_COIL4*log(FR_GDP(-1)/FR_COIL(-1))+RES_FR_COIL ;
FR_INVEST/FR_K(-1)-(FR_DELTA_SS+GREAL_SS-1) = FR_K1*(FR_WK/FR_K(-1)-1)+FR_K2*(FR_WK(-1)/FR_K(-2)-1)+RES_FR_K ;
FR_MPK = FR_BETA*FR_GDP/FR_K ;
FR_Q = FR_CHI*(FR_INVEST/FR_K(-1)-(FR_DELTA_SS+GREAL_SS-1))+1 ;
FR_WK(1) = FR_WK*(1+FR_RSR+FR_K/FR_K(-1)-1+FR_DELTA+RES_FR_WK)-(FR_BETA*FR_GDP*FR_PGNP-FR_TAXK)/FR_P+(FR_CHI/2*((FR_Q-1)/FR_CHI)^2+FR_INVEST/FR_K(-1)*(FR_Q-1))*FR_K(-1)*FR_PGNP/FR_P ;
FR_INVEST = ( FR_K-(FR_K(-1)))+FR_DELTA*FR_K(-1) ;
( log(FR_XM)-(log(FR_XM(-1)))) = FR_XM0+( log(FR_FACT)-(log(FR_FACT(-1))))+FR_XM1*( FR_RCI-(FR_RCI(-1)))+FR_XM2*(FR_XM3*FR_RCI(-1)+log(FR_FACT(-1))-log(FR_XM(-1)))+RES_FR_XM ;
FR_XMA = FR_XM+T04*(WTRADER-TRDER*GREAL^TME)/FR_E96 ;
FR_XT = FR_XMA+FR_XOIL ;
FR_ACT = FR_C_MPROP*FR_C+FR_INVEST_MPROP*FR_INVEST+FR_G_MPROP*FR_G+FR_XT_MPROP*FR_XT ;
( log(FR_IM)-(log(FR_IM(-1)))) = FR_IM0+( log(FR_ACT)-(log(FR_ACT(-1))))+FR_IM1*( log(FR_PIMA/FR_PGNPNO)-(log(FR_PIMA(-1)/FR_PGNPNO(-1))))+FR_IM2*(FR_IM3*log(FR_PIMA(-1)/FR_PGNPNO(-1))+log(FR_ACT(-1))-log(FR_IM(-1)))+RES_FR_IM ;
FR_IOIL = FR_COIL+FR_XOIL-FR_PRODOIL+RES_FR_IOIL*GREAL^TME ;
( log(FR_ICOM)-(log(FR_ICOM(-1)))) = FR_IC0+FR_IC2*( log(PCOM/FR_ER/FR_PGNP)-(log(PCOM(-1)/FR_ER(-1)/FR_PGNP(-1))))+FR_IC1*( log(FR_GDP)-(log(FR_GDP(-1))))+FR_IC3*log(PCOM(-1)/FR_ER(-1)/FR_PGNP(-1))+FR_IC4*log(FR_GDP(-1))+FR_IC5*log(FR_ICOM(-1))+RES_FR_ICOM-(FR_IC4+FR_IC5)*log(GREAL^TME) ;
FR_IT = FR_IM+FR_IOIL+FR_ICOM ;
FR_A = FR_C+FR_INVEST+FR_G ;
FR_GDP = FR_A+FR_XT-FR_IT ;
FR_GNP = FR_GDP+(US_R+(FR_PREM(-3)+FR_PREM(-2)+FR_PREM(-1))/3)*FR_NFA(-1)/FR_ER/FR_PGNP+RES_FR_GNP*GREAL^TME ;
FR_W = FR_WH+FR_WK+(FR_M+FR_B+FR_NFA/FR_ER)/FR_P ;
FR_YD = (FR_GDP*FR_PGNP-FR_TAX)/FR_P-FR_DELTA*FR_K(-1) ;
FR_GE = FR_P*FR_G+FR_R*FR_B(-1)+FR_GEXOG ;
FR_TAX = FR_TRATE*FR_PGNP*FR_GNP ;
FR_TAXK = FR_TAXK_ALPHA*FR_TAXK_SHAR*FR_TAX+(1-FR_TAXK_ALPHA)*FR_TRATEK*FR_BETA*FR_GDP*FR_PGNP ;
FR_TAXH = FR_TAX-FR_TAXK ;
FR_TRATE = FR_TRATE_EXOG*(1-FR_TRATE_ALPHA)+FR_TRATE_ALPHA*((FR_TRATE(-2)/5+FR_TRATE(-1)/5+FR_TRATE(0)/5+FR_TRATE(1)/5+FR_TRATE(2)/5)+TAU1*(FR_B(1)/(FR_GNP(1)*FR_PGNP(1))-FR_BT_GDP_RAT(1))+RES_FR_TRATE) ;
FR_BT = FR_BT_GDP_RAT*FR_GNP*FR_PGNP ;
( FR_B-(FR_B(-1)))+( FR_M-(FR_M(-1))) = FR_R*FR_B(-1)+FR_P*FR_G-FR_TAX ;
FR_GDEF = ( FR_B+FR_M-(FR_B(-1)+FR_M(-1))) ;
log(FR_M/FR_P) = FR_M0+(1-FR_M4)*log(FR_A)+FR_M2*FR_RS+FR_M4*log(FR_M(-1)/FR_P(-1))+RES_FR_M ;
FR_RS = (1-FR_X_RS1)*FR_RS_EXOG+FR_X_RS1*(FR_RS(-1)+FR_RS1*log(FR_MT/FR_M)/FR_M2+FR_RS2*log(GR_ER/FR_ER/FR_PAR)+FR_RS3*log(US_ER/FR_ER/FR_PARUS)+FR_RS4*log(FR_NEER/FR_NEER_PAR)+FR_RS5*(FR_UNR_FE-FR_UNR-FR_UNR_GAP_EXOG)+FR_RS6*100*(log(FR_GDP)-log(FR_GDP_FE)-FR_GDP_GAP_EXOG)+FR_X_RS2*(-FR_RS(-1)+FR_RSCON+100*( log(FR_P(1))-(log(FR_P))))+100*(FR_RTARC1*(( log(FR_P)-(log(FR_P(-1))))-( log(FR_P_TAR)-(log(FR_P_TAR(-1))))-FR_P_GAP_EXOG)+FR_RTARC2*(( log(FR_PGNP)-(log(FR_PGNP(-1))))-( log(FR_PGNP_TAR)-(log(FR_PGNP_TAR(-1))))-FR_PGNP_GAP_EXOG)+FR_RTARC3*(( log(FR_CPI)-(log(FR_CPI(-1))))-( log(FR_CPI_TAR)-(log(FR_CPI_TAR(-1))))-FR_CPI_GAP_EXOG)+FR_RTARC4*(( log(FR_PGNPNO)-(log(FR_PGNPNO(-1))))-( log(FR_PGNPNO_TAR)-(log(FR_PGNPNO_TAR(-1))))-FR_PGNPNO_GAP_EXOG)+FR_RTARF1*(( log(FR_P(1))-(log(FR_P)))-( log(FR_P_TAR(1))-(log(FR_P_TAR)))-FR_P_GAP_EXOG(1))+FR_RTARF2*(( log(FR_PGNP(1))-(log(FR_PGNP)))-( log(FR_PGNP_TAR(1))-(log(FR_PGNP_TAR)))-FR_PGNP_GAP_EXOG(1))+FR_RTARF3*(( log(FR_CPI(1))-(log(FR_CPI)))-( log(FR_CPI_TAR(1))-(log(FR_CPI_TAR)))-FR_CPI_GAP_EXOG(1))+FR_RTARF4*(( log(FR_PGNPNO(1))-(log(FR_PGNPNO)))-( log(FR_PGNPNO_TAR(1))-(log(FR_PGNPNO_TAR)))-FR_PGNPNO_GAP_EXOG(1)))+FR_RSCON2+RES_FR_RS)+FR_RS1PERM*0 ;
FR_RL/100 = ((1+FR_RS/100)*(1+FR_RS(1)/100)*(1+FR_RS(2)/100)*(1+FR_RS(3)/100)*(1+FR_RS(4)/100)*(1+FR_RS(5)/100)*(1+FR_RS(6)/100)*(1+FR_RS(7)/100)*(1+FR_RS(8)/100)*(1+FR_RS(9)/100))^0.1*(1+FR_TPREM)-1+RES_FR_RL ;
FR_R = 0.5*FR_RS(-1)/100+0.5*(FR_RL(-3)/100+FR_RL(-2)/100+FR_RL(-1)/100)/3 ;
FR_RLR = (1+FR_RL/100)/(FR_P(10)/FR_P)^0.1-1 ;
FR_RSR = (1+FR_RS/100)/(FR_P(1)/FR_P)-1 ;
FR_PGNPNO = (FR_GDP*FR_PGNP-FR_PRODOIL*POIL/FR_ER*FR_E96)/(FR_GDP-FR_PRODOIL) ;
FR_PGNP = (FR_P*FR_A+FR_XT*FR_PXT-FR_IT*FR_PIT)/FR_GDP+RES_FR_P*FR_PGNP ;
( log(FR_PXM)-(log(FR_PXM(-1)))) = FR_PXM0+FR_PXM1*( log(FR_PGNPNO)-(log(FR_PGNPNO(-1))))+(1-FR_PXM1)*( log(FR_PFM)-(log(FR_PFM(-1))))+FR_PXM2*log(FR_PGNPNO(-1)/FR_PXM(-1))+RES_FR_PXM ;
FR_PXT = (FR_XMA*FR_PXM+POIL/FR_ER*FR_E96*FR_XOIL)/FR_XT ;
FR_PIM = (S0104*US_PXM+S0204*JA_PXM*JA_ER/JA_E96+S0304*GR_PXM*GR_ER/GR_E96+S0404*FR_PXM*FR_ER/FR_E96+S0504*IT_PXM*IT_ER/IT_E96+S0604*UK_PXM*UK_ER/UK_E96+S0704*CA_PXM*CA_ER/CA_E96+S0804*SI_PXM*SI_ER/SI_E96+S0904*RW_PXM*RW_ER/RW_E96)/(FR_ER/FR_E96)*(1+RES_FR_PIM) ;
FR_PIMA = FR_PIM+T04*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/FR_ER/FR_IM ;
FR_PIT = (FR_IM*FR_PIMA+FR_IOIL*POIL/FR_ER*FR_E96+FR_ICOM*PCOM/FR_ER*FR_E96)/FR_IT ;
//log(FR_TFP_FE) = RES_FR_TFP_FE ;
FR_TFP_FE = exp(RES_FR_TFP_FE) ;
FR_GDP_FE = FR_TFP_FE*FR_K^FR_BETA*((1-FR_UNR_FE/100)*FR_LF)^(1-FR_BETA) ;
FR_LF = FR_POP*FR_PART/(1+FR_DEM3) ;
FR_CU = 100*FR_GDP/FR_GDP_FE ;
( FR_NFA-(FR_NFA(-1))) = (FR_XT*FR_PXT-FR_IT*FR_PIT)*FR_ER+(US_R+(FR_PREM(-3)+FR_PREM(-2)+FR_PREM(-1))/3)*FR_NFA(-1)+RES_FR_NFA*US_INFL^TME*GREAL^TME ;
FR_TB = FR_XT*FR_PXT-FR_IT*FR_PIT ;
FR_CURBAL = ( FR_NFA-(FR_NFA(-1))) ;
1+US_RS/100 = (1+FR_RS/100)*FR_ER(1)/FR_ER-FR_PREM+RES_FR_ER ;
FR_RCI = log(FR_PXM)-log(FR_PFM) ;
FR_FACT = (US_IM*US_E96*S0401+JA_IM*JA_E96*S0402+GR_IM*GR_E96*S0403+FR_IM*FR_E96*S0404+IT_IM*IT_E96*S0405+UK_IM*UK_E96*S0406+CA_IM*CA_E96*S0407+SI_IM*SI_E96*S0408+(HO_IM+DC_IM)*RW_E96*S0409)/FR_E96 ;
log(FR_PFM) = W0401*log(US_PXM*US_ER/US_E96)+W0402*log(JA_PXM*JA_ER/JA_E96)+W0403*log(GR_PXM*GR_ER/GR_E96)+W0404*log(FR_ER/FR_E96)+W0405*log(IT_PXM*IT_ER/IT_E96)+W0406*log(UK_PXM*UK_ER/UK_E96)+W0407*log(CA_PXM*CA_ER/CA_E96)+W0408*log(SI_PXM*SI_ER/SI_E96)+W0409*log(RW_PXM*RW_ER/RW_E96) ;
FR_NEER = exp(-V0401*log(US_ER/US_E96)-V0402*log(JA_ER/JA_E96)-V0403*log(GR_ER/GR_E96)+log(FR_ER/FR_E96)-V0405*log(IT_ER/IT_E96)-V0406*log(UK_ER/UK_E96)-V0407*log(CA_ER/CA_E96)-V0408*log(SI_ER/SI_E96)) ;
( log(IT_CPI)-(log(IT_CPI(-1)))) = IT_CPI1*( log(IT_PIM)-(log(IT_PIM(-1))))+IT_CPI2*( log(IT_PGNP)-(log(IT_PGNP(-1))))+(1-IT_CPI1-IT_CPI2)*log(IT_CPI(-1)/IT_CPI(-2))+RES_IT_CPI ;
IT_UNR_A = IT_UNR_FE+IT_UNR_1*100*log(IT_GDP/IT_GDP_FE)+IT_UNR_2*(IT_UNR(-1)-IT_UNR_FE(-1))+RES_IT_UNR_A ;
IT_UNR = IT_UNR_A/*MAX(IT_UNR_A;0.1)*/ ;
( log(IT_PGNPNO)-(log(IT_PGNPNO(-1)))) = IT_LAMBDA*(IT_DELTA_PI*( log(IT_PGNPNO(1))-(log(IT_PGNPNO)))+(1-IT_DELTA_PI)*( log(IT_PGNPNO(-1))-(log(IT_PGNPNO(-2)))))+(1-IT_LAMBDA)*( log(IT_PGNPNO(-1))-(log(IT_PGNPNO(-2))))+IT_GAMMA/100*(IT_NLIN-IT_UNR)/(IT_UNR-IT_PHI)+RES_IT_PGNP ;
IT_INFL = IT_MGROW/GREAL ;
IT_DLLF = log(IT_LF/IT_LF(-1)) ;
IT_DLGDP = log(IT_GDP/IT_GDP(-1)) ;
IT_C = IT_C_DI+IT_C_PI ;
IT_MPC = 1/IT_MPCINV ;
IT_MPCINV(1) = IT_MPCINV-1-((1-IT_SIGMA)*(IT_RSR+IT_PROB)-(RES_IT_MPC+IT_PROB))*IT_MPCINV/IT_SIGMA ;
IT_WH1(1) = IT_WH1*(1+IT_RSR+IT_ALPHA1+RES_IT_WH1+IT_PROB+exp(IT_DLLF_SS)-1)-(((1-IT_BETA)*IT_GDP*IT_PGNP-IT_TAXH)/IT_P+RES_IT_WK*IT_WK) ;
IT_WH2(1) = IT_WH2*(1+IT_RSR+IT_ALPHA2+RES_IT_WH2+IT_PROB+exp(IT_DLLF_SS)-1)-(((1-IT_BETA)*IT_GDP*IT_PGNP-IT_TAXH)/IT_P+RES_IT_WK*IT_WK) ;
IT_WH3(1) = IT_WH3*(1+IT_RSR+IT_ALPHA3+RES_IT_WH3+IT_PROB+exp(IT_DLLF_SS)-1)-(((1-IT_BETA)*IT_GDP*IT_PGNP-IT_TAXH)/IT_P+RES_IT_WK*IT_WK) ;
IT_C_DI = (IT_LAMBDA1*IT_BCHI1+IT_LAMBDA2*IT_BCHI2+IT_LAMBDA3*(1-IT_BCHI1-IT_BCHI2))*((1-IT_BETA)*IT_GDP*IT_PGNP-IT_TAXH)/IT_P+RES_IT_C_DI*GREAL^TME ;
IT_C_PI = IT_MPC*(IT_WK+(IT_M+IT_B+IT_NFA/IT_ER)/IT_P+IT_BCHI1*(1-IT_LAMBDA1)*IT_WH1+IT_BCHI2*(1-IT_LAMBDA2)*IT_WH2+(1-IT_BCHI1-IT_BCHI2)*(1-IT_LAMBDA3)*IT_WH3) ;
IT_WH = IT_BCHI1*IT_WH1+IT_BCHI2*IT_WH2+(1-IT_BCHI1-IT_BCHI2)*IT_WH3 ;
( log(IT_COIL)-(log(IT_COIL(-1)))) = IT_COIL0+IT_COIL1*( log(IT_GDP)-(log(IT_GDP(-1))))+IT_COIL2*( log(POIL/IT_ER/IT_PGNP)-(log(POIL(-1)/IT_ER(-1)/IT_PGNP(-1))))+IT_COIL3*log(POIL(-1)/IT_ER(-1)/IT_PGNP(-1))+IT_COIL4*log(IT_GDP(-1)/IT_COIL(-1))+RES_IT_COIL ;
IT_INVEST/IT_K(-1)-(IT_DELTA_SS+GREAL_SS-1) = IT_K1*(IT_WK/IT_K(-1)-1)+IT_K2*(IT_WK(-1)/IT_K(-2)-1)+RES_IT_K ;
IT_MPK = IT_BETA*IT_GDP/IT_K ;
IT_Q = IT_CHI*(IT_INVEST/IT_K(-1)-(IT_DELTA_SS+GREAL_SS-1))+1 ;
IT_WK(1) = IT_WK*(1+IT_RSR+IT_K/IT_K(-1)-1+IT_DELTA+RES_IT_WK)-(IT_BETA*IT_GDP*IT_PGNP-IT_TAXK)/IT_P+(IT_CHI/2*((IT_Q-1)/IT_CHI)^2+IT_INVEST/IT_K(-1)*(IT_Q-1))*IT_K(-1)*IT_PGNP/IT_P ;
IT_INVEST = ( IT_K-(IT_K(-1)))+IT_DELTA*IT_K(-1) ;
( log(IT_XM)-(log(IT_XM(-1)))) = IT_XM0+( log(IT_FACT)-(log(IT_FACT(-1))))+IT_XM1*( IT_RCI-(IT_RCI(-1)))+IT_XM2*(IT_XM3*IT_RCI(-1)+log(IT_FACT(-1))-log(IT_XM(-1)))+RES_IT_XM ;
IT_XMA = IT_XM+T05*(WTRADER-TRDER*GREAL^TME)/IT_E96 ;
IT_XT = IT_XMA+IT_XOIL ;
IT_ACT = IT_C_MPROP*IT_C+IT_INVEST_MPROP*IT_INVEST+IT_G_MPROP*IT_G+IT_XT_MPROP*IT_XT ;
( log(IT_IM)-(log(IT_IM(-1)))) = IT_IM0+( log(IT_ACT)-(log(IT_ACT(-1))))+IT_IM1*( log(IT_PIMA/IT_PGNPNO)-(log(IT_PIMA(-1)/IT_PGNPNO(-1))))+IT_IM2*(IT_IM3*log(IT_PIMA(-1)/IT_PGNPNO(-1))+log(IT_ACT(-1))-log(IT_IM(-1)))+RES_IT_IM ;
IT_IOIL = IT_COIL+IT_XOIL-IT_PRODOIL+RES_IT_IOIL*GREAL^TME ;
( log(IT_ICOM)-(log(IT_ICOM(-1)))) = IT_IC0+IT_IC2*( log(PCOM/IT_ER/IT_PGNP)-(log(PCOM(-1)/IT_ER(-1)/IT_PGNP(-1))))+IT_IC1*( log(IT_GDP)-(log(IT_GDP(-1))))+IT_IC3*log(PCOM(-1)/IT_ER(-1)/IT_PGNP(-1))+IT_IC4*log(IT_GDP(-1))+IT_IC5*log(IT_ICOM(-1))+RES_IT_ICOM-(IT_IC4+IT_IC5)*log(GREAL^TME) ;
IT_IT = IT_IM+IT_IOIL+IT_ICOM ;
IT_A = IT_C+IT_INVEST+IT_G ;
IT_GDP = IT_A+IT_XT-IT_IT ;
IT_GNP = IT_GDP+(US_R+(IT_PREM(-3)+IT_PREM(-2)+IT_PREM(-1))/3)*IT_NFA(-1)/IT_ER/IT_PGNP+RES_IT_GNP*GREAL^TME ;
IT_W = IT_WH+IT_WK+(IT_M+IT_B+IT_NFA/IT_ER)/IT_P ;
IT_YD = (IT_GDP*IT_PGNP-IT_TAX)/IT_P-IT_DELTA*IT_K(-1) ;
IT_GE = IT_P*IT_G+IT_R*IT_B(-1)+IT_GEXOG ;
IT_TAX = IT_TRATE*IT_PGNP*IT_GNP ;
IT_TAXK = IT_TAXK_ALPHA*IT_TAXK_SHAR*IT_TAX+(1-IT_TAXK_ALPHA)*IT_TRATEK*IT_BETA*IT_GDP*IT_PGNP ;
IT_TAXH = IT_TAX-IT_TAXK ;
IT_TRATE = IT_TRATE_EXOG*(1-IT_TRATE_ALPHA)+IT_TRATE_ALPHA*((IT_TRATE(-2)/5+IT_TRATE(-1)/5+IT_TRATE(0)/5+IT_TRATE(1)/5+IT_TRATE(2)/5)+TAU1*(IT_B(1)/(IT_GNP(1)*IT_PGNP(1))-IT_BT_GDP_RAT(1))+RES_IT_TRATE) ;
IT_BT = IT_BT_GDP_RAT*IT_GNP*IT_PGNP ;
( IT_B-(IT_B(-1)))+( IT_M-(IT_M(-1))) = IT_R*IT_B(-1)+IT_P*IT_G-IT_TAX ;
IT_GDEF = ( IT_B+IT_M-(IT_B(-1)+IT_M(-1))) ;
log(IT_M/IT_P) = IT_M0+(1-IT_M4)*log(IT_A)+IT_M2*IT_RS+IT_M4*log(IT_M(-1)/IT_P(-1))+RES_IT_M ;
IT_RS = (1-IT_X_RS1)*IT_RS_EXOG+IT_X_RS1*(IT_RS(-1)+IT_RS1*log(IT_MT/IT_M)/IT_M2+IT_RS2*log(GR_ER/IT_ER/IT_PAR)+IT_RS3*log(US_ER/IT_ER/IT_PARUS)+IT_RS4*log(IT_NEER/IT_NEER_PAR)+IT_RS5*(IT_UNR_FE-IT_UNR-IT_UNR_GAP_EXOG)+IT_RS6*100*(log(IT_GDP)-log(IT_GDP_FE)-IT_GDP_GAP_EXOG)+IT_X_RS2*(-IT_RS(-1)+IT_RSCON+100*( log(IT_P(1))-(log(IT_P))))+100*(IT_RTARC1*(( log(IT_P)-(log(IT_P(-1))))-( log(IT_P_TAR)-(log(IT_P_TAR(-1))))-IT_P_GAP_EXOG)+IT_RTARC2*(( log(IT_PGNP)-(log(IT_PGNP(-1))))-( log(IT_PGNP_TAR)-(log(IT_PGNP_TAR(-1))))-IT_PGNP_GAP_EXOG)+IT_RTARC3*(( log(IT_CPI)-(log(IT_CPI(-1))))-( log(IT_CPI_TAR)-(log(IT_CPI_TAR(-1))))-IT_CPI_GAP_EXOG)+IT_RTARC4*(( log(IT_PGNPNO)-(log(IT_PGNPNO(-1))))-( log(IT_PGNPNO_TAR)-(log(IT_PGNPNO_TAR(-1))))-IT_PGNPNO_GAP_EXOG)+IT_RTARF1*(( log(IT_P(1))-(log(IT_P)))-( log(IT_P_TAR(1))-(log(IT_P_TAR)))-IT_P_GAP_EXOG(1))+IT_RTARF2*(( log(IT_PGNP(1))-(log(IT_PGNP)))-( log(IT_PGNP_TAR(1))-(log(IT_PGNP_TAR)))-IT_PGNP_GAP_EXOG(1))+IT_RTARF3*(( log(IT_CPI(1))-(log(IT_CPI)))-( log(IT_CPI_TAR(1))-(log(IT_CPI_TAR)))-IT_CPI_GAP_EXOG(1))+IT_RTARF4*(( log(IT_PGNPNO(1))-(log(IT_PGNPNO)))-( log(IT_PGNPNO_TAR(1))-(log(IT_PGNPNO_TAR)))-IT_PGNPNO_GAP_EXOG(1)))+IT_RSCON2+RES_IT_RS)+IT_RS1PERM*0 ;
IT_RL/100 = ((1+IT_RS/100)*(1+IT_RS(1)/100)*(1+IT_RS(2)/100)*(1+IT_RS(3)/100)*(1+IT_RS(4)/100)*(1+IT_RS(5)/100)*(1+IT_RS(6)/100)*(1+IT_RS(7)/100)*(1+IT_RS(8)/100)*(1+IT_RS(9)/100))^0.1*(1+IT_TPREM)-1+RES_IT_RL ;
IT_R = 0.5*IT_RS(-1)/100+0.5*(IT_RL(-3)/100+IT_RL(-2)/100+IT_RL(-1)/100)/3 ;
IT_RLR = (1+IT_RL/100)/(IT_P(10)/IT_P)^0.1-1 ;
IT_RSR = (1+IT_RS/100)/(IT_P(1)/IT_P)-1 ;
IT_PGNPNO = (IT_GDP*IT_PGNP-IT_PRODOIL*POIL/IT_ER*IT_E96)/(IT_GDP-IT_PRODOIL) ;
IT_PGNP = (IT_P*IT_A+IT_XT*IT_PXT-IT_IT*IT_PIT)/IT_GDP+RES_IT_P*IT_PGNP ;
( log(IT_PXM)-(log(IT_PXM(-1)))) = IT_PXM0+IT_PXM1*( log(IT_PGNPNO)-(log(IT_PGNPNO(-1))))+(1-IT_PXM1)*( log(IT_PFM)-(log(IT_PFM(-1))))+IT_PXM2*log(IT_PGNPNO(-1)/IT_PXM(-1))+RES_IT_PXM ;
IT_PXT = (IT_XMA*IT_PXM+POIL/IT_ER*IT_E96*IT_XOIL)/IT_XT ;
IT_PIM = (S0105*US_PXM+S0205*JA_PXM*JA_ER/JA_E96+S0305*GR_PXM*GR_ER/GR_E96+S0405*FR_PXM*FR_ER/FR_E96+S0505*IT_PXM*IT_ER/IT_E96+S0605*UK_PXM*UK_ER/UK_E96+S0705*CA_PXM*CA_ER/CA_E96+S0805*SI_PXM*SI_ER/SI_E96+S0905*RW_PXM*RW_ER/RW_E96)/(IT_ER/IT_E96)*(1+RES_IT_PIM) ;
IT_PIMA = IT_PIM+T05*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/IT_ER/IT_IM ;
IT_PIT = (IT_IM*IT_PIMA+IT_IOIL*POIL/IT_ER*IT_E96+IT_ICOM*PCOM/IT_ER*IT_E96)/IT_IT ;
//log(IT_TFP_FE) = RES_IT_TFP_FE ;
IT_TFP_FE = exp(RES_IT_TFP_FE);
IT_GDP_FE = IT_TFP_FE*IT_K^IT_BETA*((1-IT_UNR_FE/100)*IT_LF)^(1-IT_BETA) ;
IT_LF = IT_POP*IT_PART/(1+IT_DEM3) ;
IT_CU = 100*IT_GDP/IT_GDP_FE ;
( IT_NFA-(IT_NFA(-1))) = (IT_XT*IT_PXT-IT_IT*IT_PIT)*IT_ER+(US_R+(IT_PREM(-3)+IT_PREM(-2)+IT_PREM(-1))/3)*IT_NFA(-1)+RES_IT_NFA*US_INFL^TME*GREAL^TME ;
IT_TB = IT_XT*IT_PXT-IT_IT*IT_PIT ;
IT_CURBAL = ( IT_NFA-(IT_NFA(-1))) ;
1+US_RS/100 = (1+IT_RS/100)*IT_ER(1)/IT_ER-IT_PREM+RES_IT_ER ;
IT_RCI = log(IT_PXM)-log(IT_PFM) ;
IT_FACT = (US_IM*US_E96*S0501+JA_IM*JA_E96*S0502+GR_IM*GR_E96*S0503+FR_IM*FR_E96*S0504+IT_IM*IT_E96*S0505+UK_IM*UK_E96*S0506+CA_IM*CA_E96*S0507+SI_IM*SI_E96*S0508+(HO_IM+DC_IM)*RW_E96*S0509)/IT_E96 ;
log(IT_PFM) = W0501*log(US_PXM*US_ER/US_E96)+W0502*log(JA_PXM*JA_ER/JA_E96)+W0503*log(GR_PXM*GR_ER/GR_E96)+W0504*log(FR_PXM*FR_ER/FR_E96)+W0505*log(IT_ER/IT_E96)+W0506*log(UK_PXM*UK_ER/UK_E96)+W0507*log(CA_PXM*CA_ER/CA_E96)+W0508*log(SI_PXM*SI_ER/SI_E96)+W0509*log(RW_PXM*RW_ER/RW_E96) ;
IT_NEER = exp(-V0501*log(US_ER/US_E96)-V0502*log(JA_ER/JA_E96)-V0503*log(GR_ER/GR_E96)-V0504*log(FR_ER/FR_E96)+log(IT_ER/IT_E96)-V0506*log(UK_ER/UK_E96)-V0507*log(CA_ER/CA_E96)-V0508*log(SI_ER/SI_E96)) ;
( log(UK_CPI)-(log(UK_CPI(-1)))) = UK_CPI1*( log(UK_PIM)-(log(UK_PIM(-1))))+UK_CPI2*( log(UK_PGNP)-(log(UK_PGNP(-1))))+(1-UK_CPI1-UK_CPI2)*log(UK_CPI(-1)/UK_CPI(-2))+RES_UK_CPI ;
UK_UNR_A = UK_UNR_FE+UK_UNR_1*100*log(UK_GDP/UK_GDP_FE)+UK_UNR_2*(UK_UNR(-1)-UK_UNR_FE(-1))+RES_UK_UNR_A ;
UK_UNR = UK_UNR_A/*MAX(UK_UNR_A;0.1)*/ ;
( log(UK_PGNPNO)-(log(UK_PGNPNO(-1)))) = UK_LAMBDA*(UK_DELTA_PI*( log(UK_PGNPNO(1))-(log(UK_PGNPNO)))+(1-UK_DELTA_PI)*( log(UK_PGNPNO(-1))-(log(UK_PGNPNO(-2)))))+(1-UK_LAMBDA)*( log(UK_PGNPNO(-1))-(log(UK_PGNPNO(-2))))+UK_GAMMA/100*(UK_NLIN-UK_UNR)/(UK_UNR-UK_PHI)+RES_UK_PGNP ;
UK_INFL = UK_MGROW/GREAL ;
UK_DLLF = log(UK_LF/UK_LF(-1)) ;
UK_DLGDP = log(UK_GDP/UK_GDP(-1)) ;
UK_C = UK_C_DI+UK_C_PI ;
UK_MPC = 1/UK_MPCINV ;
UK_MPCINV(1) = UK_MPCINV-1-((1-UK_SIGMA)*(UK_RSR+UK_PROB)-(RES_UK_MPC+UK_PROB))*UK_MPCINV/UK_SIGMA ;
UK_WH1(1) = UK_WH1*(1+UK_RSR+UK_ALPHA1+RES_UK_WH1+UK_PROB+exp(UK_DLLF_SS)-1)-(((1-UK_BETA)*UK_GDP*UK_PGNP-UK_TAXH)/UK_P+RES_UK_WK*UK_WK) ;
UK_WH2(1) = UK_WH2*(1+UK_RSR+UK_ALPHA2+RES_UK_WH2+UK_PROB+exp(UK_DLLF_SS)-1)-(((1-UK_BETA)*UK_GDP*UK_PGNP-UK_TAXH)/UK_P+RES_UK_WK*UK_WK) ;
UK_WH3(1) = UK_WH3*(1+UK_RSR+UK_ALPHA3+RES_UK_WH3+UK_PROB+exp(UK_DLLF_SS)-1)-(((1-UK_BETA)*UK_GDP*UK_PGNP-UK_TAXH)/UK_P+RES_UK_WK*UK_WK) ;
UK_C_DI = (UK_LAMBDA1*UK_BCHI1+UK_LAMBDA2*UK_BCHI2+UK_LAMBDA3*(1-UK_BCHI1-UK_BCHI2))*((1-UK_BETA)*UK_GDP*UK_PGNP-UK_TAXH)/UK_P+RES_UK_C_DI*GREAL^TME ;
UK_C_PI = UK_MPC*(UK_WK+(UK_M+UK_B+UK_NFA/UK_ER)/UK_P+UK_BCHI1*(1-UK_LAMBDA1)*UK_WH1+UK_BCHI2*(1-UK_LAMBDA2)*UK_WH2+(1-UK_BCHI1-UK_BCHI2)*(1-UK_LAMBDA3)*UK_WH3) ;
UK_WH = UK_BCHI1*UK_WH1+UK_BCHI2*UK_WH2+(1-UK_BCHI1-UK_BCHI2)*UK_WH3 ;
( log(UK_COIL)-(log(UK_COIL(-1)))) = UK_COIL0+UK_COIL1*( log(UK_GDP)-(log(UK_GDP(-1))))+UK_COIL2*( log(POIL/UK_ER/UK_PGNP)-(log(POIL(-1)/UK_ER(-1)/UK_PGNP(-1))))+UK_COIL3*log(POIL(-1)/UK_ER(-1)/UK_PGNP(-1))+UK_COIL4*log(UK_GDP(-1)/UK_COIL(-1))+RES_UK_COIL ;
UK_INVEST/UK_K(-1)-(UK_DELTA_SS+GREAL_SS-1) = UK_K1*(UK_WK/UK_K(-1)-1)+UK_K2*(UK_WK(-1)/UK_K(-2)-1)+RES_UK_K ;
UK_MPK = UK_BETA*UK_GDP/UK_K ;
UK_Q = UK_CHI*(UK_INVEST/UK_K(-1)-(UK_DELTA_SS+GREAL_SS-1))+1 ;
UK_WK(1) = UK_WK*(1+UK_RSR+UK_K/UK_K(-1)-1+UK_DELTA+RES_UK_WK)-(UK_BETA*UK_GDP*UK_PGNP-UK_TAXK)/UK_P+(UK_CHI/2*((UK_Q-1)/UK_CHI)^2+UK_INVEST/UK_K(-1)*(UK_Q-1))*UK_K(-1)*UK_PGNP/UK_P ;
UK_INVEST = ( UK_K-(UK_K(-1)))+UK_DELTA*UK_K(-1) ;
( log(UK_XM)-(log(UK_XM(-1)))) = UK_XM0+( log(UK_FACT)-(log(UK_FACT(-1))))+UK_XM1*( UK_RCI-(UK_RCI(-1)))+UK_XM2*(UK_XM3*UK_RCI(-1)+log(UK_FACT(-1))-log(UK_XM(-1)))+RES_UK_XM ;
UK_XMA = UK_XM+T06*(WTRADER-TRDER*GREAL^TME)/UK_E96 ;
UK_XT = UK_XMA+UK_XOIL ;
UK_ACT = UK_C_MPROP*UK_C+UK_INVEST_MPROP*UK_INVEST+UK_G_MPROP*UK_G+UK_XT_MPROP*UK_XT ;
( log(UK_IM)-(log(UK_IM(-1)))) = UK_IM0+( log(UK_ACT)-(log(UK_ACT(-1))))+UK_IM1*( log(UK_PIMA/UK_PGNPNO)-(log(UK_PIMA(-1)/UK_PGNPNO(-1))))+UK_IM2*(UK_IM3*log(UK_PIMA(-1)/UK_PGNPNO(-1))+log(UK_ACT(-1))-log(UK_IM(-1)))+RES_UK_IM ;
UK_IOIL = UK_COIL+UK_XOIL-UK_PRODOIL+RES_UK_IOIL*GREAL^TME ;
( log(UK_ICOM)-(log(UK_ICOM(-1)))) = UK_IC0+UK_IC2*( log(PCOM/UK_ER/UK_PGNP)-(log(PCOM(-1)/UK_ER(-1)/UK_PGNP(-1))))+UK_IC1*( log(UK_GDP)-(log(UK_GDP(-1))))+UK_IC3*log(PCOM(-1)/UK_ER(-1)/UK_PGNP(-1))+UK_IC4*log(UK_GDP(-1))+UK_IC5*log(UK_ICOM(-1))+RES_UK_ICOM-(UK_IC4+UK_IC5)*log(GREAL^TME) ;
UK_IT = UK_IM+UK_IOIL+UK_ICOM ;
UK_A = UK_C+UK_INVEST+UK_G ;
UK_GDP = UK_A+UK_XT-UK_IT ;
UK_GNP = UK_GDP+(US_R+(UK_PREM(-3)+UK_PREM(-2)+UK_PREM(-1))/3)*UK_NFA(-1)/UK_ER/UK_PGNP+RES_UK_GNP*GREAL^TME ;
UK_W = UK_WH+UK_WK+(UK_M+UK_B+UK_NFA/UK_ER)/UK_P ;
UK_YD = (UK_GDP*UK_PGNP-UK_TAX)/UK_P-UK_DELTA*UK_K(-1) ;
UK_GE = UK_P*UK_G+UK_R*UK_B(-1)+UK_GEXOG ;
UK_TAX = UK_TRATE*UK_PGNP*UK_GNP ;
UK_TAXK = UK_TAXK_ALPHA*UK_TAXK_SHAR*UK_TAX+(1-UK_TAXK_ALPHA)*UK_TRATEK*UK_BETA*UK_GDP*UK_PGNP ;
UK_TAXH = UK_TAX-UK_TAXK ;
UK_TRATE = UK_TRATE_EXOG*(1-UK_TRATE_ALPHA)+UK_TRATE_ALPHA*((UK_TRATE(-2)/5+UK_TRATE(-1)/5+UK_TRATE(0)/5+UK_TRATE(1)/5+UK_TRATE(2)/5)+TAU1*(UK_B(1)/(UK_GNP(1)*UK_PGNP(1))-UK_BT_GDP_RAT(1))+RES_UK_TRATE) ;
UK_BT = UK_BT_GDP_RAT*UK_GNP*UK_PGNP ;
( UK_B-(UK_B(-1)))+( UK_M-(UK_M(-1))) = UK_R*UK_B(-1)+UK_P*UK_G-UK_TAX ;
UK_GDEF = ( UK_B+UK_M-(UK_B(-1)+UK_M(-1))) ;
log(UK_M/UK_P) = UK_M0+(1-UK_M4)*log(UK_A)+UK_M2*UK_RS+UK_M4*log(UK_M(-1)/UK_P(-1))+RES_UK_M ;
UK_RS = (1-UK_X_RS1)*UK_RS_EXOG+UK_X_RS1*(UK_RS(-1)+UK_RS1*log(UK_MT/UK_M)/UK_M2+UK_RS2*log(GR_ER/UK_ER/UK_PAR)+UK_RS3*log(US_ER/UK_ER/UK_PARUS)+UK_RS4*log(UK_NEER/UK_NEER_PAR)+UK_RS5*(UK_UNR_FE-UK_UNR-UK_UNR_GAP_EXOG)+UK_RS6*100*(log(UK_GDP)-log(UK_GDP_FE)-UK_GDP_GAP_EXOG)+UK_X_RS2*(-UK_RS(-1)+UK_RSCON+100*( log(UK_P(1))-(log(UK_P))))+100*(UK_RTARC1*(( log(UK_P)-(log(UK_P(-1))))-( log(UK_P_TAR)-(log(UK_P_TAR(-1))))-UK_P_GAP_EXOG)+UK_RTARC2*(( log(UK_PGNP)-(log(UK_PGNP(-1))))-( log(UK_PGNP_TAR)-(log(UK_PGNP_TAR(-1))))-UK_PGNP_GAP_EXOG)+UK_RTARC3*(( log(UK_CPI)-(log(UK_CPI(-1))))-( log(UK_CPI_TAR)-(log(UK_CPI_TAR(-1))))-UK_CPI_GAP_EXOG)+UK_RTARC4*(( log(UK_PGNPNO)-(log(UK_PGNPNO(-1))))-( log(UK_PGNPNO_TAR)-(log(UK_PGNPNO_TAR(-1))))-UK_PGNPNO_GAP_EXOG)+UK_RTARF1*(( log(UK_P(1))-(log(UK_P)))-( log(UK_P_TAR(1))-(log(UK_P_TAR)))-UK_P_GAP_EXOG(1))+UK_RTARF2*(( log(UK_PGNP(1))-(log(UK_PGNP)))-( log(UK_PGNP_TAR(1))-(log(UK_PGNP_TAR)))-UK_PGNP_GAP_EXOG(1))+UK_RTARF3*(( log(UK_CPI(1))-(log(UK_CPI)))-( log(UK_CPI_TAR(1))-(log(UK_CPI_TAR)))-UK_CPI_GAP_EXOG(1))+UK_RTARF4*(( log(UK_PGNPNO(1))-(log(UK_PGNPNO)))-( log(UK_PGNPNO_TAR(1))-(log(UK_PGNPNO_TAR)))-UK_PGNPNO_GAP_EXOG(1)))+UK_RSCON2+RES_UK_RS)+UK_RS1PERM*0 ;
UK_RL/100 = ((1+UK_RS/100)*(1+UK_RS(1)/100)*(1+UK_RS(2)/100)*(1+UK_RS(3)/100)*(1+UK_RS(4)/100)*(1+UK_RS(5)/100)*(1+UK_RS(6)/100)*(1+UK_RS(7)/100)*(1+UK_RS(8)/100)*(1+UK_RS(9)/100))^0.1*(1+UK_TPREM)-1+RES_UK_RL ;
UK_R = 0.5*UK_RS(-1)/100+0.5*(UK_RL(-3)/100+UK_RL(-2)/100+UK_RL(-1)/100)/3 ;
UK_RLR = (1+UK_RL/100)/(UK_P(10)/UK_P)^0.1-1 ;
UK_RSR = (1+UK_RS/100)/(UK_P(1)/UK_P)-1 ;
UK_PGNPNO = (UK_GDP*UK_PGNP-UK_PRODOIL*POIL/UK_ER*UK_E96)/(UK_GDP-UK_PRODOIL) ;
UK_PGNP = (UK_P*UK_A+UK_XT*UK_PXT-UK_IT*UK_PIT)/UK_GDP+RES_UK_P*UK_PGNP ;
( log(UK_PXM)-(log(UK_PXM(-1)))) = UK_PXM0+UK_PXM1*( log(UK_PGNPNO)-(log(UK_PGNPNO(-1))))+(1-UK_PXM1)*( log(UK_PFM)-(log(UK_PFM(-1))))+UK_PXM2*log(UK_PGNPNO(-1)/UK_PXM(-1))+RES_UK_PXM ;
UK_PXT = (UK_XMA*UK_PXM+POIL/UK_ER*UK_E96*UK_XOIL)/UK_XT ;
UK_PIM = (S0106*US_PXM+S0206*JA_PXM*JA_ER/JA_E96+S0306*GR_PXM*GR_ER/GR_E96+S0406*FR_PXM*FR_ER/FR_E96+S0506*IT_PXM*IT_ER/IT_E96+S0606*UK_PXM*UK_ER/UK_E96+S0706*CA_PXM*CA_ER/CA_E96+S0806*SI_PXM*SI_ER/SI_E96+S0906*RW_PXM*RW_ER/RW_E96)/(UK_ER/UK_E96)*(1+RES_UK_PIM) ;
UK_PIMA = UK_PIM+T06*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/UK_ER/UK_IM ;
UK_PIT = (UK_IM*UK_PIMA+UK_IOIL*POIL/UK_ER*UK_E96+UK_ICOM*PCOM/UK_ER*UK_E96)/UK_IT ;
//log(UK_TFP_FE) = RES_UK_TFP_FE ;
UK_TFP_FE = exp(RES_UK_TFP_FE);
UK_GDP_FE = UK_TFP_FE*UK_K^UK_BETA*((1-UK_UNR_FE/100)*UK_LF)^(1-UK_BETA) ;
UK_LF = UK_POP*UK_PART/(1+UK_DEM3) ;
UK_CU = 100*UK_GDP/UK_GDP_FE ;
( UK_NFA-(UK_NFA(-1))) = (UK_XT*UK_PXT-UK_IT*UK_PIT)*UK_ER+(US_R+(UK_PREM(-3)+UK_PREM(-2)+UK_PREM(-1))/3)*UK_NFA(-1)+RES_UK_NFA*US_INFL^TME*GREAL^TME ;
UK_TB = UK_XT*UK_PXT-UK_IT*UK_PIT ;
UK_CURBAL = ( UK_NFA-(UK_NFA(-1))) ;
1+US_RS/100 = (1+UK_RS/100)*UK_ER(1)/UK_ER-UK_PREM+RES_UK_ER ;
UK_RCI = log(UK_PXM)-log(UK_PFM) ;
UK_FACT = (US_IM*US_E96*S0601+JA_IM*JA_E96*S0602+GR_IM*GR_E96*S0603+FR_IM*FR_E96*S0604+IT_IM*IT_E96*S0605+UK_IM*UK_E96*S0606+CA_IM*CA_E96*S0607+SI_IM*SI_E96*S0608+(HO_IM+DC_IM)*RW_E96*S0609)/UK_E96 ;
log(UK_PFM) = W0601*log(US_PXM*US_ER/US_E96)+W0602*log(JA_PXM*JA_ER/JA_E96)+W0603*log(GR_PXM*GR_ER/GR_E96)+W0604*log(FR_PXM*FR_ER/FR_E96)+W0605*log(IT_PXM*IT_ER/IT_E96)+W0606*log(UK_ER/UK_E96)+W0607*log(CA_PXM*CA_ER/CA_E96)+W0608*log(SI_PXM*SI_ER/SI_E96)+W0609*log(RW_PXM*RW_ER/RW_E96) ;
UK_NEER = exp(-V0601*log(US_ER/US_E96)-V0602*log(JA_ER/JA_E96)-V0603*log(GR_ER/GR_E96)-V0604*log(FR_ER/FR_E96)-V0605*log(IT_ER/IT_E96)+log(UK_ER/UK_E96)-V0607*log(CA_ER/CA_E96)-V0608*log(SI_ER/SI_E96)) ;
( log(CA_CPI)-(log(CA_CPI(-1)))) = CA_CPI1*( log(CA_PIM)-(log(CA_PIM(-1))))+CA_CPI2*( log(CA_PGNP)-(log(CA_PGNP(-1))))+(1-CA_CPI1-CA_CPI2)*log(CA_CPI(-1)/CA_CPI(-2))+RES_CA_CPI ;
CA_UNR_A = CA_UNR_FE+CA_UNR_1*100*log(CA_GDP/CA_GDP_FE)+CA_UNR_2*(CA_UNR(-1)-CA_UNR_FE(-1))+RES_CA_UNR_A ;
CA_UNR = CA_UNR_A/*MAX(CA_UNR_A;0.1)*/ ;
( log(CA_PGNPNO)-(log(CA_PGNPNO(-1)))) = CA_LAMBDA*(CA_DELTA_PI*( log(CA_PGNPNO(1))-(log(CA_PGNPNO)))+(1-CA_DELTA_PI)*( log(CA_PGNPNO(-1))-(log(CA_PGNPNO(-2)))))+(1-CA_LAMBDA)*( log(CA_PGNPNO(-1))-(log(CA_PGNPNO(-2))))+CA_GAMMA/100*(CA_NLIN-CA_UNR)/(CA_UNR-CA_PHI)+RES_CA_PGNP ;
CA_INFL = CA_MGROW/GREAL ;
CA_DLLF = log(CA_LF/CA_LF(-1)) ;
CA_DLGDP = log(CA_GDP/CA_GDP(-1)) ;
CA_C = CA_C_DI+CA_C_PI ;
CA_MPC = 1/CA_MPCINV ;
CA_MPCINV(1) = CA_MPCINV-1-((1-CA_SIGMA)*(CA_RSR+CA_PROB)-(RES_CA_MPC+CA_PROB))*CA_MPCINV/CA_SIGMA ;
CA_WH1(1) = CA_WH1*(1+CA_RSR+CA_ALPHA1+RES_CA_WH1+CA_PROB+exp(CA_DLLF_SS)-1)-(((1-CA_BETA)*CA_GDP*CA_PGNP-CA_TAXH)/CA_P+RES_CA_WK*CA_WK) ;
CA_WH2(1) = CA_WH2*(1+CA_RSR+CA_ALPHA2+RES_CA_WH2+CA_PROB+exp(CA_DLLF_SS)-1)-(((1-CA_BETA)*CA_GDP*CA_PGNP-CA_TAXH)/CA_P+RES_CA_WK*CA_WK) ;
CA_WH3(1) = CA_WH3*(1+CA_RSR+CA_ALPHA3+RES_CA_WH3+CA_PROB+exp(CA_DLLF_SS)-1)-(((1-CA_BETA)*CA_GDP*CA_PGNP-CA_TAXH)/CA_P+RES_CA_WK*CA_WK) ;
CA_C_DI = (CA_LAMBDA1*CA_BCHI1+CA_LAMBDA2*CA_BCHI2+CA_LAMBDA3*(1-CA_BCHI1-CA_BCHI2))*((1-CA_BETA)*CA_GDP*CA_PGNP-CA_TAXH)/CA_P+RES_CA_C_DI*GREAL^TME ;
CA_C_PI = CA_MPC*(CA_WK+(CA_M+CA_B+CA_NFA/CA_ER)/CA_P+CA_BCHI1*(1-CA_LAMBDA1)*CA_WH1+CA_BCHI2*(1-CA_LAMBDA2)*CA_WH2+(1-CA_BCHI1-CA_BCHI2)*(1-CA_LAMBDA3)*CA_WH3) ;
CA_WH = CA_BCHI1*CA_WH1+CA_BCHI2*CA_WH2+(1-CA_BCHI1-CA_BCHI2)*CA_WH3 ;
( log(CA_COIL)-(log(CA_COIL(-1)))) = CA_COIL0+CA_COIL1*( log(CA_GDP)-(log(CA_GDP(-1))))+CA_COIL2*( log(POIL/CA_ER/CA_PGNP)-(log(POIL(-1)/CA_ER(-1)/CA_PGNP(-1))))+CA_COIL3*log(POIL(-1)/CA_ER(-1)/CA_PGNP(-1))+CA_COIL4*log(CA_GDP(-1)/CA_COIL(-1))+RES_CA_COIL ;
CA_INVEST/CA_K(-1)-(CA_DELTA_SS+GREAL_SS-1) = CA_K1*(CA_WK/CA_K(-1)-1)+CA_K2*(CA_WK(-1)/CA_K(-2)-1)+RES_CA_K ;
CA_MPK = CA_BETA*CA_GDP/CA_K ;
CA_Q = CA_CHI*(CA_INVEST/CA_K(-1)-(CA_DELTA_SS+GREAL_SS-1))+1 ;
CA_WK(1) = CA_WK*(1+CA_RSR+CA_K/CA_K(-1)-1+CA_DELTA+RES_CA_WK)-(CA_BETA*CA_GDP*CA_PGNP-CA_TAXK)/CA_P+(CA_CHI/2*((CA_Q-1)/CA_CHI)^2+CA_INVEST/CA_K(-1)*(CA_Q-1))*CA_K(-1)*CA_PGNP/CA_P ;
CA_INVEST = ( CA_K-(CA_K(-1)))+CA_DELTA*CA_K(-1) ;
( log(CA_XM)-(log(CA_XM(-1)))) = CA_XM0+( log(CA_FACT)-(log(CA_FACT(-1))))+CA_XM1*( CA_RCI-(CA_RCI(-1)))+CA_XM2*(CA_XM3*CA_RCI(-1)+log(CA_FACT(-1))-log(CA_XM(-1)))+RES_CA_XM ;
CA_XMA = CA_XM+T07*(WTRADER-TRDER*GREAL^TME)/CA_E96 ;
CA_XT = CA_XMA+CA_XOIL ;
CA_ACT = CA_C_MPROP*CA_C+CA_INVEST_MPROP*CA_INVEST+CA_G_MPROP*CA_G+CA_XT_MPROP*CA_XT ;
( log(CA_IM)-(log(CA_IM(-1)))) = CA_IM0+( log(CA_ACT)-(log(CA_ACT(-1))))+CA_IM1*( log(CA_PIMA/CA_PGNPNO)-(log(CA_PIMA(-1)/CA_PGNPNO(-1))))+CA_IM2*(CA_IM3*log(CA_PIMA(-1)/CA_PGNPNO(-1))+log(CA_ACT(-1))-log(CA_IM(-1)))+RES_CA_IM ;
CA_IOIL = CA_COIL+CA_XOIL-CA_PRODOIL+RES_CA_IOIL*GREAL^TME ;
( log(CA_ICOM)-(log(CA_ICOM(-1)))) = CA_IC0+CA_IC2*( log(PCOM/CA_ER/CA_PGNP)-(log(PCOM(-1)/CA_ER(-1)/CA_PGNP(-1))))+CA_IC1*( log(CA_GDP)-(log(CA_GDP(-1))))+CA_IC3*log(PCOM(-1)/CA_ER(-1)/CA_PGNP(-1))+CA_IC4*log(CA_GDP(-1))+CA_IC5*log(CA_ICOM(-1))+RES_CA_ICOM-(CA_IC4+CA_IC5)*log(GREAL^TME) ;
CA_IT = CA_IM+CA_IOIL+CA_ICOM ;
CA_A = CA_C+CA_INVEST+CA_G ;
CA_GDP = CA_A+CA_XT-CA_IT ;
CA_GNP = CA_GDP+(US_R+(CA_PREM(-3)+CA_PREM(-2)+CA_PREM(-1))/3)*CA_NFA(-1)/CA_ER/CA_PGNP+RES_CA_GNP*GREAL^TME ;
CA_W = CA_WH+CA_WK+(CA_M+CA_B+CA_NFA/CA_ER)/CA_P ;
CA_YD = (CA_GDP*CA_PGNP-CA_TAX)/CA_P-CA_DELTA*CA_K(-1) ;
CA_GE = CA_P*CA_G+CA_R*CA_B(-1)+CA_GEXOG ;
CA_TAX = CA_TRATE*CA_PGNP*CA_GNP ;
CA_TAXK = CA_TAXK_ALPHA*CA_TAXK_SHAR*CA_TAX+(1-CA_TAXK_ALPHA)*CA_TRATEK*CA_BETA*CA_GDP*CA_PGNP ;
CA_TAXH = CA_TAX-CA_TAXK ;
CA_TRATE = CA_TRATE_EXOG*(1-CA_TRATE_ALPHA)+CA_TRATE_ALPHA*((CA_TRATE(-2)/5+CA_TRATE(-1)/5+CA_TRATE(0)/5+CA_TRATE(1)/5+CA_TRATE(2)/5)+TAU1*(CA_B(1)/(CA_GNP(1)*CA_PGNP(1))-CA_BT_GDP_RAT(1))+RES_CA_TRATE) ;
CA_BT = CA_BT_GDP_RAT*CA_GNP*CA_PGNP ;
( CA_B-(CA_B(-1)))+( CA_M-(CA_M(-1))) = CA_R*CA_B(-1)+CA_P*CA_G-CA_TAX ;
CA_GDEF = ( CA_B+CA_M-(CA_B(-1)+CA_M(-1))) ;
log(CA_M/CA_P) = CA_M0+(1-CA_M4)*log(CA_A)+CA_M2*CA_RS+CA_M4*log(CA_M(-1)/CA_P(-1))+RES_CA_M ;
CA_RS = (1-CA_X_RS1)*CA_RS_EXOG+CA_X_RS1*(CA_RS(-1)+CA_RS1*log(CA_MT/CA_M)/CA_M2+CA_RS2*log(GR_ER/CA_ER/CA_PAR)+CA_RS3*log(US_ER/CA_ER/CA_PARUS)+CA_RS4*log(CA_NEER/CA_NEER_PAR)+CA_RS5*(CA_UNR_FE-CA_UNR-CA_UNR_GAP_EXOG)+CA_RS6*100*(log(CA_GDP)-log(CA_GDP_FE)-CA_GDP_GAP_EXOG)+CA_X_RS2*(-CA_RS(-1)+CA_RSCON+100*( log(CA_P(1))-(log(CA_P))))+100*(CA_RTARC1*(( log(CA_P)-(log(CA_P(-1))))-( log(CA_P_TAR)-(log(CA_P_TAR(-1))))-CA_P_GAP_EXOG)+CA_RTARC2*(( log(CA_PGNP)-(log(CA_PGNP(-1))))-( log(CA_PGNP_TAR)-(log(CA_PGNP_TAR(-1))))-CA_PGNP_GAP_EXOG)+CA_RTARC3*(( log(CA_CPI)-(log(CA_CPI(-1))))-( log(CA_CPI_TAR)-(log(CA_CPI_TAR(-1))))-CA_CPI_GAP_EXOG)+CA_RTARC4*(( log(CA_PGNPNO)-(log(CA_PGNPNO(-1))))-( log(CA_PGNPNO_TAR)-(log(CA_PGNPNO_TAR(-1))))-CA_PGNPNO_GAP_EXOG)+CA_RTARF1*(( log(CA_P(1))-(log(CA_P)))-( log(CA_P_TAR(1))-(log(CA_P_TAR)))-CA_P_GAP_EXOG(1))+CA_RTARF2*(( log(CA_PGNP(1))-(log(CA_PGNP)))-( log(CA_PGNP_TAR(1))-(log(CA_PGNP_TAR)))-CA_PGNP_GAP_EXOG(1))+CA_RTARF3*(( log(CA_CPI(1))-(log(CA_CPI)))-( log(CA_CPI_TAR(1))-(log(CA_CPI_TAR)))-CA_CPI_GAP_EXOG(1))+CA_RTARF4*(( log(CA_PGNPNO(1))-(log(CA_PGNPNO)))-( log(CA_PGNPNO_TAR(1))-(log(CA_PGNPNO_TAR)))-CA_PGNPNO_GAP_EXOG(1)))+CA_RSCON2+RES_CA_RS)+CA_RS1PERM*0 ;
CA_RL/100 = ((1+CA_RS/100)*(1+CA_RS(1)/100)*(1+CA_RS(2)/100)*(1+CA_RS(3)/100)*(1+CA_RS(4)/100)*(1+CA_RS(5)/100)*(1+CA_RS(6)/100)*(1+CA_RS(7)/100)*(1+CA_RS(8)/100)*(1+CA_RS(9)/100))^0.1*(1+CA_TPREM)-1+RES_CA_RL ;
CA_R = 0.5*CA_RS(-1)/100+0.5*(CA_RL(-3)/100+CA_RL(-2)/100+CA_RL(-1)/100)/3 ;
CA_RLR = (1+CA_RL/100)/(CA_P(10)/CA_P)^0.1-1 ;
CA_RSR = (1+CA_RS/100)/(CA_P(1)/CA_P)-1 ;
CA_PGNPNO = (CA_GDP*CA_PGNP-CA_PRODOIL*POIL/CA_ER*CA_E96)/(CA_GDP-CA_PRODOIL) ;
CA_PGNP = (CA_P*CA_A+CA_XT*CA_PXT-CA_IT*CA_PIT)/CA_GDP+RES_CA_P*CA_PGNP ;
( log(CA_PXM)-(log(CA_PXM(-1)))) = CA_PXM0+CA_PXM1*( log(CA_PGNPNO)-(log(CA_PGNPNO(-1))))+(1-CA_PXM1)*( log(CA_PFM)-(log(CA_PFM(-1))))+CA_PXM2*log(CA_PGNPNO(-1)/CA_PXM(-1))+RES_CA_PXM ;
CA_PXT = (CA_XMA*CA_PXM+POIL/CA_ER*CA_E96*CA_XOIL)/CA_XT ;
CA_PIM = (S0107*US_PXM+S0207*JA_PXM*JA_ER/JA_E96+S0307*GR_PXM*GR_ER/GR_E96+S0407*FR_PXM*FR_ER/FR_E96+S0507*IT_PXM*IT_ER/IT_E96+S0607*UK_PXM*UK_ER/UK_E96+S0707*CA_PXM*CA_ER/CA_E96+S0807*SI_PXM*SI_ER/SI_E96+S0907*RW_PXM*RW_ER/RW_E96)/(CA_ER/CA_E96)*(1+RES_CA_PIM) ;
CA_PIMA = CA_PIM+T07*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/CA_ER/CA_IM ;
CA_PIT = (CA_IM*CA_PIMA+CA_IOIL*POIL/CA_ER*CA_E96+CA_ICOM*PCOM/CA_ER*CA_E96)/CA_IT ;
//log(CA_TFP_FE) = RES_CA_TFP_FE ;
CA_TFP_FE = exp(RES_CA_TFP_FE) ;
CA_GDP_FE = CA_TFP_FE*CA_K^CA_BETA*((1-CA_UNR_FE/100)*CA_LF)^(1-CA_BETA) ;
CA_LF = CA_POP*CA_PART/(1+CA_DEM3) ;
CA_CU = 100*CA_GDP/CA_GDP_FE ;
( CA_NFA-(CA_NFA(-1))) = (CA_XT*CA_PXT-CA_IT*CA_PIT)*CA_ER+(US_R+(CA_PREM(-3)+CA_PREM(-2)+CA_PREM(-1))/3)*CA_NFA(-1)+RES_CA_NFA*US_INFL^TME*GREAL^TME ;
CA_TB = CA_XT*CA_PXT-CA_IT*CA_PIT ;
CA_CURBAL = ( CA_NFA-(CA_NFA(-1))) ;
1+US_RS/100 = (1+CA_RS/100)*CA_ER(1)/CA_ER-CA_PREM+RES_CA_ER ;
CA_RCI = log(CA_PXM)-log(CA_PFM) ;
CA_FACT = (US_IM*US_E96*S0701+JA_IM*JA_E96*S0702+GR_IM*GR_E96*S0703+FR_IM*FR_E96*S0704+IT_IM*IT_E96*S0705+UK_IM*UK_E96*S0706+CA_IM*CA_E96*S0707+SI_IM*SI_E96*S0708+(HO_IM+DC_IM)*RW_E96*S0709)/CA_E96 ;
log(CA_PFM) = W0701*log(US_PXM*US_ER/US_E96)+W0702*log(JA_PXM*JA_ER/JA_E96)+W0703*log(GR_PXM*GR_ER/GR_E96)+W0704*log(FR_PXM*FR_ER/FR_E96)+W0705*log(IT_PXM*IT_ER/IT_E96)+W0706*log(UK_PXM*UK_ER/UK_E96)+W0707*log(CA_ER/CA_E96)+W0708*log(SI_PXM*SI_ER/SI_E96)+W0709*log(RW_PXM*RW_ER/RW_E96) ;
CA_NEER = exp(-V0701*log(US_ER/US_E96)-V0702*log(JA_ER/JA_E96)-V0703*log(GR_ER/GR_E96)-V0704*log(FR_ER/FR_E96)-V0705*log(IT_ER/IT_E96)-V0706*log(UK_ER/UK_E96)+log(CA_ER/CA_E96)-V0708*log(SI_ER/SI_E96)) ;
( log(SI_CPI)-(log(SI_CPI(-1)))) = SI_CPI1*( log(SI_PIM)-(log(SI_PIM(-1))))+SI_CPI2*( log(SI_PGNP)-(log(SI_PGNP(-1))))+(1-SI_CPI1-SI_CPI2)*log(SI_CPI(-1)/SI_CPI(-2))+RES_SI_CPI ;
SI_UNR_A = SI_UNR_FE+SI_UNR_1*100*log(SI_GDP/SI_GDP_FE)+SI_UNR_2*(SI_UNR(-1)-SI_UNR_FE(-1))+RES_SI_UNR_A ;
SI_UNR = SI_UNR_A/*MAX(SI_UNR_A;0.1)*/ ;
( log(SI_PGNPNO)-(log(SI_PGNPNO(-1)))) = SI_LAMBDA*(SI_DELTA_PI*( log(SI_PGNPNO(1))-(log(SI_PGNPNO)))+(1-SI_DELTA_PI)*( log(SI_PGNPNO(-1))-(log(SI_PGNPNO(-2)))))+(1-SI_LAMBDA)*( log(SI_PGNPNO(-1))-(log(SI_PGNPNO(-2))))+SI_GAMMA/100*(SI_NLIN-SI_UNR)/(SI_UNR-SI_PHI)+RES_SI_PGNP ;
SI_INFL = SI_MGROW/GREAL ;
SI_DLLF = log(SI_LF/SI_LF(-1)) ;
SI_DLGDP = log(SI_GDP/SI_GDP(-1)) ;
SI_C = SI_C_DI+SI_C_PI ;
SI_MPC = 1/SI_MPCINV ;
SI_MPCINV(1) = SI_MPCINV-1-((1-SI_SIGMA)*(SI_RSR+SI_PROB)-(RES_SI_MPC+SI_PROB))*SI_MPCINV/SI_SIGMA ;
SI_WH1(1) = SI_WH1*(1+SI_RSR+SI_ALPHA1+RES_SI_WH1+SI_PROB+exp(SI_DLLF_SS)-1)-(((1-SI_BETA)*SI_GDP*SI_PGNP-SI_TAXH)/SI_P+RES_SI_WK*SI_WK) ;
SI_WH2(1) = SI_WH2*(1+SI_RSR+SI_ALPHA2+RES_SI_WH2+SI_PROB+exp(SI_DLLF_SS)-1)-(((1-SI_BETA)*SI_GDP*SI_PGNP-SI_TAXH)/SI_P+RES_SI_WK*SI_WK) ;
SI_WH3(1) = SI_WH3*(1+SI_RSR+SI_ALPHA3+RES_SI_WH3+SI_PROB+exp(SI_DLLF_SS)-1)-(((1-SI_BETA)*SI_GDP*SI_PGNP-SI_TAXH)/SI_P+RES_SI_WK*SI_WK) ;
SI_C_DI = (SI_LAMBDA1*SI_BCHI1+SI_LAMBDA2*SI_BCHI2+SI_LAMBDA3*(1-SI_BCHI1-SI_BCHI2))*((1-SI_BETA)*SI_GDP*SI_PGNP-SI_TAXH)/SI_P+RES_SI_C_DI*GREAL^TME ;
SI_C_PI = SI_MPC*(SI_WK+(SI_M+SI_B+SI_NFA/SI_ER)/SI_P+SI_BCHI1*(1-SI_LAMBDA1)*SI_WH1+SI_BCHI2*(1-SI_LAMBDA2)*SI_WH2+(1-SI_BCHI1-SI_BCHI2)*(1-SI_LAMBDA3)*SI_WH3) ;
SI_WH = SI_BCHI1*SI_WH1+SI_BCHI2*SI_WH2+(1-SI_BCHI1-SI_BCHI2)*SI_WH3 ;
( log(SI_COIL)-(log(SI_COIL(-1)))) = SI_COIL0+SI_COIL1*( log(SI_GDP)-(log(SI_GDP(-1))))+SI_COIL2*( log(POIL/SI_ER/SI_PGNP)-(log(POIL(-1)/SI_ER(-1)/SI_PGNP(-1))))+SI_COIL3*log(POIL(-1)/SI_ER(-1)/SI_PGNP(-1))+SI_COIL4*log(SI_GDP(-1)/SI_COIL(-1))+RES_SI_COIL ;
SI_INVEST/SI_K(-1)-(SI_DELTA_SS+GREAL_SS-1) = SI_K1*(SI_WK/SI_K(-1)-1)+SI_K2*(SI_WK(-1)/SI_K(-2)-1)+RES_SI_K ;
SI_MPK = SI_BETA*SI_GDP/SI_K ;
SI_Q = SI_CHI*(SI_INVEST/SI_K(-1)-(SI_DELTA_SS+GREAL_SS-1))+1 ;
SI_WK(1) = SI_WK*(1+SI_RSR+SI_K/SI_K(-1)-1+SI_DELTA+RES_SI_WK)-(SI_BETA*SI_GDP*SI_PGNP-SI_TAXK)/SI_P+(SI_CHI/2*((SI_Q-1)/SI_CHI)^2+SI_INVEST/SI_K(-1)*(SI_Q-1))*SI_K(-1)*SI_PGNP/SI_P ;
SI_INVEST = ( SI_K-(SI_K(-1)))+SI_DELTA*SI_K(-1) ;
( log(SI_XM)-(log(SI_XM(-1)))) = SI_XM0+( log(SI_FACT)-(log(SI_FACT(-1))))+SI_XM1*( SI_RCI-(SI_RCI(-1)))+SI_XM2*(SI_XM3*SI_RCI(-1)+log(SI_FACT(-1))-log(SI_XM(-1)))+RES_SI_XM ;
SI_XMA = SI_XM+T08*(WTRADER-TRDER*GREAL^TME)/SI_E96 ;
SI_XT = SI_XMA+SI_XOIL ;
SI_ACT = SI_C_MPROP*SI_C+SI_INVEST_MPROP*SI_INVEST+SI_G_MPROP*SI_G+SI_XT_MPROP*SI_XT ;
( log(SI_IM)-(log(SI_IM(-1)))) = SI_IM0+( log(SI_ACT)-(log(SI_ACT(-1))))+SI_IM1*( log(SI_PIMA/SI_PGNPNO)-(log(SI_PIMA(-1)/SI_PGNPNO(-1))))+SI_IM2*(SI_IM3*log(SI_PIMA(-1)/SI_PGNPNO(-1))+log(SI_ACT(-1))-log(SI_IM(-1)))+RES_SI_IM ;
SI_IOIL = SI_COIL+SI_XOIL-SI_PRODOIL+RES_SI_IOIL*GREAL^TME ;
( log(SI_ICOM)-(log(SI_ICOM(-1)))) = SI_IC0+SI_IC2*( log(PCOM/SI_ER/SI_PGNP)-(log(PCOM(-1)/SI_ER(-1)/SI_PGNP(-1))))+SI_IC1*( log(SI_GDP)-(log(SI_GDP(-1))))+SI_IC3*log(PCOM(-1)/SI_ER(-1)/SI_PGNP(-1))+SI_IC4*log(SI_GDP(-1))+SI_IC5*log(SI_ICOM(-1))+RES_SI_ICOM-(SI_IC4+SI_IC5)*log(GREAL^TME) ;
SI_IT = SI_IM+SI_IOIL+SI_ICOM ;
SI_A = SI_C+SI_INVEST+SI_G ;
SI_GDP = SI_A+SI_XT-SI_IT ;
SI_GNP = SI_GDP+(US_R+(SI_PREM(-3)+SI_PREM(-2)+SI_PREM(-1))/3)*SI_NFA(-1)/SI_ER/SI_PGNP+RES_SI_GNP*GREAL^TME ;
SI_W = SI_WH+SI_WK+(SI_M+SI_B+SI_NFA/SI_ER)/SI_P ;
SI_YD = (SI_GDP*SI_PGNP-SI_TAX)/SI_P-SI_DELTA*SI_K(-1) ;
SI_GE = SI_P*SI_G+SI_R*SI_B(-1)+SI_GEXOG ;
SI_TAX = SI_TRATE*SI_PGNP*SI_GNP ;
SI_TAXK = SI_TAXK_ALPHA*SI_TAXK_SHAR*SI_TAX+(1-SI_TAXK_ALPHA)*SI_TRATEK*SI_BETA*SI_GDP*SI_PGNP ;
SI_TAXH = SI_TAX-SI_TAXK ;
SI_TRATE = SI_TRATE_EXOG*(1-SI_TRATE_ALPHA)+SI_TRATE_ALPHA*((SI_TRATE(-2)/5+SI_TRATE(-1)/5+SI_TRATE(0)/5+SI_TRATE(1)/5+SI_TRATE(2)/5)+TAU1*(SI_B(1)/(SI_GNP(1)*SI_PGNP(1))-SI_BT_GDP_RAT(1))+RES_SI_TRATE) ;
SI_BT = SI_BT_GDP_RAT*SI_GNP*SI_PGNP ;
( SI_B-(SI_B(-1)))+( SI_M-(SI_M(-1))) = SI_R*SI_B(-1)+SI_P*SI_G-SI_TAX ;
SI_GDEF = ( SI_B+SI_M-(SI_B(-1)+SI_M(-1))) ;
log(SI_M/SI_P) = SI_M0+(1-SI_M4)*log(SI_A)+SI_M2*SI_RS+SI_M4*log(SI_M(-1)/SI_P(-1))+RES_SI_M ;
SI_RS = (1-SI_X_RS1)*SI_RS_EXOG+SI_X_RS1*(SI_RS(-1)+SI_RS1*log(SI_MT/SI_M)/SI_M2+SI_RS2*log(GR_ER/SI_ER/SI_PAR)+SI_RS3*log(US_ER/SI_ER/SI_PARUS)+SI_RS4*log(SI_NEER/SI_NEER_PAR)+SI_RS5*(SI_UNR_FE-SI_UNR-SI_UNR_GAP_EXOG)+SI_RS6*100*(log(SI_GDP)-log(SI_GDP_FE)-SI_GDP_GAP_EXOG)+SI_X_RS2*(-SI_RS(-1)+SI_RSCON+100*( log(SI_P(1))-(log(SI_P))))+100*(SI_RTARC1*(( log(SI_P)-(log(SI_P(-1))))-( log(SI_P_TAR)-(log(SI_P_TAR(-1))))-SI_P_GAP_EXOG)+SI_RTARC2*(( log(SI_PGNP)-(log(SI_PGNP(-1))))-( log(SI_PGNP_TAR)-(log(SI_PGNP_TAR(-1))))-SI_PGNP_GAP_EXOG)+SI_RTARC3*(( log(SI_CPI)-(log(SI_CPI(-1))))-( log(SI_CPI_TAR)-(log(SI_CPI_TAR(-1))))-SI_CPI_GAP_EXOG)+SI_RTARC4*(( log(SI_PGNPNO)-(log(SI_PGNPNO(-1))))-( log(SI_PGNPNO_TAR)-(log(SI_PGNPNO_TAR(-1))))-SI_PGNPNO_GAP_EXOG)+SI_RTARF1*(( log(SI_P(1))-(log(SI_P)))-( log(SI_P_TAR(1))-(log(SI_P_TAR)))-SI_P_GAP_EXOG(1))+SI_RTARF2*(( log(SI_PGNP(1))-(log(SI_PGNP)))-( log(SI_PGNP_TAR(1))-(log(SI_PGNP_TAR)))-SI_PGNP_GAP_EXOG(1))+SI_RTARF3*(( log(SI_CPI(1))-(log(SI_CPI)))-( log(SI_CPI_TAR(1))-(log(SI_CPI_TAR)))-SI_CPI_GAP_EXOG(1))+SI_RTARF4*(( log(SI_PGNPNO(1))-(log(SI_PGNPNO)))-( log(SI_PGNPNO_TAR(1))-(log(SI_PGNPNO_TAR)))-SI_PGNPNO_GAP_EXOG(1)))+SI_RSCON2+RES_SI_RS)+SI_RS1PERM*0 ;
SI_RL/100 = ((1+SI_RS/100)*(1+SI_RS(1)/100)*(1+SI_RS(2)/100)*(1+SI_RS(3)/100)*(1+SI_RS(4)/100)*(1+SI_RS(5)/100)*(1+SI_RS(6)/100)*(1+SI_RS(7)/100)*(1+SI_RS(8)/100)*(1+SI_RS(9)/100))^0.1*(1+SI_TPREM)-1+RES_SI_RL ;
SI_R = 0.5*SI_RS(-1)/100+0.5*(SI_RL(-3)/100+SI_RL(-2)/100+SI_RL(-1)/100)/3 ;
SI_RLR = (1+SI_RL/100)/(SI_P(10)/SI_P)^0.1-1 ;
SI_RSR = (1+SI_RS/100)/(SI_P(1)/SI_P)-1 ;
SI_PGNPNO = (SI_GDP*SI_PGNP-SI_PRODOIL*POIL/SI_ER*SI_E96)/(SI_GDP-SI_PRODOIL) ;
SI_PGNP = (SI_P*SI_A+SI_XT*SI_PXT-SI_IT*SI_PIT)/SI_GDP+RES_SI_P*SI_PGNP ;
( log(SI_PXM)-(log(SI_PXM(-1)))) = SI_PXM0+SI_PXM1*( log(SI_PGNPNO)-(log(SI_PGNPNO(-1))))+(1-SI_PXM1)*( log(SI_PFM)-(log(SI_PFM(-1))))+SI_PXM2*log(SI_PGNPNO(-1)/SI_PXM(-1))+RES_SI_PXM ;
SI_PXT = (SI_XMA*SI_PXM+POIL/SI_ER*SI_E96*SI_XOIL)/SI_XT ;
SI_PIM = (S0108*US_PXM+S0208*JA_PXM*JA_ER/JA_E96+S0308*GR_PXM*GR_ER/GR_E96+S0408*FR_PXM*FR_ER/FR_E96+S0508*IT_PXM*IT_ER/IT_E96+S0608*UK_PXM*UK_ER/UK_E96+S0708*CA_PXM*CA_ER/CA_E96+S0808*SI_PXM*SI_ER/SI_E96+S0908*RW_PXM*RW_ER/RW_E96)/(SI_ER/SI_E96)*(1+RES_SI_PIM) ;
SI_PIMA = SI_PIM+T08*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/SI_ER/SI_IM ;
SI_PIT = (SI_IM*SI_PIMA+SI_IOIL*POIL/SI_ER*SI_E96+SI_ICOM*PCOM/SI_ER*SI_E96)/SI_IT ;
//log(SI_TFP_FE) = RES_SI_TFP_FE ;
SI_TFP_FE = exp(RES_SI_TFP_FE);
SI_GDP_FE = SI_TFP_FE*SI_K^SI_BETA*((1-SI_UNR_FE/100)*SI_LF)^(1-SI_BETA) ;
SI_LF = SI_POP*SI_PART/(1+SI_DEM3) ;
SI_CU = 100*SI_GDP/SI_GDP_FE ;
( SI_NFA-(SI_NFA(-1))) = (SI_XT*SI_PXT-SI_IT*SI_PIT)*SI_ER+(US_R+(SI_PREM(-3)+SI_PREM(-2)+SI_PREM(-1))/3)*SI_NFA(-1)+RES_SI_NFA*US_INFL^TME*GREAL^TME ;
SI_TB = SI_XT*SI_PXT-SI_IT*SI_PIT ;
SI_CURBAL = ( SI_NFA-(SI_NFA(-1))) ;
1+US_RS/100 = (1+SI_RS/100)*SI_ER(1)/SI_ER-SI_PREM+RES_SI_ER ;
SI_RCI = log(SI_PXM)-log(SI_PFM) ;
SI_FACT = (US_IM*US_E96*S0801+JA_IM*JA_E96*S0802+GR_IM*GR_E96*S0803+FR_IM*FR_E96*S0804+IT_IM*IT_E96*S0805+UK_IM*UK_E96*S0806+CA_IM*CA_E96*S0807+SI_IM*SI_E96*S0808+(HO_IM+DC_IM)*RW_E96*S0809)/SI_E96 ;
log(SI_PFM) = W0801*log(US_PXM*US_ER/US_E96)+W0802*log(JA_PXM*JA_ER/JA_E96)+W0803*log(GR_PXM*GR_ER/GR_E96)+W0804*log(FR_PXM*FR_ER/FR_E96)+W0805*log(IT_PXM*IT_ER/IT_E96)+W0806*log(UK_PXM*UK_ER/UK_E96)+W0807*log(CA_PXM*CA_ER/CA_E96)+W0808*log(SI_ER/SI_E96)+W0809*log(RW_PXM*RW_ER/RW_E96) ;
SI_NEER = exp(-V0801*log(US_ER/US_E96)-V0802*log(JA_ER/JA_E96)-V0803*log(GR_ER/GR_E96)-V0804*log(FR_ER/FR_E96)-V0805*log(IT_ER/IT_E96)-V0806*log(UK_ER/UK_E96)-V0807*log(CA_ER/CA_E96)+log(SI_ER/SI_E96)) ;
( log(DC_CTOT)-(log(DC_CTOT(-1)))) = DC_C0+DC_C1*( log(DC_GDP+DC_NFA(-1)*US_R/RW_ER/DC_P-DC_DELTA*DC_K(-1)+(DC_DEBT-DC_DEBT(-1))/DC_P/RW_ER)-(log(DC_GDP(-1)+DC_NFA(-2)*US_R(-1)/RW_ER(-1)/DC_P(-1)-DC_DELTA(-1)*DC_K(-2)+(DC_DEBT(-1)-DC_DEBT(-2))/DC_P(-1)/RW_ER(-1))))+DC_C2*log((DC_GDP(-1)+DC_NFA(-2)*US_R(-1)/RW_ER(-1)/DC_P(-1)-DC_DELTA(-1)*DC_K(-2)+( DC_DEBT(-1)-(DC_DEBT(-2)))/DC_P(-1)/RW_ER(-1))/DC_CTOT(-1))+RES_DC_CTOT ;
DC_INVEST = DC_GDP-(DC_XM+DC_XCOM+DC_XOIL)-DC_CTOT+DC_IT ;
DC_INVESTC = PCOM/RW_ER/DC_PXM*DC_KCOMSHR*DC_INVEST ;
DC_KC = DC_KC(-1)*(1-DC_DELTA)+DC_INVESTC ;
DC_K = DC_KC+DC_KM ;
DC_INVESTM = DC_INVEST-DC_INVESTC ;
DC_KM = DC_KM(-1)*(1-DC_DELTA)+DC_INVESTM ;
DC_XM = RW_XM-HO_XM ;
DC_XMA = RW_XMA-HO_XM ;
DC_XCOM = RW_XCOM+HO_ICOM ;
DC_XOIL = DC_XOILSHR*(RW_XOIL-DC_IOIL)+RES_DC_XOIL*GREAL^TME ;
DC_XT = DC_XCOM+DC_XOIL+DC_XMA ;
DC_IOIL = DC_OILSHR*DC_IT ;
DC_IT = DC_IM+DC_IOIL ;
DC_A = DC_CTOT+DC_INVEST ;
DC_GDP = DC_XM+DC_XCOM+DC_XOIL+DC_QNT ;
log(DC_QNT) = log(DC_GDP_FE)+RES_DC_QNT ;
DC_NNPCAP = DC_GDP_FE-DC_DELTA*DC_K(-1) ;
DC_P = (DC_PXM*DC_QNT+DC_PIT*DC_IT)/(DC_CTOT+DC_INVEST) ;
DC_PGNP = (DC_PXM*(DC_QNT+DC_XMA)+PCOM/RW_ER*DC_XCOM+POIL/RW_ER*DC_XOIL)/DC_GDP+RES_DC_PGNP*DC_PGNP ;
( RW_RCI-(RW_RCI(-1))) = RW_PXM1*RW_RCI(-1)+RW_PXM2*log(DC_XSM/DC_XM)+RES_DC_PXM ;
log(RW_PFM) = W0901*log(US_PXM*US_ER/US_E96)+W0902*log(JA_PXM*JA_ER/JA_E96)+W0903*log(GR_PXM*GR_ER/GR_E96)+W0904*log(FR_PXM*FR_ER/FR_E96)+W0905*log(IT_PXM*IT_ER/IT_E96)+W0906*log(UK_PXM*UK_ER/UK_E96)+W0907*log(CA_PXM*CA_ER/CA_E96)+W0908*log(SI_PXM*SI_ER/SI_E96)+W0909*log(RW_ER/RW_E96) ;
log(DC_XCOM) = RW_XCOM1*log(DC_KC(-1))+(1-RW_XCOM1)*log(1+DC_PROD)*TME+RES_PCOM ;
DC_PXT = (DC_PXM*DC_XMA+PCOM/RW_ER*DC_XCOM+POIL/RW_ER*DC_XOIL)/DC_XT ;
DC_PIM = RW_PIM+RES_DC_PIM*DC_INFL^TME ;
DC_PIMA = RW_PIMA+RES_DC_PIMA*DC_INFL^TME ;
DC_PIT = (DC_PIMA*DC_IM+POIL/RW_ER*DC_IOIL)/DC_IT ;
log(DC_XSM) = RW_XSM1*log(DC_KM(-1))+(1-RW_XSM1)*log(1+DC_PROD)*TME+RES_DC_XSM ;
DC_GDP_FE = exp(RES_DC_GDP_FE+DC_GDP_FE0+log(1+DC_PROD)*TME*(1-DC_BETA)+log(DC_K(-1))*DC_BETA) ;
( DC_DEBT-(DC_DEBT(-1))) = ((DC_XT(4)*DC_PXT(4)*RW_ER(4)/(DC_XT(-1)*DC_PXT(-1)*RW_ER(-1)))^(1/5)-1)*DC_XT(-1)*DC_PXT(-1)*RW_ER(-1)*DC_DEBT1+DC_DEBT2*(ISR*DC_PXT(-1)*DC_XT(-1)*RW_ER(-1)/US_RRBAR(-1)-DC_DEBT(-1))+DC_DEBT2/10*(ISR*DC_XTNDHIST(-1)/US_RR(-1)-DC_DEBT(-1))+RES_DC_DEBT*US_INFL^TME*GREAL^TME ;
DC_NFA = DC_NFA(-1)-( DC_DEBT-(DC_DEBT(-1)))+RES_DC_NFA*DC_PIT*RW_ER*GREAL^TME ;
( DC_NFA-(DC_NFA(-1)))/RW_ER = DC_PXM*DC_XMA+PCOM/RW_ER*DC_XCOM+POIL/RW_ER*DC_XOIL-DC_PIT*DC_IT+US_R*DC_NFA(-1)/RW_ER+RES_DC_IT*DC_PIT*GREAL^TME ;
HO_XOIL = RW_XOIL-DC_XOIL ;
HO_XT = HO_XOIL+HO_XM ;
log(HO_ICOM) = HO_IC2*log(PCOM/RW_ER/RW_PXM)+log(HO_GDP)+RES_HO_ICOM ;
HO_IM = HO_IT-HO_IOIL-HO_ICOM ;
HO_IT = HO_A+HO_XT-HO_GDP ;
HO_GDP = HO_XT+HO_QNT ;
( log(HO_A)-(log(HO_A(-1)))) = HO_A0+HO_A1*log((HO_QNT+HO_XT*HO_PXT/DC_PGNP+0.035*HO_NFA/RW_ER/DC_PGNP)/HO_A(-1))+RES_HO_IM ;
HO_PXT = (RW_PXM*HO_XM+POIL/RW_ER*HO_XOIL)/HO_XT*(1+RES_HO_PXT) ;
HO_PIT = (RW_PIMA*HO_IM+POIL/RW_ER*HO_IOIL+PCOM/RW_ER*HO_ICOM)/HO_IT*(1+RES_HO_PIT) ;
0 = HO_NFA+JA_NFA+CA_NFA+US_NFA+UK_NFA+IT_NFA+FR_NFA+GR_NFA+SI_NFA+DC_NFA ;
( log(RW_XM)-(log(RW_XM(-1)))) = RW_XM0+( log(RW_FACT)-(log(RW_FACT(-1))))+RW_XM1*( RW_RCI-(RW_RCI(-1)))+RW_XM2*(RW_XM3*RW_RCI(-1)+log(RW_FACT(-1))-log(RW_XM(-1)))+RES_RW_XM ;
RW_XMA = RW_XM+T09*(WTRADER-TRDER*GREAL^TME)/RW_E96 ;
RW_XCOM = US_ICOM+JA_ICOM*JA_E96+GR_ICOM*GR_E96+CA_ICOM*CA_E96+FR_ICOM*FR_E96+IT_ICOM*IT_E96+UK_ICOM*UK_E96+SI_ICOM*SI_E96 ;
RW_XOIL = -(US_XOIL-US_IOIL+(JA_XOIL-JA_IOIL)*JA_E96+(GR_XOIL-GR_IOIL)*GR_E96+(FR_XOIL-FR_IOIL)*FR_E96+(IT_XOIL-IT_IOIL)*IT_E96+(UK_XOIL-UK_IOIL)*UK_E96+(CA_XOIL-CA_IOIL)*CA_E96+(SI_XOIL-SI_IOIL)*SI_E96)/RW_E96+DC_IOIL+HO_IOIL ;
RW_IM = DC_IM+HO_IM ;
RW_PXM = DC_PXM+RES_RW_PXM*RW_INFL^TME ;
RW_PIM = (S0109*US_PXM+S0209*JA_PXM*JA_ER/JA_E96+S0309*GR_PXM*GR_ER/GR_E96+S0409*FR_PXM*FR_ER/FR_E96+S0509*IT_PXM*IT_ER/IT_E96+S0609*UK_PXM*UK_ER/UK_E96+S0709*CA_PXM*CA_ER/CA_E96+S0809*SI_PXM*SI_ER/SI_E96+S0909*RW_PXM*RW_ER/RW_E96)/(RW_ER/RW_E96)*(1+RES_RW_PIM) ;
RW_RCI = log(RW_PXM)-log(RW_PFM) ;
RW_NEER = exp(-(W0902*log(JA_ER/JA_E96)+W0903*log(GR_ER/GR_E96)+W0904*log(FR_ER/FR_E96)+W0905*log(IT_ER/IT_E96)+W0906*log(UK_ER/UK_E96)+W0907*log(CA_ER/CA_E96)+W0908*log(SI_ER/SI_E96)+W0909*log(RW_ER/RW_E96))) ;
RW_FACT = (US_IM*US_E96*S0901+JA_IM*JA_E96*S0902+GR_IM*GR_E96*S0903+FR_IM*FR_E96*S0904+IT_IM*IT_E96*S0905+UK_IM*UK_E96*S0906+CA_IM*CA_E96*S0907+SI_IM*SI_E96*S0908+(HO_IM+DC_IM)*RW_E96*S0909)/RW_E96 ;
RW_PIMA = RW_PIM+T09*(WTRADE-TRDE*GREAL^TME*US_INFL^TME)/RW_ER/RW_IM ;
WTRADE-TRDE*GREAL^TME*US_INFL^TME = US_XMA*US_PXM-US_IM*US_PIM+(JA_XMA*JA_PXM-JA_IM*JA_PIM)*JA_ER+(GR_XMA*GR_PXM-GR_IM*GR_PIM)*GR_ER+(FR_XMA*FR_PXM-FR_IM*FR_PIM)*FR_ER+(IT_XMA*IT_PXM-IT_IM*IT_PIM)*IT_ER+(UK_XMA*UK_PXM-UK_IM*UK_PIM)*UK_ER+(CA_XMA*CA_PXM-CA_IM*CA_PIM)*CA_ER+(SI_XMA*SI_PXM-SI_IM*SI_PIM)*SI_ER+(RW_XMA*RW_PXM-RW_IM*RW_PIM)*RW_ER+RES_WTRADE*GREAL^TME*US_INFL^TME ;
WTRADER-TRDER*GREAL^TME = US_IM-US_XM+(JA_IM-JA_XM)*JA_E96+(GR_IM-GR_XM)*GR_E96+(FR_IM-FR_XM)*FR_E96+(IT_IM-IT_XM)*IT_E96+(UK_IM-UK_XM)*UK_E96+(CA_IM-CA_XM)*CA_E96+(SI_IM-SI_XM)*SI_E96+(RW_IM-RW_XM)*RW_E96+RES_WTRADER*GREAL^TME ;
POIL = RPOIL*US_PGNP^US_WT*(JA_PGNP*JA_ER/JA_E96)^JA_WT*(GR_PGNP*GR_ER/GR_E96)^GR_WT*(FR_PGNP*FR_ER/FR_E96)^FR_WT*(IT_PGNP*IT_ER/IT_E96)^IT_WT*(UK_PGNP*UK_ER/UK_E96)^UK_WT*(SI_PGNP*SI_ER/SI_E96)^SI_WT*(CA_PGNP*CA_ER/CA_E96)^CA_WT ;
end;
initval;
CA_A=1258.37060606;
CA_ACT=349.585896649;
CA_ALPHA1=0.078;
CA_ALPHA2=0.121;
CA_ALPHA3=0.0911709766895;
CA_B=809.80955381;
CA_BCHI1=21.2121212121;
CA_BCHI2=5.91549295775;
CA_BETA=0.33;
CA_BT=809.80955381;
CA_BT_GDP_RAT=0.419976226386;
CA_C=905.688246476;
CA_COIL=24.7443625907;
CA_CPI=1.57958629296;
CA_CPI_GAP_EXOG=0;
CA_CPI_TAR=1.57958629296;
CA_CU=100;
CA_CURBAL=-18.4203759425;
CA_C_DI=693.928200938;
CA_C_PI=211.760045538;
CA_DELTA=0.025734401231;
CA_DELTA_SS=0.025734401231;
CA_DEM3=0.50966182372;
CA_DLGDP=0.0217614806134;
CA_DLLF=0.00144378024362;
CA_DLLF_SS=0;
CA_ER=0.74786657095;
CA_FACT=575.428338476;
CA_G=236.225701292;
CA_GDEF=42.179502634;
CA_GDP=1267.73017149;
CA_GDP_FE=1267.73017149;
CA_GDP_GAP_EXOG=8.881784197e-016;
CA_GE=423.620066068;
CA_GEXOG=0;
CA_GNP=1247.17158457;
CA_ICOM=7.85769143591;
CA_IM=511.06232766;
CA_INFL=1.0270000062;
CA_INVEST=116.456658295;
CA_IOIL=10.1521707873;
CA_IT=529.072189883;
CA_K=2493.27232399;
CA_LAMBDA=1;
CA_LAMBDA1=0.998452603746;
CA_LAMBDA2=0.999906905629;
CA_LAMBDA3=0.999345807356;
CA_LF=17618.8512388;
CA_M=82.8661220161;
CA_MGROW=1.04959399462;
CA_MPC=0.0754183988398;
CA_MPCINV=13.2593639667;
CA_MPK=0.167791922513;
CA_MT=82.8661220161;
CA_NEER=1.03344502186;
CA_NEER_PAR=1.03344502186;
CA_NFA=-389.843893754;
CA_NLIN=8.61938667297;
CA_P=1.54744635591;
CA_PAR=0.741890628438;
CA_PART=0.802174651456;
CA_PARUS=1.33713691565;
CA_PFM=1.35746485675;
CA_PGNP=1.54608006964;
CA_PGNPNO=1.55124422251;
CA_PGNPNO_GAP_EXOG=0;
CA_PGNPNO_TAR=1.55124422251;
CA_PGNP_GAP_EXOG=0;
CA_PGNP_TAR=1.54608006964;
CA_PHI=4.61938697849;
CA_PIM=1.36171164077;
CA_PIMA=1.36171164077;
CA_PIT=1.36238623326;
CA_POP=33158;
CA_PREM=0;
CA_PROB=0.021;
CA_PRODOIL=31.8549893389;
CA_PXM=1.36287943551;
CA_PXT=1.36238623326;
CA_P_GAP_EXOG=0;
CA_P_TAR=1.54744635591;
CA_Q=1.00001954084;
CA_R=0.0752690064927;
CA_RCI=0.00398080928473;
CA_RL=8.04040065237;
CA_RLR=0.052;
CA_RS=7.01340064617;
CA_RSCON=4.34920694771;
CA_RSCON2=0;
CA_RSR=0.042;
CA_RS_EXOG=7.01340064617;
CA_SIGMA=2.46201848984;
CA_TAX=381.440563434;
CA_TAXH=255.565177501;
CA_TAXK=125.875385933;
CA_TAXK_ALPHA=0;
CA_TAXK_SHAR=0.33;
CA_TB=12.7513430893;
CA_TFP_FE=0.145718808234;
CA_TPREM=0.00959692898273;
CA_TRATE=0.19781931155;
CA_TRATEK=0.194611305933;
CA_TRATE_ALPHA=1;
CA_TRATE_EXOG=0.19781931155;
CA_UNR=8.61938697848;
CA_UNR_A=8.61938697848;
CA_UNR_FE=8.61938697849;
CA_UNR_GAP_EXOG=0;
CA_W=17287.6390819;
CA_WH=14607.985195;
CA_WH1=7183.72844482;
CA_WH2=5276.9364611;
CA_WH3=6467.8624197;
CA_WK=2439.64491168;
CA_XM=522.949752064;
CA_XMA=522.949752064;
CA_XOIL=15.4820032481;
CA_XT=538.431755312;
CA_X_RS1=1;
CA_X_RS2=0;
CA_YD=957.332488133;
DC_A=11536.0772211;
DC_BETA=0.393728;
DC_CTOT=8912.56873925;
DC_DEBT=4375.0594787;
DC_DELTA=0.09;
DC_GDP=11588.0236257;
DC_GDP_FE=11589.3955919;
DC_IM=2196.74507138;
DC_INFL=1.0270000062;
DC_INVEST=2623.5084819;
DC_INVESTC=66.9128177073;
DC_INVESTM=2556.59566419;
DC_IOIL=723.068926272;
DC_IT=2919.81399765;
DC_K=23256.8531664;
DC_KC=615.953408725;
DC_KCOMSHR=0.0267156084709;
DC_KM=22640.8997576;
DC_NFA=-3138.05919175;
DC_NNPCAP=9548.73512857;
DC_OILSHR=0.247642119277;
DC_P=1.5121496198;
DC_PGNP=1.60264450124;
DC_PIM=1.50779607912;
DC_PIMA=1.50779607912;
DC_PIT=1.47422355167;
DC_PROD=0.0219999885862;
DC_PXM=1.52500171841;
DC_PXT=1.47428483631;
DC_QNT=8616.26322349;
DC_XCOM=309.581102136;
DC_XM=1815.66020781;
DC_XMA=1815.66020781;
DC_XOIL=846.519092264;
DC_XOILSHR=0.909129264415;
DC_XSM=1815.66020781;
DC_XT=2971.76040221;
DC_XTNDHIST=4381.22129813;
FR_A=12428.3120854;
FR_ACT=2554.65167678;
FR_ALPHA1=0.078;
FR_ALPHA2=0.121;
FR_ALPHA3=0.0911709766895;
FR_B=8164.71454206;
FR_BCHI1=21.2121212121;
FR_BCHI2=5.91549295775;
FR_BETA=0.31;
FR_BT=8164.71454206;
FR_BT_GDP_RAT=0.42246434571;
FR_C=8559.94267961;
FR_COIL=115.462535562;
FR_CPI=1.55308652521;
FR_CPI_GAP_EXOG=0;
FR_CPI_TAR=1.55308652521;
FR_CU=100;
FR_CURBAL=25.8977049485;
FR_C_DI=5759.91516804;
FR_C_PI=2800.02751158;
FR_DELTA=0.0277164109602;
FR_DELTA_SS=0.0277164109602;
FR_DEM3=0.550387627392;
FR_DLGDP=0.0217614806135;
FR_DLLF=-0.00310730457315;
FR_DLLF_SS=0;
FR_ER=0.164628446102;
FR_FACT=3378.539512;
FR_G=2594.67863751;
FR_GDEF=421.959988213;
FR_GDP=12373.9712324;
FR_GDP_FE=12373.9712324;
FR_GDP_GAP_EXOG=0;
FR_GE=4594.93602206;
FR_GEXOG=0;
FR_GNP=12505.3276835;
FR_ICOM=87.5752466318;
FR_IM=3083.11857811;
FR_INFL=1.0270000062;
FR_INVEST=1273.69076828;
FR_IOIL=124.906863476;
FR_IT=3295.60068822;
FR_K=26180.57806;
FR_LAMBDA=0.752518355846;
FR_LAMBDA1=0.95979954587;
FR_LAMBDA2=0.990046224521;
FR_LAMBDA3=0.97378573951;
FR_LF=26401.37859;
FR_M=765.533425034;
FR_MGROW=1.04959399462;
FR_MPC=0.0537747019055;
FR_MPCINV=18.5961049446;
FR_MPK=0.146518196552;
FR_MT=765.533425034;
FR_NEER=0.944128414683;
FR_NEER_PAR=0.944128414683;
FR_NFA=548.092078464;
FR_NLIN=9.10357761383;
FR_P=1.54524876208;
FR_PAR=3.37022679523;
FR_PART=0.664648383729;
FR_PARUS=6.07428438813;
FR_PFM=1.58646640137;
FR_PGNP=1.5454532315;
FR_PGNPNO=1.54542290009;
FR_PGNPNO_GAP_EXOG=0;
FR_PGNPNO_TAR=1.54542290009;
FR_PGNP_GAP_EXOG=0;
FR_PGNP_TAR=1.5454532315;
FR_PHI=5.10357726511;
FR_PIM=1.48685752168;
FR_PIMA=1.48685752168;
FR_PIT=1.49868897023;
FR_POP=61585;
FR_PREM=0;
FR_PROB=0.021;
FR_PRODOIL=4.46861579712;
FR_PXM=1.49797486646;
FR_PXT=1.49868897023;
FR_P_GAP_EXOG=0;
FR_P_TAR=1.54524876208;
FR_Q=1.00005197187;
FR_R=0.0752690064927;
FR_RCI=-0.0573950470952;
FR_RL=8.04040065237;
FR_RLR=0.052;
FR_RS=7.01340064617;
FR_RSCON=4.34920694771;
FR_RSCON2=0;
FR_RSR=0.042;
FR_RS_EXOG=7.01340064617;
FR_SIGMA=2.46201848984;
FR_TAX=4172.97603385;
FR_TAXH=2879.35346336;
FR_TAXK=1293.62257049;
FR_TAXK_ALPHA=0;
FR_TAXK_SHAR=0.31;
FR_TB=-81.4400370019;
FR_TFP_FE=0.501898498749;
FR_TPREM=0.00959692898273;
FR_TRATE=0.215921031988;
FR_TRATEK=0.218213151465;
FR_TRATE_ALPHA=1;
FR_TRATE_EXOG=0.215921031988;
FR_UNR=9.1035772651;
FR_UNR_A=9.1035772651;
FR_UNR_FE=9.10357726511;
FR_UNR_GAP_EXOG=0;
FR_W=168360.064296;
FR_WH=134808.153404;
FR_WH1=66294.232454;
FR_WH2=48697.6164374;
FR_WH3=59687.9431099;
FR_WK=25618.2270584;
FR_XM=3223.65007818;
FR_XMA=3223.65007818;
FR_XOIL=17.6097570464;
FR_XT=3241.25983523;
FR_X_RS1=1;
FR_X_RS2=0;
FR_YD=8965.07961638;
GREAL=1.02199998859;
GREAL_SS=1.02199998859;
GR_A=5547.54704742;
GR_ACT=1244.30607441;
GR_ALPHA1=0.078;
GR_ALPHA2=0.121;
GR_ALPHA3=0.0911709766895;
GR_B=2836.64063958;
GR_BCHI1=21.2121212121;
GR_BCHI2=5.91549295775;
GR_BETA=0.31;
GR_BT=2836.64063958;
GR_BT_GDP_RAT=0.327321201968;
GR_C=3764.15898979;
GR_COIL=47.8884655943;
GR_CPI=1.57327094041;
GR_CPI_GAP_EXOG=0;
GR_CPI_TAR=1.57327094041;
GR_CU=100;
GR_CURBAL=32.7810545775;
GR_C_DI=2362.84340677;
GR_C_PI=1401.31558301;
GR_DELTA=0.027325658516;
GR_DELTA_SS=0.027325658516;
GR_DEM3=0.517911346568;
GR_DLGDP=0.0217614806135;
GR_DLLF=-0.00533289129889;
GR_DLLF_SS=0;
GR_ER=0.55483520031;
GR_FACT=1752.82324912;
GR_G=1147.43001864;
GR_GDEF=171.997485885;
GR_GDP=5527.29510412;
GR_GDP_FE=5527.29510412;
GR_GDP_GAP_EXOG=0;
GR_GE=1986.46344565;
GR_GEXOG=0;
GR_GNP=5576.35538713;
GR_ICOM=51.2036719786;
GR_IM=1545.57558691;
GR_INFL=1.0270000062;
GR_INVEST=635.958039002;
GR_IOIL=41.791347602;
GR_IT=1638.57060649;
GR_K=13176.1632314;
GR_LAMBDA=0.743550360203;
GR_LAMBDA1=0.946223644928;
GR_LAMBDA2=0.984891127527;
GR_LAMBDA3=0.963549035564;
GR_LF=35257.118086;
GR_M=803.468000031;
GR_MGROW=1.04959399462;
GR_MPC=0.0534792245595;
GR_MPCINV=18.6988500345;
GR_MPK=0.130042520891;
GR_MT=803.468000031;
GR_NEER=0.925708703761;
GR_NEER_PAR=0.925708703761;
GR_NFA=693.76944302;
GR_NLIN=8.52112674713;
GR_P=1.55394301397;
GR_PAR=1;
GR_PART=0.688368121295;
GR_PARUS=1.80233698122;
GR_PFM=1.61278488747;
GR_PGNP=1.554102787;
GR_PGNPNO=1.55407854318;
GR_PGNPNO_GAP_EXOG=0;
GR_PGNPNO_TAR=1.55407854318;
GR_PGNP_GAP_EXOG=0;
GR_PGNP_TAR=1.554102787;
GR_PHI=4.52112647046;
GR_PIM=1.49899942983;
GR_PIMA=1.49899942983;
GR_PIT=1.51033669586;
GR_POP=77745;
GR_PREM=0;
GR_PROB=0.021;
GR_PRODOIL=1.49721926483;
GR_PXM=1.5099118411;
GR_PXT=1.51033669586;
GR_P_GAP_EXOG=0;
GR_P_TAR=1.55394301397;
GR_Q=1.00002519661;
GR_R=0.0752690064927;
GR_RCI=-0.0659111627379;
GR_RL=8.04040065237;
GR_RLR=0.052;
GR_RS=7.01340064617;
GR_RSCON=4.34920694771;
GR_RSCON2=0;
GR_RSR=0.042;
GR_RS_EXOG=7.01340064617;
GR_SIGMA=2.46201848984;
GR_TAX=1814.46595976;
GR_TAXH=1251.98151224;
GR_TAXK=562.484447526;
GR_TAXK_ALPHA=0;
GR_TAXK_SHAR=0.31;
GR_TB=-30.5872531417;
GR_TFP_FE=0.22618636237;
GR_TPREM=0.00959692898273;
GR_TRATE=0.20937201935;
GR_TRATEK=0.211230405835;
GR_TRATE_ALPHA=1;
GR_TRATE_EXOG=0.20937201935;
GR_UNR=8.52112647046;
GR_UNR_A=8.52112647046;
GR_UNR_FE=8.52112647046;
GR_UNR_GAP_EXOG=0;
GR_W=75273.9837207;
GR_WH=59233.9926595;
GR_WH1=29129.3366121;
GR_WH2=21397.4762042;
GR_WH3=26226.5678653;
GR_WK=12892.8261271;
GR_XM=1613.17493703;
GR_XMA=1613.17493703;
GR_XOIL=5.14372615061;
GR_XT=1618.31866318;
GR_X_RS1=1;
GR_X_RS2=0;
GR_YD=4007.91448996;
HO_A=429.071306821;
HO_GDP=417.235790092;
HO_ICOM=9.8632080102;
HO_IM=183.858899853;
HO_IOIL=0.122354153306;
HO_IT=193.844462017;
HO_NFA=719.347820924;
HO_PIT=1.48676053562;
HO_PXT=1.48676053562;
HO_QNT=235.226844805;
HO_XM=97.3963213053;
HO_XOIL=84.6126239818;
HO_XT=182.008945287;
IT_A=2882.89903126;
IT_ACT=585.122270907;
IT_ALPHA1=0.078;
IT_ALPHA2=0.121;
IT_ALPHA3=0.0911709766895;
IT_B=4162.90203487;
IT_BCHI1=21.2121212121;
IT_BCHI2=5.91549295775;
IT_BETA=0.33;
IT_BT=4162.90203487;
IT_BT_GDP_RAT=0.893355068859;
IT_C=2085.39820473;
IT_COIL=32.313444431;
IT_CPI=1.57442961175;
IT_CPI_GAP_EXOG=0;
IT_CPI_TAR=1.57442961175;
IT_CU=100;
IT_CURBAL=22.5845089076;
IT_C_DI=1291.08423915;
IT_C_PI=794.313965584;
IT_DELTA=0.0228725129802;
IT_DELTA_SS=0.0228725129802;
IT_DEM3=0.549666865555;
IT_DLGDP=0.0217614806135;
IT_DLLF=-0.00734415718949;
IT_DLLF_SS=0;
IT_ER=0.56895200396;
IT_FACT=866.589830511;
IT_G=505.458099941;
IT_GDEF=217.885990105;
IT_GDP=2869.00970783;
IT_GDP_FE=2869.00970783;
IT_GDP_GAP_EXOG=0;
IT_GE=1110.16464714;
IT_GEXOG=0;
IT_GNP=2900.89911415;
IT_ICOM=27.9359136154;
IT_IM=746.307923056;
IT_INFL=1.0270000062;
IT_INVEST=292.042726587;
IT_IOIL=40.5418920294;
IT_IT=814.785728701;
IT_K=6651.22322272;
IT_LAMBDA=0.911613047123;
IT_LAMBDA1=0.96192072127;
IT_LAMBDA2=0.990790836676;
IT_LAMBDA3=0.975347367544;
IT_LF=21512.1047038;
IT_M=448.378594908;
IT_MGROW=1.04959399462;
IT_MPC=0.0560882113769;
IT_MPCINV=17.8290584679;
IT_MPK=0.142345726775;
IT_MT=448.378594908;
IT_NEER=0.993697877386;
IT_NEER_PAR=0.993697877386;
IT_NFA=477.972486476;
IT_NLIN=9.6763048172;
IT_P=1.60573655135;
IT_PAR=0.975188058832;
IT_PART=0.594839602944;
IT_PARUS=1.75761750208;
IT_PFM=1.5102439297;
IT_PGNP=1.60634734372;
IT_PGNPNO=1.60637099427;
IT_PGNPNO_GAP_EXOG=0;
IT_PGNPNO_TAR=1.60637099427;
IT_PGNP_GAP_EXOG=0;
IT_PGNP_TAR=1.60634734372;
IT_PHI=5.67630449384;
IT_PIM=1.46833347211;
IT_PIMA=1.46833347211;
IT_PIT=1.4795699128;
IT_POP=56043;
IT_PREM=0;
IT_PROB=0.021;
IT_PRODOIL=1.56977411787;
IT_PXM=1.4786793971;
IT_PXT=1.4795699128;
IT_P_GAP_EXOG=0;
IT_P_TAR=1.60573655135;
IT_Q=1.00002007572;
IT_R=0.0752690064927;
IT_RCI=-0.0211217904449;
IT_RL=8.04040065237;
IT_RLR=0.052;
IT_RS=7.01340064617;
IT_RSCON=4.34920694771;
IT_RSCON2=0;
IT_RSR=0.042;
IT_RS_EXOG=7.01340064617;
IT_SIGMA=2.46201848984;
IT_TAX=892.278657033;
IT_TAXH=597.826700212;
IT_TAXK=294.451956821;
IT_TAXK_ALPHA=0;
IT_TAXK_SHAR=0.33;
IT_TB=-20.5502250652;
IT_TFP_FE=0.210324484098;
IT_TPREM=0.00959692898273;
IT_TRATE=0.191482205062;
IT_TRATEK=0.193610554027;
IT_TRATE_ALPHA=1;
IT_TRATE_EXOG=0.191482205062;
IT_UNR=9.67630449384;
IT_UNR_A=9.67630449384;
IT_UNR_FE=9.67630449384;
IT_UNR_GAP_EXOG=0;
IT_W=42237.362887;
IT_WH=32334.2602264;
IT_WH1=15900.9296512;
IT_WH2=11680.3128189;
IT_WH3=14316.3854423;
IT_WK=6508.16627893;
IT_XM=792.45269194;
IT_XMA=792.45269194;
IT_XOIL=8.44371332531;
IT_XT=800.896405265;
IT_X_RS1=1;
IT_X_RS2=0;
IT_YD=2165.56404681;
JA_A=783.056146905;
JA_ACT=63.5182611397;
JA_ALPHA1=0.078;
JA_ALPHA2=0.121;
JA_ALPHA3=0.0911709766895;
JA_B=259.101105567;
JA_BCHI1=21.2121212121;
JA_BCHI2=5.91549295775;
JA_BETA=0.43;
JA_BT=259.101105567;
JA_BT_GDP_RAT=0.22710463859;
JA_C=543.440832231;
JA_COIL=6.60124352681;
JA_CPI=1.46659153746;
JA_CPI_GAP_EXOG=0;
JA_CPI_TAR=1.46659153746;
JA_CU=100;
JA_CURBAL=151.027332837;
JA_C_DI=163.365868119;
JA_C_PI=380.074964113;
JA_DELTA=0.0353191039248;
JA_DELTA_SS=0.0353191039248;
JA_DEM3=0.638269939189;
JA_DLGDP=0.0217614806135;
JA_DLLF=-0.0101586915738;
JA_DLLF_SS=0;
JA_ER=9.25925280899;
JA_FACT=99.1282294501;
JA_G=133.195640388;
JA_GDEF=18.4718577163;
JA_GDP=775.773443241;
JA_GDP_FE=775.773443241;
JA_GDP_GAP_EXOG=0;
JA_GE=210.49870329;
JA_GEXOG=0;
JA_GNP=790.355189354;
JA_ICOM=8.10471508424;
JA_IM=73.6209617483;
JA_INFL=1.0270000062;
JA_INVEST=106.419674286;
JA_IOIL=6.25649765204;
JA_IT=87.9821744845;
JA_K=1897.42378099;
JA_LAMBDA=1;
JA_LAMBDA1=0.781339016115;
JA_LAMBDA2=0.887019030794;
JA_LAMBDA3=0.82137824171;
JA_LF=62800.2277851;
JA_M=131.832334634;
JA_MGROW=1.04959399462;
JA_MPC=0.0606503031206;
JA_MPCINV=16.4879637619;
JA_MPK=0.175808158375;
JA_MT=131.832334634;
JA_NEER=1.06586189299;
JA_NEER_PAR=1.06586189299;
JA_NFA=3196.30194739;
JA_NLIN=2.62369418144;
JA_P=1.44087235439;
JA_PAR=0.059922243377;
JA_PART=0.808249735683;
JA_PARUS=0.108000075236;
JA_PFM=1.33811031428;
JA_PGNP=1.44351384028;
JA_PGNPNO=1.44351605851;
JA_PGNPNO_GAP_EXOG=0;
JA_PGNPNO_TAR=1.44351605851;
JA_PGNP_GAP_EXOG=0;
JA_PGNP_TAR=1.44351384028;
JA_PHI=0;
JA_PIM=1.11076764325;
JA_PIMA=1.11076764325;
JA_PIT=1.15949407771;
JA_POP=127292;
JA_PREM=0;
JA_PROB=0.021;
JA_PRODOIL=0.0212147508622;
JA_PXM=1.15875219126;
JA_PXT=1.15949407771;
JA_P_GAP_EXOG=0;
JA_P_TAR=1.44087235439;
JA_Q=1.00001538804;
JA_R=0.0752690064927;
JA_RCI=-0.143914676498;
JA_RL=8.04040065237;
JA_RLR=0.052;
JA_RS=7.01340064617;
JA_RSCON=4.34920694771;
JA_RSCON2=0;
JA_RSR=0.042;
JA_RS_EXOG=7.01340064617;
JA_SIGMA=2.46201848984;
JA_TAX=192.026845573;
JA_TAXH=109.455301977;
JA_TAXK=82.5715435966;
JA_TAXK_ALPHA=0;
JA_TAXK_SHAR=0.43;
JA_TB=-8.44425176742;
JA_TFP_FE=0.0564765253676;
JA_TPREM=0.00959692898273;
JA_TRATE=0.16831339746;
JA_TRATEK=0.171477083005;
JA_TRATE_ALPHA=1;
JA_TRATE_EXOG=0.16831339746;
JA_UNR=2.62369409684;
JA_UNR_A=2.62369409684;
JA_UNR_FE=2.62369409684;
JA_UNR_GAP_EXOG=0;
JA_W=10917.9054016;
JA_WH=8550.40523148;
JA_WH1=4204.80911339;
JA_WH2=3088.71788415;
JA_WH3=3785.79550374;
JA_WK=1856.60530237;
JA_XM=80.4054846447;
JA_XMA=80.4054846447;
JA_XOIL=0.29398617645;
JA_XT=80.6994708212;
JA_X_RS1=1;
JA_X_RS2=0;
JA_YD=578.351766744;
PCOM=1.45590188668;
POIL=1.37222734974;
RES_CA_COIL=-0.0109079988152;
RES_CA_CPI=1.45716771982e-016;
RES_CA_C_DI=6.37971312724;
RES_CA_ER=2.22044604925e-016;
RES_CA_GNP=1.07016091968;
RES_CA_ICOM=0.33019785665;
RES_CA_IM=0.00235525414693;
RES_CA_IOIL=0.526458158973;
RES_CA_K=1.71000399694e-008;
RES_CA_M=-0.550565119176;
RES_CA_MPC=0.0725757835938;
RES_CA_NFA=-1.35976046915e-015;
RES_CA_P=-3.22528117171e-016;
RES_CA_PGNP=1.35421873758e-009;
RES_CA_PIM=0.0236040516254;
RES_CA_PXM=0.00836005025292;
RES_CA_RL=4.02455846427e-016;
RES_CA_RS=-1.41372510865e-025;
RES_CA_TFP_FE=-1.92607648534;
RES_CA_TRATE=-2.51618067138e-017;
RES_CA_UNR_A=5.67903297341e-014;
RES_CA_WH1=-2.98068141344e-007;
RES_CA_WH2=-4.05773425957e-007;
RES_CA_WH3=-3.31058461917e-007;
RES_CA_WK=0.0702500610208;
RES_CA_XM=0.00527196299678;
RES_DC_CTOT=0.422387255093;
RES_DC_DEBT=32.1888401163;
RES_DC_GDP_FE=0.931068718221;
RES_DC_IT=-3.51105481552e-014;
RES_DC_NFA=11.720990544;
RES_DC_PGNP=0.0565622498116;
RES_DC_PIM=0.000335349354246;
RES_DC_PIMA=0.000335349354246;
RES_DC_PXM=0.0667624996576;
RES_DC_QNT=-0.296439016955;
RES_DC_XOIL=194.336977011;
RES_DC_XSM=2.77221679942;
RES_FR_COIL=-0.0167592386654;
RES_FR_CPI=-1.38777878078e-016;
RES_FR_C_DI=176.647308119;
RES_FR_ER=2.22044604925e-016;
RES_FR_GNP=-6.83765577133;
RES_FR_ICOM=-0.146270714655;
RES_FR_IM=0.0188358301561;
RES_FR_IOIL=-1.09289296157;
RES_FR_K=4.02123033244e-008;
RES_FR_M=-0.750716274859;
RES_FR_MPC=0.0192892161783;
RES_FR_NFA=-2.9084127087e-015;
RES_FR_P=1.42177072593e-016;
RES_FR_PGNP=-9.91177872979e-010;
RES_FR_PIM=-0.0589379247028;
RES_FR_PXM=0.00111629219566;
RES_FR_RL=1.80411241502e-016;
RES_FR_RS=-1.0504879353e-025;
RES_FR_TFP_FE=-0.689357373461;
RES_FR_TRATE=-1.02390673979e-017;
RES_FR_UNR_A=-1.22338250303e-014;
RES_FR_WH1=-1.05051439415e-006;
RES_FR_WH2=-1.43011199597e-006;
RES_FR_WH3=-1.16678581671e-006;
RES_FR_WK=0.0473543323484;
RES_FR_XM=0.00458843620038;
RES_GR_COIL=-0.0599808385464;
RES_GR_CPI=-2.01227923213e-016;
RES_GR_C_DI=56.1113704318;
RES_GR_ER=2.22044604925e-016;
RES_GR_GNP=-2.55379408086;
RES_GR_ICOM=0.0122241574252;
RES_GR_IM=0.0111511469269;
RES_GR_IOIL=-2.88051845816;
RES_GR_K=2.00019476797e-008;
RES_GR_M=-0.582712538577;
RES_GR_MPC=0.0185606904822;
RES_GR_NFA=-2.24957186463e-015;
RES_GR_P=1.41759807568e-016;
RES_GR_PGNP=-5.67002899152e-010;
RES_GR_PIM=-0.0621848991172;
RES_GR_PXM=0.0020074176271;
RES_GR_RL=1.80411241502e-016;
RES_GR_RS=2.83313491133e-025;
RES_GR_TFP_FE=-1.48639600726;
RES_GR_TRATE=-2.93586865643e-017;
RES_GR_UNR_A=-1.00673945799e-014;
RES_GR_WH1=-5.67239752245e-007;
RES_GR_WH2=-7.7220871869e-007;
RES_GR_WH3=-6.30022112363e-007;
RES_GR_WK=0.0355104120004;
RES_GR_XM=-0.0095654330276;
RES_HO_ICOM=-3.79494263097;
RES_HO_IM=0.021778181942;
RES_HO_PIT=-0.0112362204049;
RES_HO_PXT=0.0213732250159;
RES_IT_COIL=-0.027413074423;
RES_IT_CPI=-4.85722573274e-017;
RES_IT_C_DI=23.2453468402;
RES_IT_ER=4.4408920985e-016;
RES_IT_GNP=-1.6599777279;
RES_IT_ICOM=0.172465314805;
RES_IT_IM=0.0787416293833;
RES_IT_IOIL=0.400434794101;
RES_IT_K=2.04877417533e-008;
RES_IT_M=-0.599367064131;
RES_IT_MPC=0.024983903402;
RES_IT_NFA=5.20512673071e-017;
RES_IT_P=-4.03009782146e-017;
RES_IT_PGNP=-1.86335704269e-009;
RES_IT_PIM=-0.0394139247307;
RES_IT_PXM=-0.00346055065303;
RES_IT_RL=1.80411241502e-016;
RES_IT_RS=-9.56044004053e-026;
RES_IT_TFP_FE=-1.55910377843;
RES_IT_TRATE=5.12930108144e-017;
RES_IT_UNR_A=-2.49703172526e-015;
RES_IT_WH1=-2.80708934474e-007;
RES_IT_WH2=-3.82141564777e-007;
RES_IT_WH3=-3.11777929959e-007;
RES_IT_WK=0.0524795286111;
RES_IT_XM=0.00382575709651;
RES_JA_COIL=-0.098310587964;
RES_JA_CPI=-1.97758476261e-016;
RES_JA_C_DI=9.19437254995;
RES_JA_ER=2.22044604925e-016;
RES_JA_GNP=-0.759041216713;
RES_JA_ICOM=-0.386447875848;
RES_JA_IM=0.0322950153553;
RES_JA_IOIL=-0.182557313543;
RES_JA_K=5.87450491463e-009;
RES_JA_M=-0.427124000253;
RES_JA_MPC=0.0362152885381;
RES_JA_NFA=-8.09336819432e-016;
RES_JA_P=1.45181614284e-016;
RES_JA_PGNP=-2.93727895115e-009;
RES_JA_PIM=-0.221200305623;
RES_JA_PXM=-0.000788854755803;
RES_JA_RL=-2.63677968348e-016;
RES_JA_RS=-8.13538550497e-026;
RES_JA_TFP_FE=-2.87393020739;
RES_JA_TRATE=-5.14825168766e-017;
RES_JA_UNR_A=3.81337021603e-015;
RES_JA_WH1=-5.41207974696e-007;
RES_JA_WH2=-7.36770500828e-007;
RES_JA_WH3=-6.01109125171e-007;
RES_JA_WK=0.071815561682;
RES_JA_XM=-0.191635175395;
RES_PCOM=2.96142508204;
RES_RW_PIM=0.179918124325;
RES_RW_PXM=0.000701519557326;
RES_RW_XM=0.00757522099654;
RES_SI_COIL=-0.0561108572625;
RES_SI_CPI=4.57966997658e-016;
RES_SI_C_DI=55.784039885;
RES_SI_ER=2.22044604925e-016;
RES_SI_GNP=-1.95141273136;
RES_SI_ICOM=-0.0689147298982;
RES_SI_IM=-0.00718032410169;
RES_SI_IOIL=-4.22515210093;
RES_SI_K=9.31431864482e-009;
RES_SI_M=-0.478584774363;
RES_SI_MPC=0.0226014551092;
RES_SI_NFA=2.63739383605e-015;
RES_SI_P=-1.38492650462e-016;
RES_SI_PGNP=9.74854052457e-010;
RES_SI_PIM=-0.0771624065748;
RES_SI_PXM=0.00971162329178;
RES_SI_RL=1.80411241502e-016;
RES_SI_RS=2.15290279144e-025;
RES_SI_TFP_FE=-2.00372760211;
RES_SI_TRATE=3.43291264805e-017;
RES_SI_UNR_A=-6.51192381672e-017;
RES_SI_WH1=-2.63320724475e-007;
RES_SI_WH2=-3.58470220651e-007;
RES_SI_WH3=-2.92465184612e-007;
RES_SI_WK=0.0389567669552;
RES_SI_XM=0.00581089017958;
RES_UK_COIL=-0.0806931765756;
RES_UK_CPI=9.02056207508e-017;
RES_UK_C_DI=-8.62271098965;
RES_UK_ER=2.22044604925e-016;
RES_UK_GNP=-0.9114566915;
RES_UK_ICOM=0.0371063111646;
RES_UK_IM=-0.000837070829134;
RES_UK_IOIL=-2.41279576534;
RES_UK_K=3.50187874409e-008;
RES_UK_M=-0.529762438429;
RES_UK_MPC=0.0444559224021;
RES_UK_NFA=-5.57685810744e-015;
RES_UK_P=-1.79670262479e-016;
RES_UK_PGNP=6.81994717598e-010;
RES_UK_PIM=0.0587561474127;
RES_UK_PXM=-0.00424513169106;
RES_UK_RL=1.80411241502e-016;
RES_UK_RS=-6.88768018652e-026;
RES_UK_TFP_FE=-2.47600195449;
RES_UK_TRATE=-9.43272633968e-018;
RES_UK_UNR_A=2.95170244024e-014;
RES_UK_WH1=-5.27106184031e-007;
RES_UK_WH2=-7.17573106004e-007;
RES_UK_WH3=-5.85446541819e-007;
RES_UK_WK=0.0308395179277;
RES_UK_XM=0.0108137902997;
RES_US_COIL=-0.0349556083001;
RES_US_CPI=-7.97972798949e-017;
RES_US_C_DI=-93.8135046341;
RES_US_ER=0;
RES_US_GNP=7.18062984233;
RES_US_ICOM=-0.094132087951;
RES_US_IM=-0.0175610612422;
RES_US_IOIL=2.19014971638;
RES_US_K=-5.62109347086e-008;
RES_US_M=-0.613986121855;
RES_US_MPC=0.0876209985143;
RES_US_NFA=-1.53995030743e-014;
RES_US_P=-4.20291712167e-017;
RES_US_PGNP=7.35968716581e-010;
RES_US_PIM=-0.0442566864737;
RES_US_PXM=-0.00187707613244;
RES_US_RL=1.80411241502e-016;
RES_US_RS=-2.40604412419e-025;
RES_US_TFP_FE=-1.8369647179;
RES_US_TRATE=-8.38593190783e-017;
RES_US_UNR_A=-4.47527360645e-015;
RES_US_WH1=-1.46913990487e-006;
RES_US_WH2=-2.000005534e-006;
RES_US_WH3=-1.63174499393e-006;
RES_US_WK=0.100484836793;
RES_US_XM=-0.00368724829424;
RES_WTRADE=-4.55499885022e-014;
RES_WTRADER=-4.486587131;
RPOIL=1.37209440777;
RW_ER=1;
RW_FACT=2225.86319145;
RW_IM=2380.60397123;
RW_INFL=1.0270000062;
RW_NEER=1.07755126355;
RW_PFM=1.29321620968;
RW_PIM=1.5063051999;
RW_PIMA=1.5063051999;
RW_PXM=1.52812049863;
RW_RCI=0.166906246657;
RW_XCOM=299.717894126;
RW_XM=1913.05652912;
RW_XMA=1913.05652912;
RW_XOIL=931.131716246;
SI_A=5117.76377531;
SI_ACT=1401.01452561;
SI_ALPHA1=0.078;
SI_ALPHA2=0.121;
SI_ALPHA3=0.0911709766895;
SI_B=2898.55852703;
SI_BCHI1=21.2121212121;
SI_BCHI2=5.91549295775;
SI_BETA=0.31;
SI_BT=2898.55852703;
SI_BT_GDP_RAT=0.351078837384;
SI_C=3549.9723216;
SI_COIL=62.0827158115;
SI_CPI=1.60754202926;
SI_CPI_GAP_EXOG=0;
SI_CPI_TAR=1.60754202926;
SI_CU=100;
SI_CURBAL=39.9640389591;
SI_C_DI=2222.98337367;
SI_C_PI=1326.98894793;
SI_DELTA=0.0276156380992;
SI_DELTA_SS=0.0276156380992;
SI_DEM3=0.522070543645;
SI_DLGDP=0.0217614806135;
SI_DLLF=-0.00284483828482;
SI_DLLF_SS=0;
SI_ER=0.85627815444;
SI_FACT=1607.96515637;
SI_G=988.882067352;
SI_GDEF=163.945930821;
SI_GDP=5101.35487684;
SI_GDP_FE=5101.35487684;
SI_GDP_GAP_EXOG=0;
SI_GE=1796.19136277;
SI_GEXOG=0;
SI_GNP=5138.84296627;
SI_ICOM=60.7931978894;
SI_IM=1701.62918621;
SI_INFL=1.0270000062;
SI_INVEST=578.909386351;
SI_IOIL=84.7602832535;
SI_IT=1847.18266735;
SI_K=11924.3496871;
SI_LAMBDA=0.87110388279;
SI_LAMBDA1=0.945988405976;
SI_LAMBDA2=0.98479623869;
SI_LAMBDA3=0.963368318818;
SI_LF=69787.1739395;
SI_M=571.14916167;
SI_MGROW=1.04959399462;
SI_MPC=0.0551206864881;
SI_MPCINV=18.142009175;
SI_MPK=0.132621069771;
SI_MT=571.14916167;
SI_NEER=0.882725108922;
SI_NEER_PAR=0.882725108922;
SI_NFA=845.78819708;
SI_NLIN=8.92256450653;
SI_P=1.60618595958;
SI_PAR=0.647961410008;
SI_PART=0.684748986472;
SI_PARUS=1.16784481166;
SI_PFM=1.57681314987;
SI_PGNP=1.60661595608;
SI_PGNPNO=1.60664357831;
SI_PGNPNO_GAP_EXOG=0;
SI_PGNPNO_TAR=1.60664357831;
SI_PGNP_GAP_EXOG=0;
SI_PGNP_TAR=1.60661595608;
SI_PHI=4.92256465201;
SI_PIM=1.45788972496;
SI_PIMA=1.45788972496;
SI_PIT=1.47250454613;
SI_POP=155124;
SI_PREM=0;
SI_PROB=0.021;
SI_PRODOIL=34.410559154;
SI_PXM=1.46722854834;
SI_PXT=1.47250454613;
SI_P_GAP_EXOG=0;
SI_P_TAR=1.60618595958;
SI_Q=1.00001195585;
SI_R=0.0752690064927;
SI_RCI=-0.0720305363805;
SI_RL=8.04040065237;
SI_RLR=0.052;
SI_RS=7.01340064617;
SI_RSCON=4.34920694771;
SI_RSCON2=0;
SI_RSR=0.042;
SI_RS_EXOG=7.01340064617;
SI_SIGMA=2.46201848984;
SI_TAX=1632.24543195;
SI_TAXH=1126.24934805;
SI_TAXK=505.996083905;
SI_TAXK_ALPHA=0;
SI_TAXK_SHAR=0.31;
SI_TB=-24.1621775859;
SI_TFP_FE=0.134831746225;
SI_TPREM=0.00959692898273;
SI_TRATE=0.197700623683;
SI_TRATEK=0.199153457065;
SI_TRATE_ALPHA=1;
SI_TRATE_EXOG=0.197700623683;
SI_UNR=8.92256465201;
SI_UNR_A=8.92256465201;
SI_UNR_FE=8.92256465201;
SI_UNR_GAP_EXOG=0;
SI_W=70393.2746601;
SI_WH=55950.3040857;
SI_WH1=27514.5261713;
SI_WH2=20211.2882576;
SI_WH3=24772.6749676;
SI_WK=11667.7893945;
SI_XM=1759.39366752;
SI_XMA=1759.39366752;
SI_XOIL=71.3801013646;
SI_XT=1830.77376889;
SI_X_RS1=1;
SI_X_RS2=0;
SI_YD=3764.28653477;
TME=56;
UK_A=1155.31070583;
UK_ACT=319.829953313;
UK_ALPHA1=0.078;
UK_ALPHA2=0.121;
UK_ALPHA3=0.0911709766895;
UK_B=582.359396161;
UK_BCHI1=21.2121212121;
UK_BCHI2=5.91549295775;
UK_BETA=0.31;
UK_BT=582.359396161;
UK_BT_GDP_RAT=0.303201156422;
UK_C=787.282698991;
UK_COIL=13.2084645927;
UK_CPI=1.65344105214;
UK_CPI_GAP_EXOG=0;
UK_CPI_TAR=1.65344105214;
UK_CU=100;
UK_CURBAL=36.6047768844;
UK_C_DI=415.845695136;
UK_C_PI=371.437003854;
UK_DELTA=0.0223378842507;
UK_DELTA_SS=0.0223378842507;
UK_DEM3=0.554484700166;
UK_DLGDP=0.0217614806135;
UK_DLLF=-0.002770417422;
UK_DLLF_SS=0;
UK_ER=1.63522100449;
UK_FACT=374.750092695;
UK_G=237.429954234;
UK_GDEF=31.0530122626;
UK_GDP=1146.69203206;
UK_GDP_FE=1146.69203206;
UK_GDP_GAP_EXOG=0;
UK_GE=432.934454507;
UK_GEXOG=0;
UK_GNP=1164.20179276;
UK_ICOM=11.251733102;
UK_IM=387.212098441;
UK_INFL=1.0270000062;
UK_INVEST=130.598052604;
UK_IOIL=6.64851932886;
UK_IT=405.112350872;
UK_K=3010.13959234;
UK_LAMBDA=1;
UK_LAMBDA1=0.943609109433;
UK_LAMBDA2=0.983826472125;
UK_LAMBDA3=0.961534659433;
UK_LF=28680.2495054;
UK_M=74.8382229877;
UK_MGROW=1.04959399462;
UK_MPC=0.0639968766536;
UK_MPCINV=15.625762573;
UK_MPK=0.118092373803;
UK_MT=74.8382229877;
UK_NEER=1.18232335241;
UK_NEER_PAR=1.18232335241;
UK_NFA=774.693675913;
UK_NLIN=6.24795866013;
UK_P=1.64752593728;
UK_PAR=0.339302882477;
UK_PART=0.743682280824;
UK_PARUS=0.611538132923;
UK_PFM=1.26531412293;
UK_PGNP=1.64980254779;
UK_PGNPNO=1.65412657552;
UK_PGNPNO_GAP_EXOG=0;
UK_PGNPNO_TAR=1.65412657552;
UK_PGNP_GAP_EXOG=0;
UK_PGNP_TAR=1.64980254779;
UK_PHI=2.24795877554;
UK_PIM=1.34388143146;
UK_PIMA=1.34388143146;
UK_PIT=1.34462885652;
UK_POP=59949;
UK_PREM=0;
UK_PROB=0.021;
UK_PRODOIL=14.4321078551;
UK_PXM=1.3460644352;
UK_PXT=1.34462885652;
UK_P_GAP_EXOG=0;
UK_P_TAR=1.64752593728;
UK_Q=1.00003342951;
UK_R=0.0752690064927;
UK_RCI=0.0618646918253;
UK_RL=8.04040065237;
UK_RLR=0.052;
UK_RS=7.01340064617;
UK_RSCON=4.34920694771;
UK_RSCON2=0;
UK_RSR=0.042;
UK_RS_EXOG=7.01340064617;
UK_SIGMA=2.46201848984;
UK_TAX=401.881442244;
UK_TAXH=277.298195149;
UK_TAXK=124.583247096;
UK_TAXK_ALPHA=0;
UK_TAXK_SHAR=0.31;
UK_TB=-11.5889174594;
UK_TFP_FE=0.0840787050036;
UK_TPREM=0.00959692898273;
UK_TRATE=0.209236630913;
UK_TRATEK=0.212431632914;
UK_TRATE_ALPHA=1;
UK_TRATE_EXOG=0.209236630913;
UK_UNR=6.24795877554;
UK_UNR_A=6.24795877554;
UK_UNR_FE=6.24795877554;
UK_UNR_GAP_EXOG=0;
UK_W=15847.0975967;
UK_WH=12215.2101092;
UK_WH1=6007.04006404;
UK_WH2=4412.57892481;
UK_WH3=5408.43226219;
UK_WK=2945.43253236;
UK_XM=380.460005673;
UK_XMA=380.460005673;
UK_XOIL=16.0336714261;
UK_XT=396.493677099;
UK_X_RS1=1;
UK_X_RS2=0;
UK_YD=838.553773434;
US_A=11697.616118;
US_ACT=1151.05134833;
US_ALPHA1=0.078;
US_ALPHA2=0.121;
US_ALPHA3=0.0911709766895;
US_B=5527.77752688;
US_BCHI1=21.2121212121;
US_BCHI2=5.91549295775;
US_BETA=0.29;
US_BT=5527.77752688;
US_BT_GDP_RAT=0.288490863185;
US_C=8506.90300877;
US_COIL=188.736419346;
US_CPI=1.68517625161;
US_CPI_GAP_EXOG=0;
US_CPI_TAR=1.68517625161;
US_CU=100;
US_CURBAL=-176.153365647;
US_C_DI=2451.73706272;
US_C_PI=6055.16594605;
US_DELTA=0.0683597148338;
US_DELTA_SS=0.0683597148338;
US_DEM3=0.528818264493;
US_DLGDP=0.0217614806134;
US_DLLF=0.00299350231857;
US_DLLF_SS=0;
US_ER=1;
US_FACT=1386.00982925;
US_G=1982.34035843;
US_GDEF=318.199955986;
US_GDP=11765.3659437;
US_GDP_FE=11765.3659437;
US_GDP_GAP_EXOG=0;
US_GE=3666.60708292;
US_GEXOG=0;
US_GNP=11627.4207057;
US_ICOM=71.8306349189;
US_IM=1673.26974695;
US_INFL=1.0270000062;
US_INVEST=1208.37275081;
US_IOIL=101.663326142;
US_IT=1846.76370801;
US_K=13666.6579593;
US_LAMBDA=0.690045535564;
US_LAMBDA1=0.80851637383;
US_LAMBDA2=0.90660357866;
US_LAMBDA3=0.846316827896;
US_LF=156293.686043;
US_M=1206.52095982;
US_MGROW=1.04959399462;
US_MPC=0.0815299669132;
US_MPCINV=12.265428748;
US_MPK=0.249655485185;
US_MT=1206.52095982;
US_NEER=1.04811209443;
US_NEER_PAR=1.04811209443;
US_NFA=-3728.06256376;
US_NLIN=5.86949110031;
US_P=1.64966441717;
US_PAR=0.55483520031;
US_PART=0.779438419387;
US_PARUS=1;
US_PFM=1.31987785254;
US_PGNP=1.64791613615;
US_PGNPNO=1.65037395412;
US_PGNPNO_GAP_EXOG=0;
US_PGNPNO_TAR=1.65037395412;
US_PGNP_GAP_EXOG=0;
US_PGNP_TAR=1.64791613615;
US_PHI=1.86949133476;
US_PIM=1.33975449819;
US_PIMA=1.33975449819;
US_PIT=1.34605971131;
US_POP=306560;
US_PREM=0;
US_PROB=0.021;
US_PRODOIL=103.96361969;
US_PXM=1.34592946401;
US_PXT=1.34605971131;
US_P_GAP_EXOG=0;
US_P_TAR=1.64966441717;
US_Q=1.00004024078;
US_R=0.0752690064927;
US_RCI=0.0195456293399;
US_RL=8.04040065237;
US_RLR=0.052;
US_RR=0.0721880064741;
US_RRBAR=0.0721880064741;
US_RS=7.01340064617;
US_RSCON=4.34920694771;
US_RSCON2=0;
US_RSR=0.042;
US_RS_EXOG=7.01340064617;
US_SIGMA=2.46201848984;
US_TAX=3348.40712693;
US_TAXH=2377.36906012;
US_TAXK=971.038066811;
US_TAXK_ALPHA=0;
US_TAXK_SHAR=0.29;
US_TB=91.1953108477;
US_TFP_FE=0.159300214125;
US_TPREM=0.00959692898273;
US_TRATE=0.174751038306;
US_TRATEK=0.172702137006;
US_TRATE_ALPHA=1;
US_TRATE_EXOG=0.174751038306;
US_UNR=5.86949133476;
US_UNR_A=5.86949133476;
US_UNR_FE=5.86949133476;
US_UNR_GAP_EXOG=0;
US_W=156126.123679;
US_WH=140930.833736;
US_WH1=69305.1660137;
US_WH2=50909.3516395;
US_WH3=62398.834003;
US_WK=13372.9581449;
US_XM=1905.03139485;
US_XMA=1905.03139485;
US_XOIL=9.48213887322;
US_XT=1914.51353373;
US_X_RS1=1;
US_X_RS2=0;
US_YD=8809.01195636;
WTRADE=15038.166239;
WTRADER=3382.59414741;
end;
//steady(solve_algo=1);
//check;
options_.slowc = 1.0;
options_.dynatol = 1e-4;
options_.maxit_ = 5;
simul(periods=80,datafile=mark3,markowitz=3);
//simul(periods=10,datafile=mark3, method=lu);
//simul(periods=10,datafile=mark3 /*, method=BICGSTAB*/);
oo_.endo_simul_ss=oo_.endo_simul;
shocks;
var US_G;
periods 1;
values 4330.714737;
end;
/*simul(periods=10);
oo_.endo_simul_sim=oo_.endo_simul;
oo_.endo_simul=(oo_.endo_simul_sim./oo_.endo_simul_ss-1)*100;
rplot WTRADER;
rplot US_GDP;
*/