From: Gordon K. <kin...@us...> - 2005-12-27 16:59:55
|
Update of /cvsroot/teem/teem/src/ten In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24053 Modified Files: tendHelix.c Log Message: minor simplification Index: tendHelix.c =================================================================== RCS file: /cvsroot/teem/teem/src/ten/tendHelix.c,v retrieving revision 1.15 retrieving revision 1.16 diff -C2 -d -r1.15 -r1.16 *** tendHelix.c 27 Dec 2005 16:58:27 -0000 1.15 --- tendHelix.c 27 Dec 2005 16:59:48 -0000 1.16 *************** *** 203,208 **** } ! iq[0] = 1.0; ! ELL_3V_COPY(iq + 1, ip); ell_q_to_3m_d(rot, iq); ELL_3V_SET(orig, --- 203,207 ---- } ! ELL_4V_SET(iq, 1.0, ip[0], ip[1], ip[2]); ell_q_to_3m_d(rot, iq); ELL_3V_SET(orig, *************** *** 216,221 **** ELL_3M_MUL(tmp, rot, i2w); ELL_3M_COPY(i2w, tmp); ! mq[0] = 1.0; ! ELL_3V_COPY(mq + 1, mp); ell_q_to_3m_d(mf, mq); tend_helixDoit(nout, bnd, --- 215,219 ---- ELL_3M_MUL(tmp, rot, i2w); ELL_3M_COPY(i2w, tmp); ! ELL_4V_SET(mq, 1.0, mp[0], mp[1], mp[2]); ell_q_to_3m_d(mf, mq); tend_helixDoit(nout, bnd, |