#include <stdlib.h>
#include <stdio.h>
#include <math.h>
#include <string.h>
#include "pdh_intf.h"
#include "sih_intf.h"
#include "../sid_mkb/sih_mkb_fem_intf.h"
#include "sih_mkb.h"
#include "lin_alg_intf.h"
#include "aph_intf.h"
Defines | |
#define | COARSE_TO_FINE 0 |
#define | FINE_TO_COARSE 1 |
#define | MAX_NUM_ANC 8 |
#define | MAX_EL_DOFS 1000 |
#define | MAX_PROJ_COMB 2 |
Functions | |
int | fem_proj_sol_lev (int Solver_id, int Subsystem_id, int Ilev_from, double *Vec_from, int Ilev_to, double *Vec_to) |
double | fem_vec_norm (int Solver_id, int Subsystem_id, int Level_id, int Nrdof, double *Vector) |
double | fem_sc_prod (int Solver_id, int Subsystem_id, int Level_id, int Nrdof, double *Vector1, double *Vector2) |
int | fem_exchange_dofs (int Solver_id, int Subsystem_id, int Level_id, double *Vec_dofs) |
#define COARSE_TO_FINE 0 |
#define FINE_TO_COARSE 1 |
#define MAX_EL_DOFS 1000 |
#define MAX_NUM_ANC 8 |
#define MAX_PROJ_COMB 2 |
int fem_exchange_dofs | ( | int | Solver_id, | |
int | Subsystem_id, | |||
int | Level_id, | |||
double * | Vec_dofs | |||
) |
-------------------------------------------------------- fem_exchange_dofs - to exchange dofs between processors ---------------------------------------------------------
!! If renumbering used - should be applied here !!!
int fem_proj_sol_lev | ( | int | Solver_id, | |
int | Subsystem_id, | |||
int | Ilev_from, | |||
double * | Vec_from, | |||
int | Ilev_to, | |||
double * | Vec_to | |||
) |
-------------------------------------------------------- fem_proj_sol_lev - to L2 project solution dofs between mesh levels ---------------------------------------------------------
!! DG: simple algorithm - DOF blocks are associated with elements only
double fem_sc_prod | ( | int | Solver_id, | |
int | Subsystem_id, | |||
int | Level_id, | |||
int | Nrdof, | |||
double * | Vector1, | |||
double * | Vector2 | |||
) |
-------------------------------------------------------- fem_sc_prod - to compute a scalar product of two global vectors ---------------------------------------------------------
double fem_vec_norm | ( | int | Solver_id, | |
int | Subsystem_id, | |||
int | Level_id, | |||
int | Nrdof, | |||
double * | Vector | |||
) |
-------------------------------------------------------- fem_vec_norm - to compute a norm of global vector in parallel ---------------------------------------------------------