C++ (Cpp) PetscToPointer Examples

Example #1

PETSC_EXTERN void PETSC_STDCALL  iscomplementvec_(IS S,Vec V,IS *T, int *__ierr ){
*__ierr = ISComplementVec(
	(IS)PetscToPointer((S) ),
	(Vec)PetscToPointer((V) ),T);
}

Example #2

PETSC_EXTERN void PETSC_STDCALL  petscdrawstringgetsize_(PetscDraw draw,PetscReal *width,PetscReal *height, int *__ierr ) {
    *__ierr = PetscDrawStringGetSize(
                  (PetscDraw)PetscToPointer((draw) ),width,height);
}

Example #3

PETSC_EXTERN void PETSC_STDCALL  pcbddcsetprimalverticeslocalis_(PC pc,IS PrimalVertices, int *__ierr ){
*__ierr = PCBDDCSetPrimalVerticesLocalIS(
	(PC)PetscToPointer((pc) ),
	(IS)PetscToPointer((PrimalVertices) ));
}

Example #4

File: stslesf.c Project: OpenCMISS-Dependencies/slepc

PETSC_EXTERN void PETSC_STDCALL  stmatsolvetranspose_(ST *st,Vec b,Vec x, int *__ierr ){
*__ierr = STMatSolveTranspose(*st,
	(Vec)PetscToPointer((b) ),
	(Vec)PetscToPointer((x) ));
}

Example #5

File: packf.c Project: masa-ito/PETScToPoisson

PETSC_EXTERN void PETSC_STDCALL  dmcompositescatterarray_(DM dm,Vec gvec,Vec *lvecs, int *__ierr ){
*__ierr = DMCompositeScatterArray(
	(DM)PetscToPointer((dm) ),
	(Vec)PetscToPointer((gvec) ),lvecs);
}

Example #6

void PETSC_STDCALL   stagelogregister_(StageLog stageLog, char sname[],int *stage, int *__ierr ){
*__ierr = StageLogRegister(
	(StageLog)PetscToPointer((stageLog) ),sname,stage);
}

Example #7

File: stslesf.c Project: OpenCMISS-Dependencies/slepc

PETSC_EXTERN void PETSC_STDCALL  stsetksp_(ST *st,KSP ksp, int *__ierr ){
*__ierr = STSetKSP(*st,
	(KSP)PetscToPointer((ksp) ));
}

Example #8

File: coarsenf.c Project: Kun-Qu/petsc

void PETSC_STDCALL  matcoarsendestroy_(MatCoarsen *agg, int *__ierr ){
*__ierr = MatCoarsenDestroy(
	(MatCoarsen* )PetscToPointer((agg) ));
}

Example #9

File: coarsenf.c Project: Kun-Qu/petsc

void PETSC_STDCALL  matcoarsencreate_(MPI_Fint * comm,MatCoarsen *newcrs, int *__ierr ){
*__ierr = MatCoarsenCreate(
	MPI_Comm_f2c( *(comm) ),
	(MatCoarsen* )PetscToPointer((newcrs) ));
}

Example #10

PETSC_EXTERN void PETSC_STDCALL  vecwhichequal_(Vec Vec1,Vec Vec2,IS * S, int *__ierr ){
*__ierr = VecWhichEqual(
	(Vec)PetscToPointer((Vec1) ),
	(Vec)PetscToPointer((Vec2) ),S);
}

Example #11

File: coarsenf.c Project: Kun-Qu/petsc

void PETSC_STDCALL  matcoarsensetadjacency_(MatCoarsen *agg,Mat adj, int *__ierr ){
*__ierr = MatCoarsenSetAdjacency(*agg,
	(Mat)PetscToPointer((adj) ));
}

Example #12

PETSC_EXTERN void PETSC_STDCALL  vecpow_(Vec v,PetscScalar *p, int *__ierr ){
*__ierr = VecPow(
	(Vec)PetscToPointer((v) ),*p);
}

Example #13

PETSC_EXTERN void PETSC_STDCALL  vecstepmax_(Vec X,Vec DX,PetscReal *step, int *__ierr ){
*__ierr = VecStepMax(
	(Vec)PetscToPointer((X) ),
	(Vec)PetscToPointer((DX) ),step);
}

Example #14

PETSC_EXTERN void PETSC_STDCALL  vecisset_(Vec V,IS S,PetscScalar *c, int *__ierr ){
*__ierr = VecISSet(
	(Vec)PetscToPointer((V) ),
	(IS)PetscToPointer((S) ),*c);
}

Example #15

void PETSC_STDCALL   stageloggetstage_(StageLog stageLog, char name[],int *stage, int *__ierr ){
*__ierr = StageLogGetStage(
	(StageLog)PetscToPointer((stageLog) ),name,stage);
}

Example #16

File: dpointsf.c Project: Kun-Qu/petsc

void PETSC_STDCALL  petscdrawpointsetsize_(PetscDraw draw,PetscReal *width, int *__ierr ){
*__ierr = PetscDrawPointSetSize(
	(PetscDraw)PetscToPointer((draw) ),*width);
}

Example #17

void PETSC_STDCALL   stagelogdestroy_(StageLog stageLog, int *__ierr ){
*__ierr = StageLogDestroy(
	(StageLog)PetscToPointer((stageLog) ));
}

Example #18

File: plexinterpolatef.c Project: masa-ito/PETScToPoisson

PETSC_EXTERN void PETSC_STDCALL  dmplexcopycoordinates_(DM dmA,DM dmB, int *__ierr ){
*__ierr = DMPlexCopyCoordinates(
	(DM)PetscToPointer((dmA) ),
	(DM)PetscToPointer((dmB) ));
}

Example #19

void PETSC_STDCALL   stagelogpush_(StageLog stageLog,int *stage, int *__ierr ){
*__ierr = StageLogPush(
	(StageLog)PetscToPointer((stageLog) ),*stage);
}

Example #20

File: plexinterpolatef.c Project: masa-ito/PETScToPoisson

PETSC_EXTERN void PETSC_STDCALL  dmplexuninterpolate_(DM dm,DM *dmUnint, int *__ierr ){
*__ierr = DMPlexUninterpolate(
	(DM)PetscToPointer((dm) ),dmUnint);
}

Example #21

File: stslesf.c Project: OpenCMISS-Dependencies/slepc

PETSC_EXTERN void PETSC_STDCALL  stmatmulttranspose_(ST *st,PetscInt *k,Vec x,Vec y, int *__ierr ){
*__ierr = STMatMultTranspose(*st,*k,
	(Vec)PetscToPointer((x) ),
	(Vec)PetscToPointer((y) ));
}

Example #22

void PETSC_STDCALL   stagelogpop_(StageLog stageLog, int *__ierr ){
*__ierr = StageLogPop(
	(StageLog)PetscToPointer((stageLog) ));
}

Example #23

File: packf.c Project: masa-ito/PETScToPoisson

PETSC_EXTERN void PETSC_STDCALL  dmcompositegetnumberdm_(DM dm,PetscInt *nDM, int *__ierr ){
*__ierr = DMCompositeGetNumberDM(
	(DM)PetscToPointer((dm) ),nDM);
}

Example #24

void PETSC_STDCALL   stageloggetcurrent_(StageLog stageLog,int *stage, int *__ierr ){
*__ierr = StageLogGetCurrent(
	(StageLog)PetscToPointer((stageLog) ),stage);
}

Example #25

File: packf.c Project: masa-ito/PETScToPoisson

PETSC_EXTERN void PETSC_STDCALL  dmcompositegatherarray_(DM dm,Vec gvec,InsertMode *imode,Vec *lvecs, int *__ierr ){
*__ierr = DMCompositeGatherArray(
	(DM)PetscToPointer((dm) ),
	(Vec)PetscToPointer((gvec) ),*imode,lvecs);
}

Example #26

void PETSC_STDCALL   stageloggetactive_(StageLog stageLog,int *stage,PetscTruth *isActive, int *__ierr ){
*__ierr = StageLogGetActive(
	(StageLog)PetscToPointer((stageLog) ),*stage,isActive);
}

Example #27

PETSC_EXTERN void PETSC_STDCALL  pcbddcsetchangeofbasislocalmat_(PC pc,Mat change, int *__ierr ){
*__ierr = PCBDDCSetChangeOfBasisLocalMat(
	(PC)PetscToPointer((pc) ),
	(Mat)PetscToPointer((change) ));
}

Example #28

void PETSC_STDCALL   stageloggetvisible_(StageLog stageLog,int *stage,PetscTruth *isVisible, int *__ierr ){
*__ierr = StageLogGetVisible(
	(StageLog)PetscToPointer((stageLog) ),*stage,isVisible);
}

Example #29

PETSC_EXTERN void PETSC_STDCALL  pcbddcsetcoarseningratio_(PC pc,PetscInt *k, int *__ierr ){
*__ierr = PCBDDCSetCoarseningRatio(
	(PC)PetscToPointer((pc) ),*k);
}

Example #30

PETSC_EXTERN void PETSC_STDCALL  vecisaxpy_(Vec vfull,IS is,PetscScalar *alpha,Vec vreduced, int *__ierr ){
*__ierr = VecISAXPY(
	(Vec)PetscToPointer((vfull) ),
	(IS)PetscToPointer((is) ),*alpha,
	(Vec)PetscToPointer((vreduced) ));
}