/[PAMELA software]/yoda/techmodel/forroutines/calorimeter/fillin.c
ViewVC logotype

Diff of /yoda/techmodel/forroutines/calorimeter/fillin.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2.1 by kusanagi, Mon Oct 18 13:01:32 2004 UTC revision 2.3 by kusanagi, Fri Dec 17 12:46:21 2004 UTC
# Line 20  Line 20 
20  void fillin_(int *m, int *lunga, int *lleng, int *lung, int *pari, short int *vect, char *vecta)  void fillin_(int *m, int *lunga, int *lleng, int *lung, int *pari, short int *vect, char *vecta)
21  {      {    
22      int i;      int i;
23        int mleng;
24      char tempv[*lung];      char tempv[*lung];
25      char tempv2[*lung];      char tempv2[*lung];
26      memcpy(&tempv, &*vecta+*m-1, *lung);          memcpy(&tempv, &*vecta+*m-1, *lung-*m+1);    
27      for (i = 1; i < *lung-1; i=i+2){      for (i = 1; i < *lung-1; i=i+2){
28          tempv2[i-1]=tempv[i];          tempv2[i-1]=tempv[i];
29          tempv2[i]=tempv[i-1];          tempv2[i]=tempv[i-1];  
30      };      };
31        *lleng = 0;
32      memcpy(&*vect, &tempv2, (*lunga-*lleng)*2);      memcpy(&*vect, &tempv2, (*lunga-*lleng)*2);
33  }  }
34    
Legend:
Removed from v.2.1  
changed lines
  Added in v.2.3
  ViewVC Help
Powered by ViewVC 1.1.23