Searched refs:CVEC2 (Results 1 – 2 of 2) sorted by relevance
| /dports/science/xcrysden/xcrysden-1.6.2/F/ |
| H A D | ttcplane.f | 257 REAL*8 AVEC,BVEC,CVEC,AVEC2,BVEC2,CVEC2 local
294 CVEC2=DVEC(1,3)*TTCVEC(1,NVEC2,NBOX)+
296 IF(A*AVEC2+B*BVEC2+C*CVEC2.LT.0.0d0)THEN
|
| H A D | box.f | 256 REAL*8 AVEC,BVEC,CVEC,AVEC2,BVEC2,CVEC2 local
293 CVEC2=DVEC(1,3)*PLVEC(1,NVEC2,NBOX)+DVEC(2,3)*PLVEC(2,NVEC2,NBOX)+
295 IF(A*AVEC2+B*BVEC2+C*CVEC2.LT.0.0d0)THEN
|