Aller au contenu

Mathc initiation/Fichiers h : c50fb

Un livre de Wikilivres.


Sommaire

Installer ce fichier dans votre répertoire de travail.

kcircle.h
/* --------------------------------- */
/* save as  kcircle.h                */
/* --------------------------------- */
void circle(
Circlevalue c
)
{
FILE   *fp = fopen("a_circle","w");
double   t =-c.step;
        
 for(;(t+=c.step)<2.01*PI;)
 
     fprintf(fp," %6.5f   %6.5f\n",
                c.radius*cos(t)+c.cx,
                c.radius*sin(t)+c.cy);
      fclose(fp);
}
/* --------------------------------- */
/* --------------------------------- */