Алгоритм Робертса, видимость граней тетраэдра

bool Visible_Side (double* p1, double* p2, double* p3)
{
 
     //cоздаю нормаль
        double* d1 = Make_Vector (p2,p1);
        double* d2 = Make_Vector (p2,p3);
        double* n2 =  CrossProduct(d1, d2);
        double* n = Normalize (n2);
 
 
     //вектор наблюдателя
         double camera[3]={0,0,100};
 
         double sum=0;
         for (int i=0; i<3; i++)
               sum+=camera[i]*n[i];
 
        delete d1;
        delete d2;
        delete camera;
        delete n;
        delete n2;
 
        if (sum<0) return true;
        else return false;
}
 
double* Make_Vector (double* p1, double* p2)
{
        double* p = new double[3];
        for (int i=0; i<3; i++)
                p[i]=p1[i]-p2[i];
        return p;
}
 
double* CrossProduct (double* d1, double* d2)
{
        double* p = new double[3];
 
        p[0]=d1[1]*d2[2]-d1[2]*d2[1];
        p[1]=d1[2]*d2[0]-d1[0]*d2[2];
        p[2]=d1[0]*d2[1]-d1[1]*d2[0];
 
        return p;
}
 
 double* Normalize (double* p)
 {
        double* p2 = new double[3];
        double l = sqrt(p[0]*p[0]+p[1]*p[1]+p[2]*p[2]);
        for (int i=0; i<3; i++)
                p2[i]=p[i]/l;
        return p2;
 }