--- DarthVader/TrackerLevel2/src/F77/functionspfa.f 2007/08/17 14:36:06 1.16 +++ DarthVader/TrackerLevel2/src/F77/functionspfa.f 2007/08/17 16:08:15 1.17 @@ -183,11 +183,11 @@ if(mod(int(VIEW(ic)),2).eq.1)then !Y-view if( abs(angle).ge.e2fay.and.abs(angle).le.e2tay )then - pfaeta = pfaeta2(ic,angle)+pfcorr(ic,angle) + pfaeta = pfaeta2(ic,angle)+pfacorr(ic,angle) elseif( abs(angle).ge.e3fay.and.abs(angle).le.e3tay )then - pfaeta = pfaeta3(ic,angle)+pfcorr(ic,angle) + pfaeta = pfaeta3(ic,angle)+pfacorr(ic,angle) elseif( abs(angle).ge.e4fay.and.abs(angle).le.e4tay )then - pfaeta = pfaeta4(ic,angle)+pfcorr(ic,angle) + pfaeta = pfaeta4(ic,angle)+pfacorr(ic,angle) else pfaeta = cog(4,ic) endif @@ -195,11 +195,11 @@ else !X-view if( abs(angle).ge.e2fax.and.abs(angle).le.e2tax )then - pfaeta = pfaeta2(ic,angle)+pfcorr(ic,angle) + pfaeta = pfaeta2(ic,angle)+pfacorr(ic,angle) elseif( abs(angle).ge.e3fax.and.abs(angle).le.e3tax )then - pfaeta = pfaeta3(ic,angle)+pfcorr(ic,angle) + pfaeta = pfaeta3(ic,angle)+pfacorr(ic,angle) elseif( abs(angle).ge.e4fax.and.abs(angle).le.e4tax )then - pfaeta = pfaeta4(ic,angle)+pfcorr(ic,angle) + pfaeta = pfaeta4(ic,angle)+pfacorr(ic,angle) else pfaeta = cog(4,ic) endif