| /petsc/src/mat/impls/shell/ftn-custom/ |
| H A D | zshellf.c | 48 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)mat… in ourmult()
54 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, Vec *, PetscErrorCode *))(((PetscObj… in ourmultadd()
60 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)mat… in ourmulttranspose()
66 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)mat… in ourmulthermitiantranspose()
72 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, Vec *, PetscErrorCode *))(((PetscObj… in ourmulttransposeadd()
78 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, Vec *, PetscErrorCode *))(((PetscObj… in ourmulthermitiantransposeadd()
95 …PetscCallFortranVoidFunction((*(void (*)(Mat *, MatReuse *, Mat *, PetscErrorCode *))(((PetscObjec… in ourtranspose()
101 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, PetscErrorCode *))(((PetscObject)mat)->fort… in ourgetdiagonal()
111 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)mat… in ourdiagonalscale()
117 …PetscCallFortranVoidFunction((*(void (*)(Mat *, PetscErrorCode *))(((PetscObject)mat)->fortran_fun… in ourzeroentries()
[all …]
|
| /petsc/src/ksp/pc/impls/shell/ftn-custom/ |
| H A D | zshellpcf.c | 34 …PetscCallFortranVoidFunction((*(void (*)(PC *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)pc)-… in ourshellapply()
40 …PetscCallFortranVoidFunction((*(void (*)(PC *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)pc)-… in ourshellapplysymmetricleft()
46 …PetscCallFortranVoidFunction((*(void (*)(PC *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)pc)-… in ourshellapplysymmetricright()
54 …PetscCallFortranVoidFunction((*(void (*)(PC *, void *, Vec *, Vec *, PetscErrorCode *))(((PetscObj… in ourshellapplyctx()
60 …PetscCallFortranVoidFunction((*(void (*)(PC *, PCSide *, Vec *, Vec *, Vec *, PetscErrorCode *))((… in ourshellapplyba()
66 …PetscCallFortranVoidFunction((*(void (*)(PC *, Vec *, Vec *, Vec *, PetscReal *, PetscReal *, Pets… in ourapplyrichardson()
72 …PetscCallFortranVoidFunction((*(void (*)(void *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)pc… in ourshellapplytranspose()
78 …PetscCallFortranVoidFunction((*(void (*)(PC *, PetscErrorCode *))(((PetscObject)pc)->fortran_func_… in ourshellsetup()
86 …PetscCallFortranVoidFunction((*(void (*)(PC *, void *, PetscErrorCode *))(((PetscObject)pc)->fortr… in ourshellsetupctx()
92 …PetscCallFortranVoidFunction((*(void (*)(void *, PetscErrorCode *))(((PetscObject)pc)->fortran_fun… in ourshelldestroy()
[all …]
|
| /petsc/src/tao/linesearch/interface/ftn-custom/ |
| H A D | ztaolinesearchf.c | 24 …PetscCallFortranVoidFunction((*(void (*)(TaoLineSearch *, Vec *, PetscReal *, void *, PetscErrorCo… in ourtaolinesearchobjectiveroutine()
30 …PetscCallFortranVoidFunction((*(void (*)(TaoLineSearch *, Vec *, Vec *, void *, PetscErrorCode *))… in ourtaolinesearchgradientroutine()
36 …PetscCallFortranVoidFunction((*(void (*)(TaoLineSearch *, Vec *, PetscReal *, Vec *, void *, Petsc… in ourtaolinesearchobjectiveandgradientroutine()
42 …PetscCallFortranVoidFunction((*(void (*)(TaoLineSearch *, Vec *, Vec *, PetscReal *, PetscReal *, … in ourtaolinesearchobjectiveandgtsroutine()
|
| /petsc/src/snes/utils/ftn-custom/ |
| H A D | zdmdasnesf.c | 30 PetscCallFortranVoidFunction((*func)(info, &in[info->dof * info->gxs], &A, &m, ctx, &ierr)); in sourlj1d()
42 …PetscCallFortranVoidFunction((*func)(info, &in[info->gys][info->dof * info->gxs], &A, &m, ctx, &ie… in sourlj2d()
54 …PetscCallFortranVoidFunction((*func)(info, &in[info->gzs][info->gys][info->dof * info->gxs], &A, &… in sourlj3d()
92 …PetscCallFortranVoidFunction((*func)(info, &in[info->dof * info->gxs], &out[info->dof * info->xs],… in sourlf1d()
104 …PetscCallFortranVoidFunction((*func)(info, &in[info->gys][info->dof * info->gxs], &out[info->ys][i… in sourlf2d()
116 …PetscCallFortranVoidFunction((*func)(info, &in[info->gzs][info->gys][info->dof * info->gxs], &out[… in sourlf3d()
|
| H A D | zdmlocalsnesf.c | 24 PetscCallFortranVoidFunction((*func)(&dm, &X, &J, &P, ctx, &ierr)); in sourlj()
47 PetscCallFortranVoidFunction((*func)(&dm, &X, &F, ctx, &ierr)); in sourlf()
|
| H A D | zdmsnesf.c | 26 PetscCallFortranVoidFunction((*func)(&snes, &X, &J, &P, ctx, &ierr)); in ourj()
51 PetscCallFortranVoidFunction((*func)(&snes, &X, &F, ctx, &ierr)); in ourf()
|
| /petsc/src/ksp/ksp/interface/ftn-custom/ |
| H A D | zdmkspf.c | 20 …PetscCallFortranVoidFunction((*(void (*)(KSP *, Vec *, void *, PetscErrorCode *))kdm->fortran_func… in ourkspcomputerhs()
30 …PetscCallFortranVoidFunction((*(void (*)(KSP *, Vec *, void *, PetscErrorCode *))kdm->fortran_func… in ourkspcomputeinitialguess()
40 …PetscCallFortranVoidFunction((*(void (*)(KSP *, Mat *, Mat *, void *, PetscErrorCode *))kdm->fortr… in ourkspcomputeoperators()
|
| /petsc/src/snes/linesearch/interface/ftn-custom/ |
| H A D | zlinesearchf.c | 21 …PetscCallFortranVoidFunction((*(void (*)(SNESLineSearch *, Vec *, Vec *, PetscBool *, void *, Pets… in oursneslinesearchprecheck()
28 …PetscCallFortranVoidFunction((*(void (*)(SNESLineSearch *, Vec *, Vec *, Vec *, PetscBool *, Petsc… in oursneslinesearchpostcheck()
|
| /petsc/src/snes/impls/shell/ftn-custom/ |
| H A D | zsnesshellf.c | 15 PetscCallFortranVoidFunction(func(&snes, &x, &ierr)); in oursnesshellsolve()
|
| /petsc/src/snes/linesearch/impls/shell/ftn-custom/ |
| H A D | zlinesearchshellf.c | 15 …PetscCallFortranVoidFunction((*(void (*)(SNESLineSearch *, void *, PetscErrorCode *))(((PetscObjec… in oursneslinesearchshellfunction()
|
| /petsc/src/mat/impls/mffd/ftn-custom/ |
| H A D | zmffdf.c | 15 …PetscCallFortranVoidFunction((*(void (*)(void *, Vec *, Vec *, PetscErrorCode *))(((PetscObject)ma… in ourmatmffdfunction()
|
| /petsc/src/ksp/pc/impls/mg/ftn-custom/ |
| H A D | zmgfuncf.c | 16 …PetscCallFortranVoidFunction((*(void (*)(Mat *, Vec *, Vec *, Vec *, PetscErrorCode *))(((PetscObj… in ourresidualfunction()
|
| /petsc/src/mat/interface/ftn-custom/ |
| H A D | zmatrixf.c | 23 …PetscCallFortranVoidFunction((*(void (*)(MatNullSpace *, Vec *, void *, PetscErrorCode *))(((Petsc… in ournullfunction()
|
| /petsc/include/petsc/private/ |
| H A D | ftnimpl.h | 363 #define PetscCallFortranVoidFunction(...) \ macro
377 if (func) PetscCallFortranVoidFunction((*func)args); \
|