(file) Return to gukine.f CVS log (file) (dir) Up to [HallC] / geant_gep / src

Diff for /geant_gep/src/gukine.f between version 1.5 and 1.6

version 1.5, 2005/09/22 17:17:49 version 1.6, 2005/09/29 22:06:18
Line 132 
Line 132 
      >          x_fp, dx_fp, y_fp, dy_fp, m2,      >          x_fp, dx_fp, y_fp, dy_fp, m2,
      >          ms_flag, wcs_flag, decay_flag, resmult, fry,      >          ms_flag, wcs_flag, decay_flag, resmult, fry,
      > ok_spec, pathlen)      > ok_spec, pathlen)
 c      write(*,*)p_spec,th_spec,dpp        write(*,*)p_spec,th_spec,dpp
 c      write(*,*)x,y,z c      write(*,*)x,y,z
 c      write(*,*)dxdz,dydz c      write(*,*)dxdz,dydz
       write(6,*)x_fp,dx_fp,y_fp,dy_fp,ok_spec       write(6,*)x_fp,dx_fp,y_fp,dy_fp,ok_spec


Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

Analyzer/Replay: Mark Jones, Documents: Stephen Wood
Powered by
ViewCVS 0.9.2-cvsgraph-1.4.0