Mathc initiation/Fichiers c : c77ch


Sommaire


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

c1h.c
/* --------------------------------- */
/* save as c1h.c                     */
/* --------------------------------- */
#include "x_hfile.h"
#include      "fh.h"
/* --------------------------------- */
int main(void)
{
double x  = 1.8;

 clrscrn();
 
 printf("  x =  %0.1f   \n\n\n",x);
 
 printf("  %s \t\t\t= %0.8f    \n", f1eq, f1(x));
 printf("  %s \t= %0.8f\n\n\n",         f2eq, f2(x));
 

 stop();

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


Vérifions par le calcul :
  x =  1.8   


  cos(4*x) 			            = 0.60835131    
  8*cos(x)**4 -8*cos(x)**2 + 1 	= 0.60835131


 Press return to continue.


Vérifions les égalités :
    Nous avons vu que :
    
    cos(x+y) = cos(x) cos(y) - sin(x) sin(y)
    
    posons :
    
    cos(3x+y) = cos(3x) cos(y) - sin(3x) sin(y)

    posons x = y
    
    cos(4x) = cos(3x)cos(x) - sin(3x)sin(x)                     cos(3x) = 4cos(x)**3-3cos(x)
                                                                sin(3x) = 3sin(x)-4sin(x)**3


    cos(4x) = [4cos(x)**3- 3cos(x)] cos(x) - [3sin(x)   -4sin(x)**3] sin(x)  

    cos(4x) = [4cos(x)**4- 3cos(x)**2]     - [3sin(x)**2-4sin(x)**4]  


                                           cos(x)**2 + sin(x)**2 =   1
                                                       sin(x)**2 =   1 -cos(x)**2
                                                                  
                                                    (3sin(x)**2) = 3(    sin(x)**2)
                                                                 = 3(1 - cos(x)**2)
                                                                 =  (3 -3cos(x)**2)
                                                                  
                                                    (4sin(x)**4) =  4(   sin(x)**2)**2 
                                                                 =  4(1 -cos(x)**2)**2
                                                                 =  4(1-2cos**2+ cos(x)**4)
                                                                 =   (4-8cos**2+4cos(x)**4)

                                                                  
                                                                  
    cos(4x) = [4cos(x)**4-3cos(x)**2]-[(3sin(x)**2)-(4sin(x)**4)] 

    cos(4x) = [4cos(x)**4-3cos(x)**2]-[(3 -3cos(x)**2)-(4-8cos**2+4cos(x)**4)]    
    
    cos(4x) = [4cos(x)**4-3cos(x)**2]-[ 3 -3cos(x)**2 - 4+8cos**2-4cos(x)**4]
    
    cos(4x) =  4cos(x)**4-3cos(x)**2 -  3 +3cos(x)**2 + 4-8cos**2+4cos(x)**4    
    
    cos(4x) =  8cos(x)**4 -8cos(x)**2 + 1