/[PAMELA software]/DarthVader/TrackerLevel2/src/F77/track.f
ViewVC logotype

Diff of /DarthVader/TrackerLevel2/src/F77/track.f

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

revision 1.5 by pam-ts, Wed Jun 4 07:57:04 2014 UTC revision 1.7 by mocchiut, Fri Jun 6 11:24:03 2014 UTC
# Line 229  ccc      DATA TOLL/1.d-8/           Line 229  ccc      DATA TOLL/1.d-8/          
229  *     tolerance in reaching the next plane during the tracking procedure  *     tolerance in reaching the next plane during the tracking procedure
230  *     -----------------------------------------------  *     -----------------------------------------------
231  *     I/O parameters  *     I/O parameters
232        PARAMETER (NPOINT_MAX=100)        PARAMETER (NPOINT_MAX=500)
233        DIMENSION ZIN(NPOINT_MAX)        DIMENSION ZIN(NPOINT_MAX)
234        DIMENSION XOUT(NPOINT_MAX),YOUT(NPOINT_MAX)        DIMENSION XOUT(NPOINT_MAX),YOUT(NPOINT_MAX)
235        DIMENSION THXOUT(NPOINT_MAX),THYOUT(NPOINT_MAX)        DIMENSION THXOUT(NPOINT_MAX),THYOUT(NPOINT_MAX)
# Line 402  c$$$ Line 402  c$$$
402    
403  *     -----------------------------------------------  *     -----------------------------------------------
404  *     I/O parameters  *     I/O parameters
405        PARAMETER (NPOINT_MAX=100)        PARAMETER (NPOINT_MAX=500) ! EM it was =100
406        DIMENSION ZIN(NPOINT_MAX)        DIMENSION ZIN(NPOINT_MAX)
407        DIMENSION XOUT(NPOINT_MAX),YOUT(NPOINT_MAX)        DIMENSION XOUT(NPOINT_MAX),YOUT(NPOINT_MAX)
408        DIMENSION THXOUT(NPOINT_MAX),THYOUT(NPOINT_MAX)        DIMENSION THXOUT(NPOINT_MAX),THYOUT(NPOINT_MAX)
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.23