Searched defs:Pack_cc_indot (Results 1 – 2 of 2) sorted by relevance
1490 subroutine Pack_cc_indot(nb,ne,A,B,sum) subroutine1492 integer nb1493 integer ne1494 complex*16 A(*)1495 complex*16 B(*)1496 real*8 sum(*)
1647 subroutine Pack_cc_indot(nb,ne,A,B,sum) subroutine1649 integer nb1650 integer ne1651 complex*16 A(*)1652 complex*16 B(*)1653 real*8 sum(*)