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

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

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

revision 1.10 by pam-fi, Fri Feb 16 14:56:02 2007 UTC revision 1.12 by pam-fi, Thu Mar 15 12:17:10 2007 UTC
# Line 43  c      parameter (inf=1.e8)      !just a Line 43  c      parameter (inf=1.e8)      !just a
43  ************************************************************  ************************************************************
44  ************************************************************  ************************************************************
45        PFA='ETA'        PFA='ETA'
46          TRACKMODE = 0
47        if(fin.eq.0)PFA='ETA'        if(fin.eq.0)PFA='ETA'
48        if(fin.eq.2)PFA='ETA2'        if(fin.eq.2)PFA='ETA2'
49        if(fin.eq.3)PFA='ETA3'        if(fin.eq.3)PFA='ETA3'
# Line 55  c      parameter (inf=1.e8)      !just a Line 56  c      parameter (inf=1.e8)      !just a
56    
57  c$$$      PFA='ETA'  c$$$      PFA='ETA'
58  c$$$      DEBUG=.true.  c$$$      DEBUG=.true.
59    c$$$      DEBUG=.false.
60    
61        if(DEBUG)PRINT*,'P.F.A. --> ',fin,PFA        if(DEBUG)PRINT*,'P.F.A. --> ',fin,PFA
62    
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.23