Searched defs:Pack_cc_idot (Results 1 – 2 of 2) sorted by relevance
1747 subroutine Pack_cc_idot(nb,A,B,sum) subroutine1749 integer nb1750 real*8 A(*)1751 real*8 B(*)1752 real*8 sum
1905 subroutine Pack_cc_idot(nb,A,B,sum) subroutine1907 integer nb1908 real*8 A(*)1909 real*8 B(*)1910 real*8 sum