Code: Select all
Set i /i1*i2 /
t /2000,2001/;
Alias (i,j);
parameters a(t,i,j) /
2000. i1. i1 2
2000. i1. i2 0
2000. i2. i1 0.272727
2000. i2. i2 2
2001. i1. i1 2
2001. i1. i2 0
2001. i2. i1 0.5
2001. i2. i2 2/;
I know I can use the following code to invert a 2-dimensional matrix:
Code: Select all
Parameter inva(i,j) 'inverse of a';
execute_unload 'a.gdx', i, a;
execute '=invert.exe a.gdx i a b.gdx inva';
execute_load 'b.gdx', inva;
Code: Select all
Parameter inva(t,i,j) 'inverse of a';
loop(t,
execute_unload 'a.gdx', i, a;
execute '=invert.exe a.gdx i a b.gdx inva';
execute_load 'b.gdx', inva;
);