123 int dimension = xp.
size() ;
125 double x1 = (xp(0) -
xo)*
dir[0] ;
126 double y1 = (xp(1) -
yo)*
dir[1] ;
128 if (dimension == 3 ) z1 = (xp(2) -
zo)*
dir[2] ;
129 double scale = sqrt(x1*x1 + y1*y1 + z1*z1);
134 if (k == 0 ) cor_dir = std::fabs(x1)/scale ;
135 if (k == 1 ) cor_dir = std::fabs(y1)/scale ;
136 if (k == 2 ) cor_dir = std::fabs(z1)/scale ;