Mathc initiation/a351

Sommaire

Installer et compiler ces fichiers dans votre répertoire de travail.

	c00a3.c

/* ---------------------------------- */
/* save as c00a3.c                    */
/* ---------------------------------- */
#include  "x_hfile.h"
#include       "fa.h"
/* ---------------------------------- */
int main(void)
{
double c = 1;

CTRL_splot w;

w.xmin = -2.0; w.xmax = +3.0,
w.ymin = -9.0; w.ymax = +2.0;

 clrscrn();
 
 printf("  f : x-> %s\n\n",  feq);
 printf(" Df : x-> %s\n\n\n",Dfeq);

 printf(" With c = %0.3f, the equation of the tangent is :\n\n",c);
 printf("       y =  Df(c) (x-c) + f(c) = ");
 
 eq_Tan(  c,
          f,Df );
          
 printf("\n\n\n"
        " Find at c = %0.3f\n\n",c);
 printf(" the intersection points of the tangent with the x-y axis.\n\n\n");

 printf(" P(%6.3f, %6.3f)          P(c, f(c))\n", 
        c, f(c));

 printf(" A(%6.3f, 0)               A(c-f(c)/Df(c), 0)\n",
        c-(f(c))/(Df(c)));

 printf(" B( 0, %6.3f)              B(0, f(c)-c Df(c))\n",
        f(c)-((Df(c))*c));
                         
      G_Tan_xy(  w,     
                 c,
                 f,feq,Df);

 printf("\n\n"
        " With gnuplot... load \"a_main.plt\"\n\n"); 
 stop();

 return 0;
}
/* --------------------------------- */
/* --------------------------------- */

Exemple de sortie écran :

  f : x-> 3.0*x**2 - 2.0*x - 5.0

 Df : x-> 6.0*x - 2.0


 With c = 1.000, the equation of the tangent is :

       y =  Df(c) (x-c) + f(c) =  4.000*x -8.000


 Find at c = 1.000

 the intersection points of the tangent with the x-y axis.


 P( 1.000, -4.000)          P(c, f(c))
 A( 2.000, 0)               A(c-f(c)/Df(c), 0)
 B( 0, -8.000)              B(0, f(c)-c Df(c))


 With gnuplot... load "a_main.plt"

 Press return to continue.