-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy pathVFFlow_TSFEM.h
18 lines (16 loc) · 894 Bytes
/
VFFlow_TSFEM.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
/*
VFFlow_TSFEM.h
Finite element implementation of Darcy flow
(c) 2010-2013 K. Yoshioka
*/
#ifndef VFFLOW_TSFEM_H
#define VFFLOW_TSFEM_H
extern PetscErrorCode FEMTSFlowSolverInitialize(VFCtx *ctx, VFFields *fields);
extern PetscErrorCode FEMTSFlowSolverFinalize(VFCtx *ctx,VFFields *fields);
extern PetscErrorCode FormIFunction_P(TS ts,PetscReal t,Vec VelnPress,Vec VelnPressdot,Vec Func,void *user);
extern PetscErrorCode FormIJacobian_P(TS ts,PetscReal t,Vec VelnPress,Vec VelnPressdot,PetscReal shift,Mat Jac,Mat Jacpre,void *user);
extern PetscErrorCode FormFunction_P(TS ts,PetscReal t,Vec vec1,Vec Func,void *user);
extern PetscErrorCode FEMTSMonitor(TS ts,PetscInt timestep,PetscReal timevalue,Vec pressure,void*);
extern PetscErrorCode MatApplyTSPressureBC(Mat K,Mat Klhs,VFBC *bcP);
extern PetscErrorCode FlowFEMTSSolve(VFCtx *ctx,VFFields *fields);
#endif /* VFFLOW_TSFEM_H */