! closure for ALTERTAX simulation
! standard GTAP closure plus addtional closure for IRTS/Imperfect comp model
Exogenous
! Start with the standard closure items
          pop
          psaveslack pfactwld
          profitslack incomeslack endwslack
          tradslack
          ams atm atf ats atd
          aosec aoreg avasec avareg
          afcom afsec afreg afecom afesec afereg
          afall afeall
          au dppriv dpgov dpsave
          to tm tms tx txs
!
! Given IRTS, the output augmenting technical change for OLIG_COMM is
! endogenized (and oscale exogenized)
          oscale(OLIG_COMM,REG)
          aoall("cgds",REG) ao(NOLI_COMM,REG)
!
          qo(ENDW_COMM,REG)
! for FIXED WAGE CLOSURE: endogenize unskilled labor endowment and fix real wage
!         qo(NULEND_COMM,REG)
!         qo(ULEND_COMM,NMOR_REG)
!         qo(ULEND_COMM,MOR_REG)
!         pfactreal(ULEND_COMM,MOR_REG)
!
! ENTRY AND EXIT ASSUMPTIONS OF IC FIRMS:
! With entry and exit we endogenize the number of firms and exogenize entryslack
!         firms
          entryslack
!
! For CALIBRATION purposes, swap mkupslack with c_CV_RATIO to fix the latter
          mkupslack
!         c_CV_RATIO
!
! FISCAL NEUTRALITY ASSUMPTIONS: endogenize consumption tax and fix the ratio 
! of tax revenue to net national income 
          tp
!         del_ttaxr
!
!    DTBAL exogenous for all regions except one,
!    and CGDSLACK exogenous for that one region (which can be any one).
cgdslack("ROW")
dtbal("MOR")
dtbal("EU");

Rest endogenous;
