Searched refs:b_mtx (Results 1 – 1 of 1) sorted by relevance
73 & b_colm,b_rowp,b_mtx, argument84 real(kind=8),intent(in) :: b_mtx(b_colm(l+1)-1) local101 c_mtx(itemp(q)) = c_mtx(itemp(q)) + rtemp*b_mtx(p)