#include <stdio.h>#include <stddef.h>#include <stdlib.h>#include <string.h>#include "gslib.h"#include "crs.h"
Include dependency graph for fcrs.c:Macros | |
| #define | ccrs_xxt_setup PREFIXED_NAME(crs_xxt_setup) |
| #define | ccrs_xxt_solve PREFIXED_NAME(crs_xxt_solve) |
| #define | ccrs_xxt_stats PREFIXED_NAME(crs_xxt_stats) |
| #define | ccrs_xxt_free PREFIXED_NAME(crs_xxt_free ) |
| #define | ccrs_amg_setup PREFIXED_NAME(crs_amg_setup) |
| #define | ccrs_amg_solve PREFIXED_NAME(crs_amg_solve) |
| #define | ccrs_amg_stats PREFIXED_NAME(crs_amg_stats) |
| #define | ccrs_amg_free PREFIXED_NAME(crs_amg_free ) |
| #define | fcrs_setup FORTRAN_NAME(crs_setup,CRS_SETUP) |
| #define | fcrs_solve FORTRAN_NAME(crs_solve,CRS_SOLVE) |
| #define | fcrs_stats FORTRAN_NAME(crs_stats,CRS_STATS) |
| #define | fcrs_free FORTRAN_NAME(crs_free ,CRS_FREE) |
| #define | CHECK_HANDLE(func) |
Functions | |
| void | fcrs_setup (sint *handle, const sint *sid, const MPI_Fint *comm, const sint *np, const sint *n, const slong id[], const sint *nz, const sint Ai[], const sint Aj[], const double A[], const sint *null_space, const double *param, const char *datafname, uint *ierr) |
| void | fcrs_solve (const sint *handle, double x[], double b[]) |
| void | fcrs_free (sint *handle) |
| #define ccrs_amg_free PREFIXED_NAME(crs_amg_free ) |
| #define ccrs_amg_setup PREFIXED_NAME(crs_amg_setup) |
| #define ccrs_amg_solve PREFIXED_NAME(crs_amg_solve) |
| #define ccrs_amg_stats PREFIXED_NAME(crs_amg_stats) |
| #define ccrs_xxt_free PREFIXED_NAME(crs_xxt_free ) |
| #define ccrs_xxt_setup PREFIXED_NAME(crs_xxt_setup) |
| #define ccrs_xxt_solve PREFIXED_NAME(crs_xxt_solve) |
| #define ccrs_xxt_stats PREFIXED_NAME(crs_xxt_stats) |
| #define CHECK_HANDLE | ( | func | ) |
| #define fcrs_free FORTRAN_NAME(crs_free ,CRS_FREE) |
| #define fcrs_setup FORTRAN_NAME(crs_setup,CRS_SETUP) |
| #define fcrs_solve FORTRAN_NAME(crs_solve,CRS_SOLVE) |
| #define fcrs_stats FORTRAN_NAME(crs_stats,CRS_STATS) |
| void fcrs_free | ( | sint * | handle | ) |
| void fcrs_setup | ( | sint * | handle, |
| const sint * | sid, | ||
| const MPI_Fint * | comm, | ||
| const sint * | np, | ||
| const sint * | n, | ||
| const slong | id[], | ||
| const sint * | nz, | ||
| const sint | Ai[], | ||
| const sint | Aj[], | ||
| const double | A[], | ||
| const sint * | null_space, | ||
| const double * | param, | ||
| const char * | datafname, | ||
| uint * | ierr | ||
| ) |
| void fcrs_solve | ( | const sint * | handle, |
| double | x[], | ||
| double | b[] | ||
| ) |