Mathc initiation/Fichiers h : c51fb
Apparence
Installer ce fichier dans votre répertoire de travail.
kradius.h |
---|
/* --------------------------------- */
/* save as kradius.h */
/* --------------------------------- */
void radius(
double (*P_f)(double t),
double (*P_g)(double t),
double t
)
{
FILE *fp;
fp = fopen("a_radius","w");
fprintf(fp," %6.5f 1.000\n",t);
fprintf(fp," %6.5f %6.5f\n",(*P_f)(t),(*P_g)(t));
fclose(fp);
}
/* --------------------------------- */
/* --------------------------------- */