//matriz com os pontos P
#declare nk= 6;
#declare na = 4;
#declare P = array[nk][na][4];
//quadro 0
//Arco 1
#declare P[0][0][0] = <0,0,0>;
#declare P[0][0][1] = <0,1,-2>;
#declare P[0][0][2] = <0,3,-2>;
#declare P[0][0][3] = <0,4,0>;

//Arco 2
#declare P[0][1][0] = <0,4,0>;
#declare P[0][1][1] = <0,4,2>; 
#declare P[0][1][2] = <1,0,2>;
#declare P[0][1][3] = <1,0,4>;

//Arco 3
#declare P[0][2][0] = <1,0,4>;
#declare P[0][2][1] = <0,1,6>; 
#declare P[0][2][2] = <0,3,6>;
#declare P[0][2][3] = <-1,4,4>;

//Arco 4
#declare P[0][3][0] = <-1,4,4>;
#declare P[0][3][1] = <-1,0,2>; 
#declare P[0][3][2] = <0,4,2>;
#declare P[0][3][3] = <0,0,0>;

//quadro 1
//Arco 1
#declare P[1][0][0] = <0,3,0>;
#declare P[1][0][1] = <0,3,-2>;
#declare P[1][0][2] = <0,6,-2>;
#declare P[1][0][3] = <0,7,0>;

//Arco 2
#declare P[1][1][0] = <0,6,0>;
#declare P[1][1][1] = <0,6,2>; 
#declare P[1][1][2] = <1,2,2>;
#declare P[1][1][3] = <1,2,4>;

//Arco 3
#declare P[1][2][0] = <1,4,4>;
#declare P[1][2][1] = <0,5,6>; 
#declare P[1][2][2] = <0,7,6>;
#declare P[1][2][3] = <-1,8,4>;

//Arco 4
#declare P[1][3][0] = <-1,8,4>;
#declare P[1][3][1] = <-1,4,2>; 
#declare P[1][3][2] = <0,6,2>;
#declare P[1][3][3] = <0,2,0>;

//quadro 2
//Arco 1
#declare P[2][0][0] = <0,0,2>;
#declare P[2][0][1] = <0,1,0>;
#declare P[2][0][2] = <0,3,0>;
#declare P[2][0][3] = <0,4,2>;

//Arco 2
#declare P[2][1][0] = <0,4,2>;
#declare P[2][1][1] = <0,4,4>; 
#declare P[2][1][2] = <1,0,6>;
#declare P[2][1][3] = <1,0,6>;

//Arco 3
#declare P[2][2][0] = <1,0,4>;
#declare P[2][2][1] = <0,1,6>; 
#declare P[2][2][2] = <0,3,6>;
#declare P[2][2][3] = <-1,4,4>;

//Arco 4
#declare P[2][3][0] = <-1,4,6>;
#declare P[2][3][1] = <-1,0,4>; 
#declare P[2][3][2] = <0,4,4>;
#declare P[2][3][3] = <0,0,2>;

//quadro 3
//Arco 1
#declare P[3][0][0] = <0,0,2>;
#declare P[3][0][1] = <0,1,0>;
#declare P[3][0][2] = <0,3,0>;
#declare P[3][0][3] = <0,4,2>;

//Arco 2
#declare P[3][1][0] = <0,4,2>;
#declare P[3][1][1] = <0,4,4>; 
#declare P[3][1][2] = <1,0,6>;
#declare P[3][1][3] = <1,0,6>;

//Arco 3
#declare P[3][2][0] = <1,0,4>;
#declare P[3][2][1] = <0,1,6>; 
#declare P[3][2][2] = <0,3,6>;
#declare P[3][2][3] = <-1,4,4>;

//Arco 4
#declare P[3][3][0] = <-1,4,6>;
#declare P[3][3][1] = <-1,0,4>; 
#declare P[3][3][2] = <0,4,4>;
#declare P[3][3][3] = <0,0,2>;

//quadro 4
//Arco 1
#declare P[4][0][0] = <0,0,0>;
#declare P[4][0][1] = <0,1,-2>;
#declare P[4][0][2] = <0,3,-2>;
#declare P[4][0][3] = <0,0,0>;

//Arco 2
#declare P[4][1][0] = <0,0,0>;
#declare P[4][1][1] = <0,-1,2>; 
#declare P[4][1][2] = <0,-3,2>;
#declare P[4][1][3] = <0,0,0>;

//Arco 3
#declare P[4][2][0] = <0,0,0>;
#declare P[4][2][1] = <0,2,4>; 
#declare P[4][2][2] = <0,3,6>;
#declare P[4][2][3] = <0,0,0>;

//Arco 4
#declare P[4][3][0] = <0,0,0>;
#declare P[4][3][1] = <0,-2,-4>; 
#declare P[4][3][2] = <0,-3,-6>;
#declare P[4][3][3] = <0,0,0>;

//quadro 5
//Arco 1
#declare P[5][0][0] = <0,0,0>;
#declare P[5][0][1] = <0,1,-2>;
#declare P[5][0][2] = <0,3,-2>;
#declare P[5][0][3] = <0,0,0>;

//Arco 2
#declare P[5][1][0] = <0,0,0>;
#declare P[5][1][1] = <0,-1,2>; 
#declare P[5][1][2] = <0,-3,2>;
#declare P[5][1][3] = <0,0,0>;

//Arco 3
#declare P[5][2][0] = <0,0,0>;
#declare P[5][2][1] = <0,2,4>; 
#declare P[5][2][2] = <0,3,6>;
#declare P[5][2][3] = <0,0,0>;

//Arco 4
#declare P[5][3][0] = <0,0,0>;
#declare P[5][3][1] = <0,-2,-4>; 
#declare P[5][3][2] = <0,-3,-6>;
#declare P[5][3][3] = <0,0,0>;

#declare R = array[4][4];
#for(i, 0, 3, 1)
	#for(j, 0, 3, 1)
		#declare R[i][j] = <0,0,0>;
	#end
#end