Lines Matching refs:nNo
41 FUNCTION DOTV(dof, nNo, commu, U, V)
45 INTEGER, INTENT(IN) :: dof, nNo local
47 REAL*8, INTENT(IN) :: V(dof,nNo), U(dof,nNo)
55 DO i=1, nNo
59 DO i=1, nNo
63 DO i=1, nNo
67 DO i=1, nNo
72 DO i=1, nNo
89 FUNCTION DOTS(nNo, commu, U, V)
93 INTEGER, INTENT(IN) :: nNo local
95 REAL*8, INTENT(IN) :: V(nNo), U(nNo)
101 DO i=1, nNo