Searched defs:D3dB_rr_dot (Results 1 – 2 of 2) sorted by relevance
3601 subroutine D3dB_rr_dot(nb,A,B,sumall) subroutine3603 integer nb3604 real*8 A(*)3605 real*8 B(*)3606 real*8 sumall3610 integer i,np3611 real*8 sum3612 common /D3dB_RR_TSUM/ sum
3618 subroutine D3dB_rr_dot(nb,A,B,sumall) subroutine3620 integer nb3621 real*8 A(*)3622 real*8 B(*)3623 real*8 sumall3627 integer i,np3628 real*8 sum3629 common /D3dB_RR_TSUM/ sum