local _M = {} 
_M[1] = function (dir, f, out) 
   if dir == 1  then 
   out[1] = f[1] 
   out[2] = -1.0*f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = -1.0*f[7] 
   out[8] = -1.0*f[8] 
   out[9] = f[9] 
   out[10] = -1.0*f[10] 
   out[11] = f[11] 
   out[12] = f[12] 
   out[13] = -1.0*f[13] 
   out[14] = f[14] 
   out[15] = f[15] 
   out[16] = f[16] 
   out[17] = -1.0*f[17] 
   out[18] = -1.0*f[18] 
   out[19] = -1.0*f[19] 
   out[20] = f[20] 
   out[21] = -1.0*f[21] 
   out[22] = -1.0*f[22] 
   out[23] = f[23] 
   out[24] = -1.0*f[24] 
   out[25] = f[25] 
   out[26] = f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = f[31] 
   out[32] = -1.0*f[32] 
   end 
   if dir == 2  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = -1.0*f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = -1.0*f[7] 
   out[8] = f[8] 
   out[9] = -1.0*f[9] 
   out[10] = f[10] 
   out[11] = -1.0*f[11] 
   out[12] = f[12] 
   out[13] = f[13] 
   out[14] = -1.0*f[14] 
   out[15] = f[15] 
   out[16] = f[16] 
   out[17] = -1.0*f[17] 
   out[18] = -1.0*f[18] 
   out[19] = f[19] 
   out[20] = -1.0*f[20] 
   out[21] = -1.0*f[21] 
   out[22] = f[22] 
   out[23] = -1.0*f[23] 
   out[24] = f[24] 
   out[25] = -1.0*f[25] 
   out[26] = f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = -1.0*f[29] 
   out[30] = f[30] 
   out[31] = -1.0*f[31] 
   out[32] = -1.0*f[32] 
   end 
   if dir == 3  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = -1.0*f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = f[7] 
   out[8] = -1.0*f[8] 
   out[9] = -1.0*f[9] 
   out[10] = f[10] 
   out[11] = f[11] 
   out[12] = -1.0*f[12] 
   out[13] = f[13] 
   out[14] = f[14] 
   out[15] = -1.0*f[15] 
   out[16] = f[16] 
   out[17] = -1.0*f[17] 
   out[18] = f[18] 
   out[19] = -1.0*f[19] 
   out[20] = -1.0*f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = -1.0*f[23] 
   out[24] = f[24] 
   out[25] = f[25] 
   out[26] = -1.0*f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = -1.0*f[32] 
   end 
   if dir == 4  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = -1.0*f[5] 
   out[6] = f[6] 
   out[7] = f[7] 
   out[8] = f[8] 
   out[9] = f[9] 
   out[10] = -1.0*f[10] 
   out[11] = -1.0*f[11] 
   out[12] = -1.0*f[12] 
   out[13] = f[13] 
   out[14] = f[14] 
   out[15] = f[15] 
   out[16] = -1.0*f[16] 
   out[17] = f[17] 
   out[18] = -1.0*f[18] 
   out[19] = -1.0*f[19] 
   out[20] = -1.0*f[20] 
   out[21] = f[21] 
   out[22] = f[22] 
   out[23] = f[23] 
   out[24] = -1.0*f[24] 
   out[25] = -1.0*f[25] 
   out[26] = -1.0*f[26] 
   out[27] = -1.0*f[27] 
   out[28] = f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = -1.0*f[32] 
   end 
   if dir == 5  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = -1.0*f[6] 
   out[7] = f[7] 
   out[8] = f[8] 
   out[9] = f[9] 
   out[10] = f[10] 
   out[11] = f[11] 
   out[12] = f[12] 
   out[13] = -1.0*f[13] 
   out[14] = -1.0*f[14] 
   out[15] = -1.0*f[15] 
   out[16] = -1.0*f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = -1.0*f[21] 
   out[22] = -1.0*f[22] 
   out[23] = -1.0*f[23] 
   out[24] = -1.0*f[24] 
   out[25] = -1.0*f[25] 
   out[26] = -1.0*f[26] 
   out[27] = f[27] 
   out[28] = -1.0*f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = -1.0*f[32] 
   end 
end 
_M[2] = function (dir, f, out) 
   if dir == 1  then 
   out[1] = f[1] 
   out[2] = -1.0*f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = -1.0*f[7] 
   out[8] = -1.0*f[8] 
   out[9] = f[9] 
   out[10] = -1.0*f[10] 
   out[11] = f[11] 
   out[12] = f[12] 
   out[13] = -1.0*f[13] 
   out[14] = f[14] 
   out[15] = f[15] 
   out[16] = f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = -1.0*f[23] 
   out[24] = -1.0*f[24] 
   out[25] = f[25] 
   out[26] = -1.0*f[26] 
   out[27] = -1.0*f[27] 
   out[28] = f[28] 
   out[29] = -1.0*f[29] 
   out[30] = f[30] 
   out[31] = f[31] 
   out[32] = f[32] 
   out[33] = -1.0*f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = -1.0*f[36] 
   out[37] = f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = -1.0*f[41] 
   out[42] = f[42] 
   out[43] = f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = -1.0*f[48] 
   out[49] = f[49] 
   out[50] = f[50] 
   out[51] = f[51] 
   out[52] = -1.0*f[52] 
   out[53] = -1.0*f[53] 
   out[54] = -1.0*f[54] 
   out[55] = -1.0*f[55] 
   out[56] = f[56] 
   out[57] = f[57] 
   out[58] = -1.0*f[58] 
   out[59] = -1.0*f[59] 
   out[60] = f[60] 
   out[61] = -1.0*f[61] 
   out[62] = f[62] 
   out[63] = f[63] 
   out[64] = -1.0*f[64] 
   out[65] = f[65] 
   out[66] = -1.0*f[66] 
   out[67] = -1.0*f[67] 
   out[68] = f[68] 
   out[69] = f[69] 
   out[70] = -1.0*f[70] 
   out[71] = f[71] 
   out[72] = f[72] 
   out[73] = -1.0*f[73] 
   out[74] = f[74] 
   out[75] = f[75] 
   out[76] = f[76] 
   out[77] = f[77] 
   out[78] = -1.0*f[78] 
   out[79] = f[79] 
   out[80] = f[80] 
   out[81] = -1.0*f[81] 
   out[82] = -1.0*f[82] 
   out[83] = f[83] 
   out[84] = -1.0*f[84] 
   out[85] = f[85] 
   out[86] = f[86] 
   out[87] = -1.0*f[87] 
   out[88] = f[88] 
   out[89] = -1.0*f[89] 
   out[90] = -1.0*f[90] 
   out[91] = -1.0*f[91] 
   out[92] = f[92] 
   out[93] = -1.0*f[93] 
   out[94] = -1.0*f[94] 
   out[95] = f[95] 
   out[96] = -1.0*f[96] 
   out[97] = f[97] 
   out[98] = f[98] 
   out[99] = -1.0*f[99] 
   out[100] = f[100] 
   out[101] = -1.0*f[101] 
   out[102] = -1.0*f[102] 
   out[103] = f[103] 
   out[104] = -1.0*f[104] 
   out[105] = -1.0*f[105] 
   out[106] = -1.0*f[106] 
   out[107] = f[107] 
   out[108] = f[108] 
   out[109] = -1.0*f[109] 
   out[110] = -1.0*f[110] 
   out[111] = -1.0*f[111] 
   out[112] = -1.0*f[112] 
   end 
   if dir == 2  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = -1.0*f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = -1.0*f[7] 
   out[8] = f[8] 
   out[9] = -1.0*f[9] 
   out[10] = f[10] 
   out[11] = -1.0*f[11] 
   out[12] = f[12] 
   out[13] = f[13] 
   out[14] = -1.0*f[14] 
   out[15] = f[15] 
   out[16] = f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = -1.0*f[23] 
   out[24] = f[24] 
   out[25] = -1.0*f[25] 
   out[26] = -1.0*f[26] 
   out[27] = f[27] 
   out[28] = -1.0*f[28] 
   out[29] = f[29] 
   out[30] = -1.0*f[30] 
   out[31] = f[31] 
   out[32] = -1.0*f[32] 
   out[33] = f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = f[36] 
   out[37] = -1.0*f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = f[41] 
   out[42] = -1.0*f[42] 
   out[43] = f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = f[48] 
   out[49] = -1.0*f[49] 
   out[50] = f[50] 
   out[51] = f[51] 
   out[52] = -1.0*f[52] 
   out[53] = -1.0*f[53] 
   out[54] = -1.0*f[54] 
   out[55] = f[55] 
   out[56] = -1.0*f[56] 
   out[57] = -1.0*f[57] 
   out[58] = f[58] 
   out[59] = -1.0*f[59] 
   out[60] = -1.0*f[60] 
   out[61] = f[61] 
   out[62] = f[62] 
   out[63] = f[63] 
   out[64] = f[64] 
   out[65] = -1.0*f[65] 
   out[66] = -1.0*f[66] 
   out[67] = f[67] 
   out[68] = -1.0*f[68] 
   out[69] = -1.0*f[69] 
   out[70] = f[70] 
   out[71] = f[71] 
   out[72] = f[72] 
   out[73] = f[73] 
   out[74] = -1.0*f[74] 
   out[75] = f[75] 
   out[76] = f[76] 
   out[77] = f[77] 
   out[78] = f[78] 
   out[79] = -1.0*f[79] 
   out[80] = f[80] 
   out[81] = -1.0*f[81] 
   out[82] = f[82] 
   out[83] = -1.0*f[83] 
   out[84] = f[84] 
   out[85] = -1.0*f[85] 
   out[86] = f[86] 
   out[87] = -1.0*f[87] 
   out[88] = -1.0*f[88] 
   out[89] = f[89] 
   out[90] = -1.0*f[90] 
   out[91] = -1.0*f[91] 
   out[92] = -1.0*f[92] 
   out[93] = f[93] 
   out[94] = -1.0*f[94] 
   out[95] = -1.0*f[95] 
   out[96] = f[96] 
   out[97] = f[97] 
   out[98] = f[98] 
   out[99] = f[99] 
   out[100] = -1.0*f[100] 
   out[101] = -1.0*f[101] 
   out[102] = f[102] 
   out[103] = -1.0*f[103] 
   out[104] = -1.0*f[104] 
   out[105] = -1.0*f[105] 
   out[106] = f[106] 
   out[107] = -1.0*f[107] 
   out[108] = -1.0*f[108] 
   out[109] = f[109] 
   out[110] = -1.0*f[110] 
   out[111] = -1.0*f[111] 
   out[112] = -1.0*f[112] 
   end 
   if dir == 3  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = -1.0*f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = f[7] 
   out[8] = -1.0*f[8] 
   out[9] = -1.0*f[9] 
   out[10] = f[10] 
   out[11] = f[11] 
   out[12] = -1.0*f[12] 
   out[13] = f[13] 
   out[14] = f[14] 
   out[15] = -1.0*f[15] 
   out[16] = f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = f[23] 
   out[24] = -1.0*f[24] 
   out[25] = -1.0*f[25] 
   out[26] = f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = f[29] 
   out[30] = f[30] 
   out[31] = -1.0*f[31] 
   out[32] = f[32] 
   out[33] = f[33] 
   out[34] = -1.0*f[34] 
   out[35] = -1.0*f[35] 
   out[36] = f[36] 
   out[37] = f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = f[41] 
   out[42] = f[42] 
   out[43] = -1.0*f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = f[48] 
   out[49] = f[49] 
   out[50] = -1.0*f[50] 
   out[51] = f[51] 
   out[52] = -1.0*f[52] 
   out[53] = -1.0*f[53] 
   out[54] = f[54] 
   out[55] = -1.0*f[55] 
   out[56] = -1.0*f[56] 
   out[57] = -1.0*f[57] 
   out[58] = -1.0*f[58] 
   out[59] = f[59] 
   out[60] = f[60] 
   out[61] = f[61] 
   out[62] = -1.0*f[62] 
   out[63] = -1.0*f[63] 
   out[64] = f[64] 
   out[65] = f[65] 
   out[66] = f[66] 
   out[67] = -1.0*f[67] 
   out[68] = -1.0*f[68] 
   out[69] = f[69] 
   out[70] = f[70] 
   out[71] = -1.0*f[71] 
   out[72] = -1.0*f[72] 
   out[73] = f[73] 
   out[74] = f[74] 
   out[75] = f[75] 
   out[76] = f[76] 
   out[77] = f[77] 
   out[78] = f[78] 
   out[79] = f[79] 
   out[80] = -1.0*f[80] 
   out[81] = f[81] 
   out[82] = -1.0*f[82] 
   out[83] = -1.0*f[83] 
   out[84] = f[84] 
   out[85] = f[85] 
   out[86] = -1.0*f[86] 
   out[87] = -1.0*f[87] 
   out[88] = -1.0*f[88] 
   out[89] = -1.0*f[89] 
   out[90] = f[90] 
   out[91] = -1.0*f[91] 
   out[92] = -1.0*f[92] 
   out[93] = -1.0*f[93] 
   out[94] = f[94] 
   out[95] = f[95] 
   out[96] = f[96] 
   out[97] = -1.0*f[97] 
   out[98] = -1.0*f[98] 
   out[99] = f[99] 
   out[100] = f[100] 
   out[101] = f[101] 
   out[102] = -1.0*f[102] 
   out[103] = -1.0*f[103] 
   out[104] = -1.0*f[104] 
   out[105] = f[105] 
   out[106] = -1.0*f[106] 
   out[107] = -1.0*f[107] 
   out[108] = -1.0*f[108] 
   out[109] = -1.0*f[109] 
   out[110] = f[110] 
   out[111] = -1.0*f[111] 
   out[112] = -1.0*f[112] 
   end 
   if dir == 4  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = -1.0*f[5] 
   out[6] = f[6] 
   out[7] = f[7] 
   out[8] = f[8] 
   out[9] = f[9] 
   out[10] = -1.0*f[10] 
   out[11] = -1.0*f[11] 
   out[12] = -1.0*f[12] 
   out[13] = f[13] 
   out[14] = f[14] 
   out[15] = f[15] 
   out[16] = -1.0*f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = f[22] 
   out[23] = -1.0*f[23] 
   out[24] = -1.0*f[24] 
   out[25] = -1.0*f[25] 
   out[26] = f[26] 
   out[27] = f[27] 
   out[28] = f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = f[32] 
   out[33] = f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = f[36] 
   out[37] = f[37] 
   out[38] = -1.0*f[38] 
   out[39] = -1.0*f[39] 
   out[40] = -1.0*f[40] 
   out[41] = f[41] 
   out[42] = f[42] 
   out[43] = f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = f[48] 
   out[49] = f[49] 
   out[50] = f[50] 
   out[51] = -1.0*f[51] 
   out[52] = -1.0*f[52] 
   out[53] = f[53] 
   out[54] = -1.0*f[54] 
   out[55] = -1.0*f[55] 
   out[56] = -1.0*f[56] 
   out[57] = f[57] 
   out[58] = f[58] 
   out[59] = f[59] 
   out[60] = -1.0*f[60] 
   out[61] = -1.0*f[61] 
   out[62] = -1.0*f[62] 
   out[63] = -1.0*f[63] 
   out[64] = -1.0*f[64] 
   out[65] = -1.0*f[65] 
   out[66] = f[66] 
   out[67] = f[67] 
   out[68] = f[68] 
   out[69] = f[69] 
   out[70] = f[70] 
   out[71] = f[71] 
   out[72] = f[72] 
   out[73] = f[73] 
   out[74] = f[74] 
   out[75] = -1.0*f[75] 
   out[76] = -1.0*f[76] 
   out[77] = -1.0*f[77] 
   out[78] = f[78] 
   out[79] = f[79] 
   out[80] = f[80] 
   out[81] = f[81] 
   out[82] = f[82] 
   out[83] = f[83] 
   out[84] = -1.0*f[84] 
   out[85] = -1.0*f[85] 
   out[86] = -1.0*f[86] 
   out[87] = -1.0*f[87] 
   out[88] = -1.0*f[88] 
   out[89] = -1.0*f[89] 
   out[90] = -1.0*f[90] 
   out[91] = f[91] 
   out[92] = f[92] 
   out[93] = f[93] 
   out[94] = f[94] 
   out[95] = -1.0*f[95] 
   out[96] = -1.0*f[96] 
   out[97] = -1.0*f[97] 
   out[98] = -1.0*f[98] 
   out[99] = -1.0*f[99] 
   out[100] = -1.0*f[100] 
   out[101] = f[101] 
   out[102] = f[102] 
   out[103] = f[103] 
   out[104] = f[104] 
   out[105] = -1.0*f[105] 
   out[106] = -1.0*f[106] 
   out[107] = -1.0*f[107] 
   out[108] = -1.0*f[108] 
   out[109] = -1.0*f[109] 
   out[110] = -1.0*f[110] 
   out[111] = f[111] 
   out[112] = -1.0*f[112] 
   end 
   if dir == 5  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = -1.0*f[6] 
   out[7] = f[7] 
   out[8] = f[8] 
   out[9] = f[9] 
   out[10] = f[10] 
   out[11] = f[11] 
   out[12] = f[12] 
   out[13] = -1.0*f[13] 
   out[14] = -1.0*f[14] 
   out[15] = -1.0*f[15] 
   out[16] = -1.0*f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = f[22] 
   out[23] = f[23] 
   out[24] = f[24] 
   out[25] = f[25] 
   out[26] = -1.0*f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = f[32] 
   out[33] = f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = f[36] 
   out[37] = f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = f[41] 
   out[42] = f[42] 
   out[43] = f[43] 
   out[44] = -1.0*f[44] 
   out[45] = -1.0*f[45] 
   out[46] = -1.0*f[46] 
   out[47] = -1.0*f[47] 
   out[48] = f[48] 
   out[49] = f[49] 
   out[50] = f[50] 
   out[51] = f[51] 
   out[52] = f[52] 
   out[53] = -1.0*f[53] 
   out[54] = -1.0*f[54] 
   out[55] = -1.0*f[55] 
   out[56] = -1.0*f[56] 
   out[57] = f[57] 
   out[58] = f[58] 
   out[59] = f[59] 
   out[60] = f[60] 
   out[61] = f[61] 
   out[62] = f[62] 
   out[63] = f[63] 
   out[64] = f[64] 
   out[65] = f[65] 
   out[66] = f[66] 
   out[67] = f[67] 
   out[68] = f[68] 
   out[69] = -1.0*f[69] 
   out[70] = -1.0*f[70] 
   out[71] = -1.0*f[71] 
   out[72] = -1.0*f[72] 
   out[73] = -1.0*f[73] 
   out[74] = -1.0*f[74] 
   out[75] = -1.0*f[75] 
   out[76] = -1.0*f[76] 
   out[77] = -1.0*f[77] 
   out[78] = -1.0*f[78] 
   out[79] = -1.0*f[79] 
   out[80] = -1.0*f[80] 
   out[81] = f[81] 
   out[82] = f[82] 
   out[83] = f[83] 
   out[84] = f[84] 
   out[85] = f[85] 
   out[86] = f[86] 
   out[87] = -1.0*f[87] 
   out[88] = f[88] 
   out[89] = f[89] 
   out[90] = f[90] 
   out[91] = f[91] 
   out[92] = -1.0*f[92] 
   out[93] = -1.0*f[93] 
   out[94] = -1.0*f[94] 
   out[95] = -1.0*f[95] 
   out[96] = -1.0*f[96] 
   out[97] = -1.0*f[97] 
   out[98] = -1.0*f[98] 
   out[99] = -1.0*f[99] 
   out[100] = -1.0*f[100] 
   out[101] = -1.0*f[101] 
   out[102] = -1.0*f[102] 
   out[103] = -1.0*f[103] 
   out[104] = f[104] 
   out[105] = f[105] 
   out[106] = f[106] 
   out[107] = f[107] 
   out[108] = -1.0*f[108] 
   out[109] = -1.0*f[109] 
   out[110] = -1.0*f[110] 
   out[111] = -1.0*f[111] 
   out[112] = f[112] 
   end 
end 
_M[3] = function (dir, f, out) 
   if dir == 1  then 
   out[1] = f[1] 
   out[2] = -1.0*f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = -1.0*f[7] 
   out[8] = -1.0*f[8] 
   out[9] = f[9] 
   out[10] = -1.0*f[10] 
   out[11] = f[11] 
   out[12] = f[12] 
   out[13] = -1.0*f[13] 
   out[14] = f[14] 
   out[15] = f[15] 
   out[16] = f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = -1.0*f[23] 
   out[24] = -1.0*f[24] 
   out[25] = f[25] 
   out[26] = -1.0*f[26] 
   out[27] = -1.0*f[27] 
   out[28] = f[28] 
   out[29] = -1.0*f[29] 
   out[30] = f[30] 
   out[31] = f[31] 
   out[32] = f[32] 
   out[33] = -1.0*f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = -1.0*f[36] 
   out[37] = f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = -1.0*f[41] 
   out[42] = f[42] 
   out[43] = f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = -1.0*f[48] 
   out[49] = f[49] 
   out[50] = f[50] 
   out[51] = f[51] 
   out[52] = -1.0*f[52] 
   out[53] = f[53] 
   out[54] = f[54] 
   out[55] = f[55] 
   out[56] = f[56] 
   out[57] = -1.0*f[57] 
   out[58] = -1.0*f[58] 
   out[59] = -1.0*f[59] 
   out[60] = -1.0*f[60] 
   out[61] = f[61] 
   out[62] = f[62] 
   out[63] = -1.0*f[63] 
   out[64] = -1.0*f[64] 
   out[65] = f[65] 
   out[66] = -1.0*f[66] 
   out[67] = f[67] 
   out[68] = f[68] 
   out[69] = -1.0*f[69] 
   out[70] = f[70] 
   out[71] = -1.0*f[71] 
   out[72] = -1.0*f[72] 
   out[73] = f[73] 
   out[74] = f[74] 
   out[75] = -1.0*f[75] 
   out[76] = f[76] 
   out[77] = f[77] 
   out[78] = -1.0*f[78] 
   out[79] = f[79] 
   out[80] = f[80] 
   out[81] = f[81] 
   out[82] = f[82] 
   out[83] = -1.0*f[83] 
   out[84] = f[84] 
   out[85] = f[85] 
   out[86] = -1.0*f[86] 
   out[87] = -1.0*f[87] 
   out[88] = f[88] 
   out[89] = -1.0*f[89] 
   out[90] = f[90] 
   out[91] = f[91] 
   out[92] = -1.0*f[92] 
   out[93] = -1.0*f[93] 
   out[94] = -1.0*f[94] 
   out[95] = f[95] 
   out[96] = -1.0*f[96] 
   out[97] = f[97] 
   out[98] = -1.0*f[98] 
   out[99] = f[99] 
   out[100] = f[100] 
   out[101] = -1.0*f[101] 
   out[102] = f[102] 
   out[103] = f[103] 
   out[104] = -1.0*f[104] 
   out[105] = f[105] 
   out[106] = f[106] 
   out[107] = f[107] 
   out[108] = -1.0*f[108] 
   out[109] = f[109] 
   out[110] = f[110] 
   out[111] = f[111] 
   out[112] = -1.0*f[112] 
   out[113] = f[113] 
   out[114] = -1.0*f[114] 
   out[115] = -1.0*f[115] 
   out[116] = -1.0*f[116] 
   out[117] = f[117] 
   out[118] = -1.0*f[118] 
   out[119] = -1.0*f[119] 
   out[120] = f[120] 
   out[121] = -1.0*f[121] 
   out[122] = f[122] 
   out[123] = f[123] 
   out[124] = -1.0*f[124] 
   out[125] = f[125] 
   out[126] = -1.0*f[126] 
   out[127] = -1.0*f[127] 
   out[128] = f[128] 
   out[129] = -1.0*f[129] 
   out[130] = -1.0*f[130] 
   out[131] = -1.0*f[131] 
   out[132] = f[132] 
   out[133] = -1.0*f[133] 
   out[134] = -1.0*f[134] 
   out[135] = -1.0*f[135] 
   out[136] = -1.0*f[136] 
   out[137] = -1.0*f[137] 
   out[138] = -1.0*f[138] 
   out[139] = f[139] 
   out[140] = -1.0*f[140] 
   out[141] = f[141] 
   out[142] = -1.0*f[142] 
   out[143] = -1.0*f[143] 
   out[144] = f[144] 
   out[145] = -1.0*f[145] 
   out[146] = -1.0*f[146] 
   out[147] = -1.0*f[147] 
   out[148] = f[148] 
   out[149] = -1.0*f[149] 
   out[150] = f[150] 
   out[151] = -1.0*f[151] 
   out[152] = f[152] 
   out[153] = f[153] 
   out[154] = -1.0*f[154] 
   out[155] = f[155] 
   out[156] = f[156] 
   out[157] = -1.0*f[157] 
   out[158] = -1.0*f[158] 
   out[159] = f[159] 
   out[160] = -1.0*f[160] 
   out[161] = f[161] 
   out[162] = f[162] 
   out[163] = f[163] 
   out[164] = -1.0*f[164] 
   out[165] = -1.0*f[165] 
   out[166] = -1.0*f[166] 
   out[167] = -1.0*f[167] 
   out[168] = -1.0*f[168] 
   out[169] = -1.0*f[169] 
   out[170] = -1.0*f[170] 
   out[171] = -1.0*f[171] 
   out[172] = -1.0*f[172] 
   out[173] = -1.0*f[173] 
   out[174] = -1.0*f[174] 
   out[175] = -1.0*f[175] 
   out[176] = -1.0*f[176] 
   out[177] = -1.0*f[177] 
   out[178] = f[178] 
   out[179] = -1.0*f[179] 
   out[180] = f[180] 
   out[181] = -1.0*f[181] 
   out[182] = -1.0*f[182] 
   out[183] = f[183] 
   out[184] = -1.0*f[184] 
   out[185] = -1.0*f[185] 
   out[186] = -1.0*f[186] 
   out[187] = f[187] 
   out[188] = -1.0*f[188] 
   out[189] = -1.0*f[189] 
   out[190] = -1.0*f[190] 
   out[191] = -1.0*f[191] 
   out[192] = -1.0*f[192] 
   end 
   if dir == 2  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = -1.0*f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = -1.0*f[7] 
   out[8] = f[8] 
   out[9] = -1.0*f[9] 
   out[10] = f[10] 
   out[11] = -1.0*f[11] 
   out[12] = f[12] 
   out[13] = f[13] 
   out[14] = -1.0*f[14] 
   out[15] = f[15] 
   out[16] = f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = -1.0*f[23] 
   out[24] = f[24] 
   out[25] = -1.0*f[25] 
   out[26] = -1.0*f[26] 
   out[27] = f[27] 
   out[28] = -1.0*f[28] 
   out[29] = f[29] 
   out[30] = -1.0*f[30] 
   out[31] = f[31] 
   out[32] = -1.0*f[32] 
   out[33] = f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = f[36] 
   out[37] = -1.0*f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = f[41] 
   out[42] = -1.0*f[42] 
   out[43] = f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = f[48] 
   out[49] = -1.0*f[49] 
   out[50] = f[50] 
   out[51] = f[51] 
   out[52] = f[52] 
   out[53] = -1.0*f[53] 
   out[54] = f[54] 
   out[55] = f[55] 
   out[56] = f[56] 
   out[57] = -1.0*f[57] 
   out[58] = -1.0*f[58] 
   out[59] = -1.0*f[59] 
   out[60] = f[60] 
   out[61] = -1.0*f[61] 
   out[62] = -1.0*f[62] 
   out[63] = f[63] 
   out[64] = -1.0*f[64] 
   out[65] = -1.0*f[65] 
   out[66] = f[66] 
   out[67] = f[67] 
   out[68] = f[68] 
   out[69] = f[69] 
   out[70] = -1.0*f[70] 
   out[71] = -1.0*f[71] 
   out[72] = f[72] 
   out[73] = -1.0*f[73] 
   out[74] = -1.0*f[74] 
   out[75] = f[75] 
   out[76] = f[76] 
   out[77] = f[77] 
   out[78] = f[78] 
   out[79] = -1.0*f[79] 
   out[80] = f[80] 
   out[81] = f[81] 
   out[82] = f[82] 
   out[83] = f[83] 
   out[84] = -1.0*f[84] 
   out[85] = f[85] 
   out[86] = -1.0*f[86] 
   out[87] = f[87] 
   out[88] = -1.0*f[88] 
   out[89] = f[89] 
   out[90] = -1.0*f[90] 
   out[91] = f[91] 
   out[92] = -1.0*f[92] 
   out[93] = -1.0*f[93] 
   out[94] = f[94] 
   out[95] = -1.0*f[95] 
   out[96] = f[96] 
   out[97] = -1.0*f[97] 
   out[98] = f[98] 
   out[99] = -1.0*f[99] 
   out[100] = f[100] 
   out[101] = f[101] 
   out[102] = -1.0*f[102] 
   out[103] = f[103] 
   out[104] = f[104] 
   out[105] = -1.0*f[105] 
   out[106] = f[106] 
   out[107] = f[107] 
   out[108] = f[108] 
   out[109] = -1.0*f[109] 
   out[110] = f[110] 
   out[111] = f[111] 
   out[112] = -1.0*f[112] 
   out[113] = -1.0*f[113] 
   out[114] = f[114] 
   out[115] = -1.0*f[115] 
   out[116] = -1.0*f[116] 
   out[117] = -1.0*f[117] 
   out[118] = f[118] 
   out[119] = -1.0*f[119] 
   out[120] = -1.0*f[120] 
   out[121] = f[121] 
   out[122] = f[122] 
   out[123] = f[123] 
   out[124] = f[124] 
   out[125] = -1.0*f[125] 
   out[126] = -1.0*f[126] 
   out[127] = f[127] 
   out[128] = -1.0*f[128] 
   out[129] = -1.0*f[129] 
   out[130] = -1.0*f[130] 
   out[131] = f[131] 
   out[132] = -1.0*f[132] 
   out[133] = -1.0*f[133] 
   out[134] = -1.0*f[134] 
   out[135] = -1.0*f[135] 
   out[136] = -1.0*f[136] 
   out[137] = -1.0*f[137] 
   out[138] = f[138] 
   out[139] = -1.0*f[139] 
   out[140] = f[140] 
   out[141] = -1.0*f[141] 
   out[142] = -1.0*f[142] 
   out[143] = f[143] 
   out[144] = -1.0*f[144] 
   out[145] = -1.0*f[145] 
   out[146] = -1.0*f[146] 
   out[147] = f[147] 
   out[148] = -1.0*f[148] 
   out[149] = f[149] 
   out[150] = -1.0*f[150] 
   out[151] = f[151] 
   out[152] = -1.0*f[152] 
   out[153] = f[153] 
   out[154] = f[154] 
   out[155] = -1.0*f[155] 
   out[156] = f[156] 
   out[157] = -1.0*f[157] 
   out[158] = f[158] 
   out[159] = -1.0*f[159] 
   out[160] = f[160] 
   out[161] = -1.0*f[161] 
   out[162] = f[162] 
   out[163] = -1.0*f[163] 
   out[164] = f[164] 
   out[165] = -1.0*f[165] 
   out[166] = -1.0*f[166] 
   out[167] = -1.0*f[167] 
   out[168] = -1.0*f[168] 
   out[169] = -1.0*f[169] 
   out[170] = -1.0*f[170] 
   out[171] = -1.0*f[171] 
   out[172] = -1.0*f[172] 
   out[173] = -1.0*f[173] 
   out[174] = -1.0*f[174] 
   out[175] = -1.0*f[175] 
   out[176] = -1.0*f[176] 
   out[177] = f[177] 
   out[178] = -1.0*f[178] 
   out[179] = f[179] 
   out[180] = -1.0*f[180] 
   out[181] = -1.0*f[181] 
   out[182] = f[182] 
   out[183] = -1.0*f[183] 
   out[184] = -1.0*f[184] 
   out[185] = -1.0*f[185] 
   out[186] = f[186] 
   out[187] = -1.0*f[187] 
   out[188] = -1.0*f[188] 
   out[189] = -1.0*f[189] 
   out[190] = -1.0*f[190] 
   out[191] = -1.0*f[191] 
   out[192] = -1.0*f[192] 
   end 
   if dir == 3  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = -1.0*f[4] 
   out[5] = f[5] 
   out[6] = f[6] 
   out[7] = f[7] 
   out[8] = -1.0*f[8] 
   out[9] = -1.0*f[9] 
   out[10] = f[10] 
   out[11] = f[11] 
   out[12] = -1.0*f[12] 
   out[13] = f[13] 
   out[14] = f[14] 
   out[15] = -1.0*f[15] 
   out[16] = f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = -1.0*f[22] 
   out[23] = f[23] 
   out[24] = -1.0*f[24] 
   out[25] = -1.0*f[25] 
   out[26] = f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = f[29] 
   out[30] = f[30] 
   out[31] = -1.0*f[31] 
   out[32] = f[32] 
   out[33] = f[33] 
   out[34] = -1.0*f[34] 
   out[35] = -1.0*f[35] 
   out[36] = f[36] 
   out[37] = f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = f[41] 
   out[42] = f[42] 
   out[43] = -1.0*f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = f[48] 
   out[49] = f[49] 
   out[50] = -1.0*f[50] 
   out[51] = f[51] 
   out[52] = f[52] 
   out[53] = f[53] 
   out[54] = -1.0*f[54] 
   out[55] = f[55] 
   out[56] = f[56] 
   out[57] = -1.0*f[57] 
   out[58] = -1.0*f[58] 
   out[59] = f[59] 
   out[60] = -1.0*f[60] 
   out[61] = -1.0*f[61] 
   out[62] = -1.0*f[62] 
   out[63] = -1.0*f[63] 
   out[64] = f[64] 
   out[65] = f[65] 
   out[66] = f[66] 
   out[67] = -1.0*f[67] 
   out[68] = -1.0*f[68] 
   out[69] = f[69] 
   out[70] = f[70] 
   out[71] = f[71] 
   out[72] = -1.0*f[72] 
   out[73] = -1.0*f[73] 
   out[74] = f[74] 
   out[75] = f[75] 
   out[76] = -1.0*f[76] 
   out[77] = -1.0*f[77] 
   out[78] = f[78] 
   out[79] = f[79] 
   out[80] = f[80] 
   out[81] = f[81] 
   out[82] = f[82] 
   out[83] = f[83] 
   out[84] = f[84] 
   out[85] = -1.0*f[85] 
   out[86] = f[86] 
   out[87] = -1.0*f[87] 
   out[88] = -1.0*f[88] 
   out[89] = f[89] 
   out[90] = f[90] 
   out[91] = -1.0*f[91] 
   out[92] = f[92] 
   out[93] = f[93] 
   out[94] = -1.0*f[94] 
   out[95] = -1.0*f[95] 
   out[96] = -1.0*f[96] 
   out[97] = -1.0*f[97] 
   out[98] = f[98] 
   out[99] = f[99] 
   out[100] = -1.0*f[100] 
   out[101] = f[101] 
   out[102] = f[102] 
   out[103] = -1.0*f[103] 
   out[104] = f[104] 
   out[105] = f[105] 
   out[106] = -1.0*f[106] 
   out[107] = f[107] 
   out[108] = f[108] 
   out[109] = f[109] 
   out[110] = -1.0*f[110] 
   out[111] = f[111] 
   out[112] = -1.0*f[112] 
   out[113] = -1.0*f[113] 
   out[114] = -1.0*f[114] 
   out[115] = f[115] 
   out[116] = -1.0*f[116] 
   out[117] = -1.0*f[117] 
   out[118] = -1.0*f[118] 
   out[119] = f[119] 
   out[120] = f[120] 
   out[121] = f[121] 
   out[122] = -1.0*f[122] 
   out[123] = -1.0*f[123] 
   out[124] = f[124] 
   out[125] = f[125] 
   out[126] = f[126] 
   out[127] = -1.0*f[127] 
   out[128] = -1.0*f[128] 
   out[129] = -1.0*f[129] 
   out[130] = f[130] 
   out[131] = -1.0*f[131] 
   out[132] = -1.0*f[132] 
   out[133] = -1.0*f[133] 
   out[134] = -1.0*f[134] 
   out[135] = -1.0*f[135] 
   out[136] = f[136] 
   out[137] = f[137] 
   out[138] = -1.0*f[138] 
   out[139] = -1.0*f[139] 
   out[140] = -1.0*f[140] 
   out[141] = -1.0*f[141] 
   out[142] = f[142] 
   out[143] = -1.0*f[143] 
   out[144] = -1.0*f[144] 
   out[145] = f[145] 
   out[146] = f[146] 
   out[147] = -1.0*f[147] 
   out[148] = -1.0*f[148] 
   out[149] = -1.0*f[149] 
   out[150] = -1.0*f[150] 
   out[151] = f[151] 
   out[152] = f[152] 
   out[153] = -1.0*f[153] 
   out[154] = f[154] 
   out[155] = f[155] 
   out[156] = -1.0*f[156] 
   out[157] = f[157] 
   out[158] = -1.0*f[158] 
   out[159] = -1.0*f[159] 
   out[160] = f[160] 
   out[161] = f[161] 
   out[162] = -1.0*f[162] 
   out[163] = -1.0*f[163] 
   out[164] = -1.0*f[164] 
   out[165] = f[165] 
   out[166] = -1.0*f[166] 
   out[167] = -1.0*f[167] 
   out[168] = -1.0*f[168] 
   out[169] = -1.0*f[169] 
   out[170] = -1.0*f[170] 
   out[171] = -1.0*f[171] 
   out[172] = -1.0*f[172] 
   out[173] = -1.0*f[173] 
   out[174] = -1.0*f[174] 
   out[175] = f[175] 
   out[176] = f[176] 
   out[177] = -1.0*f[177] 
   out[178] = -1.0*f[178] 
   out[179] = -1.0*f[179] 
   out[180] = -1.0*f[180] 
   out[181] = f[181] 
   out[182] = -1.0*f[182] 
   out[183] = -1.0*f[183] 
   out[184] = -1.0*f[184] 
   out[185] = f[185] 
   out[186] = -1.0*f[186] 
   out[187] = -1.0*f[187] 
   out[188] = -1.0*f[188] 
   out[189] = -1.0*f[189] 
   out[190] = -1.0*f[190] 
   out[191] = -1.0*f[191] 
   out[192] = -1.0*f[192] 
   end 
   if dir == 4  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = -1.0*f[5] 
   out[6] = f[6] 
   out[7] = f[7] 
   out[8] = f[8] 
   out[9] = f[9] 
   out[10] = -1.0*f[10] 
   out[11] = -1.0*f[11] 
   out[12] = -1.0*f[12] 
   out[13] = f[13] 
   out[14] = f[14] 
   out[15] = f[15] 
   out[16] = -1.0*f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = f[22] 
   out[23] = -1.0*f[23] 
   out[24] = -1.0*f[24] 
   out[25] = -1.0*f[25] 
   out[26] = f[26] 
   out[27] = f[27] 
   out[28] = f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = f[32] 
   out[33] = f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = f[36] 
   out[37] = f[37] 
   out[38] = -1.0*f[38] 
   out[39] = -1.0*f[39] 
   out[40] = -1.0*f[40] 
   out[41] = f[41] 
   out[42] = f[42] 
   out[43] = f[43] 
   out[44] = f[44] 
   out[45] = f[45] 
   out[46] = f[46] 
   out[47] = f[47] 
   out[48] = f[48] 
   out[49] = f[49] 
   out[50] = f[50] 
   out[51] = -1.0*f[51] 
   out[52] = f[52] 
   out[53] = f[53] 
   out[54] = f[54] 
   out[55] = -1.0*f[55] 
   out[56] = f[56] 
   out[57] = -1.0*f[57] 
   out[58] = f[58] 
   out[59] = -1.0*f[59] 
   out[60] = -1.0*f[60] 
   out[61] = -1.0*f[61] 
   out[62] = f[62] 
   out[63] = f[63] 
   out[64] = f[64] 
   out[65] = -1.0*f[65] 
   out[66] = -1.0*f[66] 
   out[67] = -1.0*f[67] 
   out[68] = -1.0*f[68] 
   out[69] = -1.0*f[69] 
   out[70] = -1.0*f[70] 
   out[71] = f[71] 
   out[72] = f[72] 
   out[73] = f[73] 
   out[74] = f[74] 
   out[75] = f[75] 
   out[76] = f[76] 
   out[77] = f[77] 
   out[78] = f[78] 
   out[79] = f[79] 
   out[80] = -1.0*f[80] 
   out[81] = -1.0*f[81] 
   out[82] = -1.0*f[82] 
   out[83] = f[83] 
   out[84] = f[84] 
   out[85] = f[85] 
   out[86] = f[86] 
   out[87] = f[87] 
   out[88] = f[88] 
   out[89] = -1.0*f[89] 
   out[90] = -1.0*f[90] 
   out[91] = -1.0*f[91] 
   out[92] = f[92] 
   out[93] = f[93] 
   out[94] = f[94] 
   out[95] = f[95] 
   out[96] = f[96] 
   out[97] = f[97] 
   out[98] = -1.0*f[98] 
   out[99] = -1.0*f[99] 
   out[100] = -1.0*f[100] 
   out[101] = -1.0*f[101] 
   out[102] = -1.0*f[102] 
   out[103] = -1.0*f[103] 
   out[104] = f[104] 
   out[105] = f[105] 
   out[106] = f[106] 
   out[107] = -1.0*f[107] 
   out[108] = f[108] 
   out[109] = f[109] 
   out[110] = f[110] 
   out[111] = -1.0*f[111] 
   out[112] = -1.0*f[112] 
   out[113] = -1.0*f[113] 
   out[114] = -1.0*f[114] 
   out[115] = -1.0*f[115] 
   out[116] = f[116] 
   out[117] = f[117] 
   out[118] = f[118] 
   out[119] = f[119] 
   out[120] = -1.0*f[120] 
   out[121] = -1.0*f[121] 
   out[122] = -1.0*f[122] 
   out[123] = -1.0*f[123] 
   out[124] = -1.0*f[124] 
   out[125] = -1.0*f[125] 
   out[126] = f[126] 
   out[127] = f[127] 
   out[128] = f[128] 
   out[129] = f[129] 
   out[130] = -1.0*f[130] 
   out[131] = -1.0*f[131] 
   out[132] = -1.0*f[132] 
   out[133] = f[133] 
   out[134] = f[134] 
   out[135] = f[135] 
   out[136] = -1.0*f[136] 
   out[137] = -1.0*f[137] 
   out[138] = -1.0*f[138] 
   out[139] = -1.0*f[139] 
   out[140] = -1.0*f[140] 
   out[141] = -1.0*f[141] 
   out[142] = -1.0*f[142] 
   out[143] = -1.0*f[143] 
   out[144] = -1.0*f[144] 
   out[145] = f[145] 
   out[146] = f[146] 
   out[147] = f[147] 
   out[148] = f[148] 
   out[149] = f[149] 
   out[150] = f[150] 
   out[151] = -1.0*f[151] 
   out[152] = -1.0*f[152] 
   out[153] = -1.0*f[153] 
   out[154] = -1.0*f[154] 
   out[155] = -1.0*f[155] 
   out[156] = -1.0*f[156] 
   out[157] = f[157] 
   out[158] = f[158] 
   out[159] = f[159] 
   out[160] = -1.0*f[160] 
   out[161] = -1.0*f[161] 
   out[162] = -1.0*f[162] 
   out[163] = -1.0*f[163] 
   out[164] = -1.0*f[164] 
   out[165] = -1.0*f[165] 
   out[166] = f[166] 
   out[167] = -1.0*f[167] 
   out[168] = -1.0*f[168] 
   out[169] = -1.0*f[169] 
   out[170] = -1.0*f[170] 
   out[171] = -1.0*f[171] 
   out[172] = f[172] 
   out[173] = f[173] 
   out[174] = f[174] 
   out[175] = -1.0*f[175] 
   out[176] = -1.0*f[176] 
   out[177] = -1.0*f[177] 
   out[178] = -1.0*f[178] 
   out[179] = -1.0*f[179] 
   out[180] = -1.0*f[180] 
   out[181] = -1.0*f[181] 
   out[182] = -1.0*f[182] 
   out[183] = -1.0*f[183] 
   out[184] = f[184] 
   out[185] = -1.0*f[185] 
   out[186] = -1.0*f[186] 
   out[187] = -1.0*f[187] 
   out[188] = -1.0*f[188] 
   out[189] = -1.0*f[189] 
   out[190] = -1.0*f[190] 
   out[191] = -1.0*f[191] 
   out[192] = -1.0*f[192] 
   end 
   if dir == 5  then 
   out[1] = f[1] 
   out[2] = f[2] 
   out[3] = f[3] 
   out[4] = f[4] 
   out[5] = f[5] 
   out[6] = -1.0*f[6] 
   out[7] = f[7] 
   out[8] = f[8] 
   out[9] = f[9] 
   out[10] = f[10] 
   out[11] = f[11] 
   out[12] = f[12] 
   out[13] = -1.0*f[13] 
   out[14] = -1.0*f[14] 
   out[15] = -1.0*f[15] 
   out[16] = -1.0*f[16] 
   out[17] = f[17] 
   out[18] = f[18] 
   out[19] = f[19] 
   out[20] = f[20] 
   out[21] = f[21] 
   out[22] = f[22] 
   out[23] = f[23] 
   out[24] = f[24] 
   out[25] = f[25] 
   out[26] = -1.0*f[26] 
   out[27] = -1.0*f[27] 
   out[28] = -1.0*f[28] 
   out[29] = -1.0*f[29] 
   out[30] = -1.0*f[30] 
   out[31] = -1.0*f[31] 
   out[32] = f[32] 
   out[33] = f[33] 
   out[34] = f[34] 
   out[35] = f[35] 
   out[36] = f[36] 
   out[37] = f[37] 
   out[38] = f[38] 
   out[39] = f[39] 
   out[40] = f[40] 
   out[41] = f[41] 
   out[42] = f[42] 
   out[43] = f[43] 
   out[44] = -1.0*f[44] 
   out[45] = -1.0*f[45] 
   out[46] = -1.0*f[46] 
   out[47] = -1.0*f[47] 
   out[48] = f[48] 
   out[49] = f[49] 
   out[50] = f[50] 
   out[51] = f[51] 
   out[52] = f[52] 
   out[53] = f[53] 
   out[54] = f[54] 
   out[55] = f[55] 
   out[56] = -1.0*f[56] 
   out[57] = f[57] 
   out[58] = -1.0*f[58] 
   out[59] = -1.0*f[59] 
   out[60] = -1.0*f[60] 
   out[61] = -1.0*f[61] 
   out[62] = f[62] 
   out[63] = f[63] 
   out[64] = f[64] 
   out[65] = f[65] 
   out[66] = f[66] 
   out[67] = f[67] 
   out[68] = f[68] 
   out[69] = f[69] 
   out[70] = f[70] 
   out[71] = f[71] 
   out[72] = f[72] 
   out[73] = f[73] 
   out[74] = -1.0*f[74] 
   out[75] = -1.0*f[75] 
   out[76] = -1.0*f[76] 
   out[77] = -1.0*f[77] 
   out[78] = -1.0*f[78] 
   out[79] = -1.0*f[79] 
   out[80] = -1.0*f[80] 
   out[81] = -1.0*f[81] 
   out[82] = -1.0*f[82] 
   out[83] = -1.0*f[83] 
   out[84] = -1.0*f[84] 
   out[85] = -1.0*f[85] 
   out[86] = f[86] 
   out[87] = f[87] 
   out[88] = f[88] 
   out[89] = f[89] 
   out[90] = f[90] 
   out[91] = f[91] 
   out[92] = f[92] 
   out[93] = f[93] 
   out[94] = f[94] 
   out[95] = f[95] 
   out[96] = f[96] 
   out[97] = f[97] 
   out[98] = f[98] 
   out[99] = f[99] 
   out[100] = f[100] 
   out[101] = f[101] 
   out[102] = f[102] 
   out[103] = f[103] 
   out[104] = -1.0*f[104] 
   out[105] = -1.0*f[105] 
   out[106] = -1.0*f[106] 
   out[107] = -1.0*f[107] 
   out[108] = -1.0*f[108] 
   out[109] = -1.0*f[109] 
   out[110] = -1.0*f[110] 
   out[111] = -1.0*f[111] 
   out[112] = -1.0*f[112] 
   out[113] = f[113] 
   out[114] = f[114] 
   out[115] = f[115] 
   out[116] = f[116] 
   out[117] = -1.0*f[117] 
   out[118] = -1.0*f[118] 
   out[119] = -1.0*f[119] 
   out[120] = -1.0*f[120] 
   out[121] = -1.0*f[121] 
   out[122] = -1.0*f[122] 
   out[123] = -1.0*f[123] 
   out[124] = -1.0*f[124] 
   out[125] = -1.0*f[125] 
   out[126] = -1.0*f[126] 
   out[127] = -1.0*f[127] 
   out[128] = -1.0*f[128] 
   out[129] = f[129] 
   out[130] = f[130] 
   out[131] = f[131] 
   out[132] = f[132] 
   out[133] = f[133] 
   out[134] = f[134] 
   out[135] = f[135] 
   out[136] = f[136] 
   out[137] = f[137] 
   out[138] = f[138] 
   out[139] = f[139] 
   out[140] = f[140] 
   out[141] = f[141] 
   out[142] = f[142] 
   out[143] = f[143] 
   out[144] = f[144] 
   out[145] = -1.0*f[145] 
   out[146] = -1.0*f[146] 
   out[147] = -1.0*f[147] 
   out[148] = -1.0*f[148] 
   out[149] = -1.0*f[149] 
   out[150] = -1.0*f[150] 
   out[151] = -1.0*f[151] 
   out[152] = -1.0*f[152] 
   out[153] = -1.0*f[153] 
   out[154] = -1.0*f[154] 
   out[155] = -1.0*f[155] 
   out[156] = -1.0*f[156] 
   out[157] = -1.0*f[157] 
   out[158] = -1.0*f[158] 
   out[159] = -1.0*f[159] 
   out[160] = -1.0*f[160] 
   out[161] = -1.0*f[161] 
   out[162] = -1.0*f[162] 
   out[163] = -1.0*f[163] 
   out[164] = -1.0*f[164] 
   out[165] = -1.0*f[165] 
   out[166] = -1.0*f[166] 
   out[167] = f[167] 
   out[168] = f[168] 
   out[169] = f[169] 
   out[170] = f[170] 
   out[171] = f[171] 
   out[172] = -1.0*f[172] 
   out[173] = -1.0*f[173] 
   out[174] = -1.0*f[174] 
   out[175] = -1.0*f[175] 
   out[176] = -1.0*f[176] 
   out[177] = -1.0*f[177] 
   out[178] = -1.0*f[178] 
   out[179] = -1.0*f[179] 
   out[180] = -1.0*f[180] 
   out[181] = -1.0*f[181] 
   out[182] = -1.0*f[182] 
   out[183] = -1.0*f[183] 
   out[184] = -1.0*f[184] 
   out[185] = -1.0*f[185] 
   out[186] = -1.0*f[186] 
   out[187] = -1.0*f[187] 
   out[188] = -1.0*f[188] 
   out[189] = -1.0*f[189] 
   out[190] = -1.0*f[190] 
   out[191] = -1.0*f[191] 
   out[192] = -1.0*f[192] 
   end 
end 
return _M 
