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

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

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

revision 1.5 by bongi, Tue Sep 4 15:44:50 2007 UTC revision 1.8 by mocchiut, Tue May 15 14:31:45 2012 UTC
# Line 1  Line 1 
1  *************************************************************************  ************************************************************************
2  *      *    
3  *     functions.f  *     functions.f
4  *      *    
# Line 65  c--------------------------------------- Line 65  c---------------------------------------
65    
66        include 'commontracker.f'        include 'commontracker.f'
67    
68          view = view
69        nld=INT((istrip-1)/nstrips_ladder)+1        nld=INT((istrip-1)/nstrips_ladder)+1
70    
71        end        end
# Line 487  c--------------------------------------- Line 487  c---------------------------------------
487        include 'calib.f'        include 'calib.f'
488    
489                
490          real incut
491        integer nsat        integer nsat
492        nsat = 0        nsat = 0
493        iv=VIEW(ic)                      iv=VIEW(ic)              
# Line 540  c--------------------------------------- Line 540  c---------------------------------------
540        include 'level1.f'        include 'level1.f'
541        include 'calib.f'        include 'calib.f'
542    
543          real incut
544        integer nbad        integer nbad
545        nbad = 0        nbad = 0
546    
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.23