--- DarthVader/TrackerLevel2/src/F77/analysissubroutines.f 2007/02/16 14:56:02 1.18 +++ DarthVader/TrackerLevel2/src/F77/analysissubroutines.f 2007/02/20 08:32:52 1.19 @@ -3341,8 +3341,8 @@ ayv_nt(ip,ntr) = sngl(ayv(ip)) c l'avevo dimenticato!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! factor = sqrt( - $ sin( acos(-1.) * sngl(axv(ip)) /180. )**2 + - $ sin( acos(-1.) * sngl(ayv(ip)) /180. )**2 + + $ tan( acos(-1.) * sngl(axv(ip)) /180. )**2 + + $ tan( acos(-1.) * sngl(ayv(ip)) /180. )**2 + $ 1. ) c !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! dedx_x(ip,ntr) = sngl(dedxtrk_x(ip)/factor)