Aller au contenu

Mathc initiation/Fichiers h : c59aa

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.

x_nxy.h
/* ---------------------------------- */
/* save as x_nxy.h                     */
/* ---------------------------------- */
/*           (-f_xi-f_yj+k)           
        n =  ------------            
           [(f_x)^2+(f_y)^2+1]^1/2 

*/
/* ---------------------------------- */
v3d Ngradian_ijk(

double (*P_f)(double x, double y),           /* g(x,y,z) = z - f(x,y) */

pt2d p
)
{
v3d  Ngrd;
double  N;

          N = sqrt( pow(fxy_x((*P_f),H,p),2) +
                    pow(fxy_y((*P_f),H,p),2) +
                     1);

     Ngrd.i =  - fxy_x((*P_f),H,p) / N;
     Ngrd.j =  - fxy_y((*P_f),H,p) / N;
     Ngrd.k =                    1 / N;

     return(Ngrd);
}
/* ---------------------------------- */
/* ---------------------------------- */


Déclaration des fichiers h.