function [res] = gamaappr(x)

%arrondi a 10^-4
if x==1
    res = [0 - 0*i, 0 + 0*i, 0.0022 + 0.0008*i, 0.8974, 0.0021 - 0.0008*i,0 - 0*i, 0 + 0*i ;
 0 + 0*i, 0 - 0*i, 0.00800 - 0.0109*i, 1.4635, 0.0080 + 0.0109*i, 0 + 0*i, 0 - 0*i ;
 0 + 0*i,0 - 0.0001*i, -0.0412 - 0.0745*i, 3.8505, -0.0412 + 0.0745*i, -0.0000 + 0.0001*i,0 - 0*i ;
 0 + 0*i, -0.001 + 0.0002*i, -0.5754 - 0.0349*i, 13.9809, -0.5754 + 0.0349*i, -0.001 - 0.0002*i,0 - 0*i ;
 0- 0.000*i, -0.0022 + 0.0123*i, -2.8640 + 3.1295*i, 64.7445, -2.8640 - 3.1295*i, -0.0022 - 0.0123*i, 0 + 0.0000*i ; 
 -0.0002 - 0.0001*i, 0.1281 + 0.0944*i, 1.7708 + 34.0019*i, 364.5715, 1.7708 - 34.0019*i, 0.1281- 0.0944*i, -0.0002 + 0.00013*i ;
 -0.0033 + 0.0019*i, 1.9296 - 0.8396*i, 206.2054 + 215.3366*i, 2417.4477, 206.2054 - 215.3366*i, 1.9296 + 0.8396*i, -0.0033 - 0.0019*i ;
 0.0082 + 0.0712*i, 5.1207 - 28.4789*i, 2805.0924+ 463.8883*i, 18447.3736, 2805.0924 - 463.8883*i, 5.1207 + 28.4789*i, 0.0082 - 0.0712*i ;
 1.2922 + 0.4746*i, -281.557 - 304.3724*i, 26863.6261 - 12039.1018*i, 159217.9854, 26863.6261 + 12039.1018*i, -281.557 + 304.3724*i, 1.2922 - 0.4746*i ;
 20.5872 - 17.6003*i, -6193.1892 + 289.1733*i, 189867.6437 - 269586.2408*i, 1.5334172326*10^6, 189867.6437 + 269586.2408*i, -6193.1892- 289.1733*i, 20.5872 + 17.6003*i ;
 -83.1168 - 540.3351*i, -62531.6782 + 73914.3783*i, 476651.4867 - 3.9518437453*10^6*i, 1.63016508827*10^7, 476651.4867 + 3.9518437453*10^6*i, -62531.67819- 73914.3783*i, -83.1168 + 540.3351*i ;
 -10237.5823- 4858.5137*i, 118160.9244 + 1.5749555062173638*10^6*i, -1.7057491644561697*10^7 - 4.8689683008904025*10^7*i, 1.8960335628344592*10^8, -1.7057491644561697*10^7 + 4.8689683008904025*10^7*i, 118160.9244 - 1.574955506217*10^6*i, -10237.5823+ 4858.5137*i];
else
    res = [];
end;
