Home
last modified time | relevance | path

Searched refs:lV (Results 1 – 1 of 1) sorted by relevance

/petsc/src/vec/vec/interface/ftn-custom/
H A Dzvectorf90.c101 Vec *lV; in vecduplicatevecs_() local
104 *ierr = VecDuplicateVecs(*v, *m, &lV); in vecduplicatevecs_()
109 for (i = 0; i < *m; i++) newvint[i] = (PetscFortranAddr)lV[i]; in vecduplicatevecs_()
110 *ierr = PetscFree(lV); in vecduplicatevecs_()