Aller au contenu

Mathc initiation/a285

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.

k_tan.h
/* ------------------------------------ */
/*  Save as :    k_tan.h                */
/* ------------------------------------
   y = ax + b   


   a = f'(x)

   b = y    - a     x
   b = y    - f'(x) x
   b = f(x) - f'(x) x

   x=c
   a = f'(c)
   b = f(c) - f'(c) c
   ------------------------------------ */
void eq_tan(
double    t,
double (*P_r)(double t)
)
{
 printf(" %0.9f*t %+0.9f\n\n\n", 
 
/*   a = r'(t)                               */
         dy_dx((*P_r), t, H),
         
/*            y          -       f'(x)                 x
   b =    r(t)*sin(t)    -       r'(t)         *   r(t)*cos(t) */
        (*P_r)(t)*sin(t) - dy_dx((*P_r), t, H) * (*P_r)(t)*cos(t) );
}
/* ------------------------------------ */
/* ------------------------------------ */