Download An Integrated System Dynamics Model for

Transcript
//
}
//
flag = 0;
return dataStore[(int)(x-1)];
}
double counter =1.0;
double writing(double a1, double a2, double a3,double a4, double a5, double a6,double a7, double a8, double a9,double a10,
double a11, double a12,double a13, double a14, double a15,double a16, double a17, double a18,double a19, double a20,
double a21,double a22, double a23, double a24,double a25, double a26, double a27,double a28, double a29, double
a30,double a31, double a32, double a33,double a34, double a35,double a36,double a37,double a38,double a39,double
a40,double a41)
{
FILE * PTR;
clock_t endwait;
if(a41==counter){
counter=1.0;
PTR = fopen("out.txt", "w+");
fprintf(PTR, "%E\n",a1 );
fprintf(PTR, "%E\n",a2 );
fprintf(PTR, "%E\n",a3 );
fprintf(PTR, "%E\n",a4 );
fprintf(PTR, "%E\n",a5 );
fprintf(PTR, "%E\n",a6 );
fprintf(PTR, "%E\n",a7 );
fprintf(PTR, "%E\n",a8 );
fprintf(PTR, "%E\n",a9 );
fprintf(PTR, "%E\n",a10 );
fprintf(PTR, "%E\n",a11);
fprintf(PTR, "%E\n",a12 );
fprintf(PTR, "%E\n",a13 );
fprintf(PTR, "%E\n",a14 );
fprintf(PTR, "%E\n",a15 );
fprintf(PTR, "%E\n",a16 );
fprintf(PTR, "%E\n",a17 );
fprintf(PTR, "%E\n",a18 );
fprintf(PTR, "%E\n",a19 );
fprintf(PTR, "%E\n",a20 );
fprintf(PTR, "%E\n",a21 );
fprintf(PTR, "%E\n",a22 );
fprintf(PTR, "%E\n",a23 );
fprintf(PTR, "%E\n",a24 );
fprintf(PTR, "%E\n",a25 );
fprintf(PTR, "%E\n",a26 );
fprintf(PTR, "%E\n",a27 );
fprintf(PTR, "%E\n",a28 );
fprintf(PTR, "%E\n",a29 );
fprintf(PTR, "%E\n",a30 );
fprintf(PTR, "%E\n",a31 );
fprintf(PTR, "%E\n",a32 );
fprintf(PTR, "%E\n",a33 );
fprintf(PTR, "%E\n",a34 );
fprintf(PTR, "%E\n",a35 );
fprintf(PTR, "%E\n",a36 );
fprintf(PTR, "%E\n",a37 );
122