Changeset 21 in PSPA for testPhilPSPA


Ignore:
Timestamp:
Sep 25, 2012, 3:18:24 PM (12 years ago)
Author:
lemeur
Message:

close de fichiers dans recupFaisceauParm

File:
1 edited

Legend:

Unmodified
Added
Removed
  • testPhilPSPA/trunk/recupFaisceauParm.cc

    r17 r21  
    3737
    3838
    39   double readFreqFromParmout(FILE* fp)
    40   {
    41     float freq=0.0;
    42     char chaine[80];
    43     while ( fscanf(fp, " %s ", chaine) > 0 )
    44       {
    45         if ( strcmp(chaine, "frequency") == 0 )
    46           {
    47             printf(" chaone lue :  %s  \n", chaine);
    48             fscanf(fp, " %s ", chaine);
    49             fscanf(fp, " %e ", &freq);
    50             break;
    51           }
    52       }
    53     return freq;
    54   };
     39double readFreqFromParmout(FILE* fp)
     40{
     41  float freq=0.0;
     42  char chaine[80];
     43  while ( fscanf(fp, " %s ", chaine) > 0 )
     44    {
     45      if ( strcmp(chaine, "frequency") == 0 )
     46        {
     47          printf(" chaone lue :  %s  \n", chaine);
     48          fscanf(fp, " %s ", chaine);
     49          fscanf(fp, " %e ", &freq);
     50          break;
     51        }
     52    }
     53  return freq;
     54};
    5555
    5656
     
    8080
    8181  printf(" probleme parmela :  %s  \n", argv[1]);
    82 
     82  //
    8383  fileParmout = fopen(nomParmout, "r");
    8484  if ( fileParmout == (FILE*)0 )
     
    8888    }
    8989  else printf(" ouverture du fichier %s \n",  nomParmout );
    90 
    91 
    9290  freqRef= readFreqFromParmout(fileParmout);
     91  fclose(fileParmout);
     92  //
    9393  printf(" frequence relue :  %e  \n", freqRef);
    9494  char nomfilefais[132];
     
    288288  printf(" le faisceau TRANSPORT est cree sur le fichier  :  faisceauTransp.dat  \n");
    289289
     290
     291
     292  fclose(filefais);
     293  fclose(fileFaisTrans);
    290294}
Note: See TracChangeset for help on using the changeset viewer.