#include /*c-style io */ #include main() { FILE *input; float p[53],t[53],z[53]; char line[80]; int i,nlevel; float rgas,grav,tzero; float selv,tavg; rgas = 287.; grav=9.80665; tzero=273.; nlevel=52; i=0; input = fopen("/home/meteor/x/class/jhorel/3410/PT.341","r"); while ((fgets(line,sizeof(line),input)) != NULL ) { sscanf(line,"%f %f",&p[i],&t[i]); p[i]=p[i]*100.; t[i]=t[i]+tzero; i++; } selv = 1288.; z[0] = selv; for (i=1; i <= nlevel; i++) { tavg = 0.5 * ( t[i] + t[i-1] ); z[i] = z[i-1] - ( rgas * tavg / grav ) * log ( p[i] / p[i-1] ); } for ( i=0; i <= nlevel; i++ ) { printf("%f %f %f\n",p[i]/100.,t[i],z[i]); } }