📊 Simulateur MEGC
🏠 Accueil
📁 Modèles
📁 Navigation
🏠
/
Exemples
⬆️
Dossier parent
📄 Modèles
BOP
Calibration_SenAgreg
EMPLOI
INPUT
JOINT
KEYN
Model_SenAgreg-OI
Model_SenAgreg
Model_SenAgreg_Linux
Model_SenAgreg_UTF8
OPEN-VEC
OPEN-VEC_T
OPEN-VEC_T2
OPEN-VEC_T2_Linux
OPEN
Pure exchange
Read_Data
SIMP
TARIFF
TAXENDO
TAXIN
TAXOUT
🖥️ Console
INPUT.gms
Sortie
LST
En attente d'exécution...
Fichier LST non disponible
📝 Code GAMS
$TITLE: MEGC �l�mentaire avec un deux biens, deux facteurs de production et un seul agent *Jean-Marc PHILIP, email:jm.philip@analyze.fr * Ce mod�le est le m�me que le mod�le SIMP.gms avc l'ajout de consommations interm�diaires TABLE SAM L K RA X Y Total L 40 60 100 K 60 40 100 RA 100 100 200 X 100 80 20 200 Y 100 20 80 200 Total 100 100 200 200 200 ; $ONTEXT $MODEL:INPUT $SECTORS: X! Niveau d'activit� pour le secteur X Y! Niveau d'activit� pour le secteur Y W! Niveau d'utilit� pour le consommateur RA $COMMODITIES: PW ! Indice du prix de l'utilit� du consommateur RA PX ! Indice des prix des biens de production du produit X PY ! Indice des prix des biens de production du produit Y PL ! Indice des prix de la r�mun�ration du travail RK ! Indice des prix de la r�mun�ration du capital $CONSUMERS: RA! Le niveau de revenu des consommateurs RA $PROD:X s:1 va:0.5 ci:0.8 O:PX Q:200 I:PL Q:40 va: I:RK Q:60 va: I:PX Q:80 ci: I:PY Q:20 ci: $PROD:Y s:0.5 va:0.8 ci:0.2 O:PY Q:200 I:PL Q:60 va: I:RK Q:40 va: I:PX Q:20 ci: I:PY Q:80 ci: $PROD:W s:1 O:PW Q:200 I:PX Q:100 I:PY Q:100 $DEMAND:RA D:PW Q:200 E:PL Q:100 E:RK Q:100 $REPORT: V:Cons O:PW PROD:W V:EmpX I:PL PROD:X V:CapX I:RK PROD:X V:EmpY I:PL PROD:Y V:CapY I:RK PROD:Y V:CIXX I:PX PROD:X V:CIXY I:PY PROD:X V:CIYX I:PX PROD:Y V:CIYY I:PY PROD:Y $OFFTEXT $SYSINCLUDE mpsgeset INPUT PL.FX = 1 ; INPUT.ITERLIM = 0 ; $INCLUDE INPUT.GEN SOLVE INPUT USING MCP ; PARAMETER RESULTS ; RESULTS('Consommation finale') = Cons.l ; RESULTS('R�mun�ration du travail') = EmpX.l + EmpY.l ; ; RESULTS('R�mun�ration du capital') = CapX.l + CapY.l ; RESULTS('Consommation interm�diaire') = CIXX.l+ CIXY.l+ CIYX.l+ CIYY.l ; * Envoi des r�sultats dans un fichier Excel Execute_unload "RESULTS.gdx" RESULTS Execute 'gdxxrw i=RESULTS.gdx o=RESULTS.xlsx par=RESULTS rdim=1 cdim=0 ' ;
▶️ Lancer la Simulation