(*vlakvergelijking *) vlak^.array[0, 0] := 0; vlak^.array[0, 1] := 0; vlak^.array[0, 2] := 0; vlak^.array[0, 3] := 1; vlak^.array[1, 0] := A^.array[0]; vlak^.array[1, 1] := A^.array[1]; vlak^.array[1, 2] := A^.array[2]; vlak^.array[1, 3] := 1; vlak^.array[2, 0] := B^.array[0]; vlak^.array[2, 1] := B^.array[1]; vlak^.array[2, 2] := B^.array[2]; vlak^.array[2, 3] := 1; vlak^.array[3, 0] := C^.array[0]; vlak^.array[3, 1] := C^.array[1]; vlak^.array[3, 2] := C^.array[2]; vlak^.array[3, 3] := 1; OF (*vlakvergelijking *) vlak^.array[0, 0] := 0; vlak^.array[1, 0] := 0; vlak^.array[2, 0] := 0; vlak^.array[3, 0] := 1; vlak^.array[0, 1] := A^.array[0]; vlak^.array[1, 1] := A^.array[1]; vlak^.array[2, 1] := A^.array[2]; vlak^.array[3, 1] := 1; vlak^.array[0, 2] := B^.array[0]; vlak^.array[1, 2] := B^.array[1]; vlak^.array[2, 2] := B^.array[2]; vlak^.array[3, 2] := 1; vlak^.array[0, 3] := C^.array[0]; vlak^.array[1, 3] := C^.array[1]; vlak^.array[2, 3] := C^.array[2]; vlak^.array[3, 3] := 1; ZO: matrix.matrix[0,0] := 0.0; matrix.matrix[1,0] := 0.0; matrix.matrix[2,0] := 0.0; matrix.matrix[3,0] := 1.0; matrix.matrix[0,1] := A^.vector[0]; matrix.matrix[1,1] := A^.vector[1]; matrix.matrix[2,1] := A^.vector[2]; matrix.matrix[3,1] := 1.0; matrix.matrix[0,2] := B^.vector[0]; matrix.matrix[1,2] := B^.vector[1]; matrix.matrix[2,2] := B^.vector[2]; matrix.matrix[3,2] := 1.0; matrix.matrix[0,3] := C^.vector[0]; matrix.matrix[1,3] := C^.vector[1]; matrix.matrix[2,3] := C^.vector[2]; matrix.matrix[3,3] := 1.0; matrix^.Getabck(a, b, c, k);