#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 ---------------------------------------------------------


1.6.1