Lines Matching refs:m
12 PetscInt i, j, II, JJ, m
23 m = 10
30 PetscCallA(PetscOptionsGetInt(PETSC_NULL_OPTIONS, PETSC_NULL_CHARACTER, '-m', m, flg, ierr))
34 PetscCallA(MatSetSizes(A, PETSC_DECIDE, PETSC_DECIDE, m*m, m*m, ierr))
44 i = II/m
45 j = II - i*m
47 JJ = II - m
50 if (i < m - 1) then
51 JJ = II + m
58 if (j < m - 1) then
70 PetscCallA(VecSetSizes(u, PETSC_DECIDE, m*m, ierr))