Mathc initiation/c77e

Un livre de Wikilivres.


Sommaire


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

c01d.c
/* ------------------------------------ */
/*  Save as :   c01e.c                  */
/* ------------------------------------ */
#include "x_hfile.h"
#include       "fa.h"
/* ------------------------------------ */
int main(void)
{
double  Lfax2 = fax2(10000);
double   Lfbx =  fbx(100000000);
double    Lfc =   fc(10000);

 clrscrn();
 printf(" The curve y = ax**2 + bx + c     (a!=0)       \n\n\n" 
        " is a branch of the curve of f at +oo if     \n\n\n\n" 
        "                 lim    f(x)                       \n" 
        "                 x->+oo ----  = a                  \n" 
        "                        x**2                   \n\n\n" 
        "                 lim    [f(x)-ax**2]               \n" 
        "          and    x->+oo ---------   = b            \n" 
        "                            x                  \n\n\n" 
        "                 lim    [f(x)-ax**2-bx] = c        \n" 
        "          and    x->+oo                        \n\n\n"); 
 stop();

 
 clrscrn(); 
 printf(" f : x-> %s\n\n\n", feq);
 printf("             lim    f(x)            \n");
 printf("         a = x->+oo ----      = %.8f\n", Lfax2); 
 printf("                     x**2         \n\n\n");

 printf("         b = lim   [f(x)-a*x**2] = %.8f\n",  Lfbx); 
 printf("             x->+oo           \n\n\n");
 
 
 printf("         c = lim   [f(x)-ax**2-bx] = %.8f\n", Lfc); 
 printf("             x->+oo           \n\n\n");


 printf(" The curve y = %.1f x**2 %+.1f x %+.1f",
          Lfax2, Lfbx, Lfc);
 printf(" is an asymptote at the curve of f at +oo \n\n\n"); 
              
 stop();

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


  Fichier de commande gnuplot :
# ---------------------
# Copy and past this file into the screen of gnuplot
#
#
set zeroaxis lt 3 lw 1
 plot [-20.:15.] [-30.:60.]\
        ((x**6+x**4)/(x**4-x-1)) + 10*x,\
           x**2+10*x+1 
 reset
# ---------------------


Exemple de sortie écran :

 The curve y = ax**2 + bx + c     (a!=0)       


 is a branch of the curve of f at +oo if     



                 lim    f(x)                       
                 x->+oo ----  = a                  
                        x**2                   


                 lim    [f(x)-ax**2]               
          and    x->+oo ---------   = b            
                            x                  


                 lim    [f(x)-ax**2-bx] = c        
          and    x->+oo                        


 Press return to continue. 


**************************


 f : x-> ((x**6+x**4)/(x**4-x-1)) + 10*x


             lim    f(x)            
         a = x->+oo ----      = 1.00100001
                     x**2         


         b = lim   [f(x)-a*x**2] = 10.00000002
             x->+oo           


         c = lim   [f(x)-ax**2-bx] = 1.00010000
             x->+oo           


 The curve y = 1.0 x**2 +10.0 x +1.0 is an asymptote at the curve of f at +oo 


 Press return to continue.