Aller au contenu

Mathc initiation/a174

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.


Texte de la légende
fa.h
/* --------------------------------- */
/* save as fa.h                      */
/* --------------------------------- */
#define A_1 +3.
#define R   +2.
/* --------------------------------- */
double a_n(
int n)
{
        return(  A_1*pow(R,(n-1)));
}
char  a_neq[] =  "a_1 r**(n-1)";
/* --------------------------------- */
/* --------------------------------- */
far.h
/* --------------------------------- */
/* save as far.h                     */
/* --------------------------------- */
#define R   +2.
/* --------------------------------- */
double a_n(
double a)
{
        return(   a*R);
}
char eqa_n[] =   "r";
/* --------------------------------- */
/* --------------------------------- */
fb.h
/* --------------------------------- */
/* save as fb.h                      */
/* --------------------------------- */
#define A_1 -336.
#define R   +1./3.
/* --------------------------------- */
double a_n(
int n)
{
        return(  A_1*pow(R,(n-1)));
}
char  a_neq[] =  "a_1 r**(n-1)";
/* --------------------------------- */
/* --------------------------------- */
fbr.h
/* --------------------------------- */
/* save as fbr.h                     */
/* --------------------------------- */
#define R   +1./3.
/* --------------------------------- */
double a_n(
double a)
{
        return(   a*R);
}
char eqa_n[] =   "r";
/* --------------------------------- */
/* --------------------------------- */