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

Macro Definition Documentation

◆ ccrs_amg_free

#define ccrs_amg_free PREFIXED_NAME(crs_amg_free )

Definition at line 28 of file fcrs.c.

◆ ccrs_amg_setup

#define ccrs_amg_setup PREFIXED_NAME(crs_amg_setup)

Definition at line 25 of file fcrs.c.

◆ ccrs_amg_solve

#define ccrs_amg_solve PREFIXED_NAME(crs_amg_solve)

Definition at line 26 of file fcrs.c.

◆ ccrs_amg_stats

#define ccrs_amg_stats PREFIXED_NAME(crs_amg_stats)

Definition at line 27 of file fcrs.c.

◆ ccrs_xxt_free

#define ccrs_xxt_free PREFIXED_NAME(crs_xxt_free )

Definition at line 19 of file fcrs.c.

◆ ccrs_xxt_setup

#define ccrs_xxt_setup PREFIXED_NAME(crs_xxt_setup)

Definition at line 16 of file fcrs.c.

◆ ccrs_xxt_solve

#define ccrs_xxt_solve PREFIXED_NAME(crs_xxt_solve)

Definition at line 17 of file fcrs.c.

◆ ccrs_xxt_stats

#define ccrs_xxt_stats PREFIXED_NAME(crs_xxt_stats)

Definition at line 18 of file fcrs.c.

◆ CHECK_HANDLE

#define CHECK_HANDLE ( func )

Value:

  do \
  if(*handle<0 || *handle>=handle_n || !handle_array[*handle]) \
    fail(1,__FILE__,__LINE__,func ": invalid handle"); \
while(0)

Definition at line 40 of file fcrs.c.

◆ fcrs_free

#define fcrs_free FORTRAN_NAME(crs_free ,CRS_FREE)

Definition at line 33 of file fcrs.c.

◆ fcrs_setup

#define fcrs_setup FORTRAN_NAME(crs_setup,CRS_SETUP)

Definition at line 30 of file fcrs.c.

◆ fcrs_solve

#define fcrs_solve FORTRAN_NAME(crs_solve,CRS_SOLVE)

Definition at line 31 of file fcrs.c.

◆ fcrs_stats

#define fcrs_stats FORTRAN_NAME(crs_stats,CRS_STATS)

Definition at line 32 of file fcrs.c.

Function Documentation

◆ fcrs_free()

void fcrs_free ( sint * handle )

Definition at line 87 of file fcrs.c.

References CHECK_HANDLE.

◆ fcrs_setup()

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
	)

Definition at line 45 of file fcrs.c.

◆ fcrs_solve()

void fcrs_solve	(	const sint *	handle,
		double	x[],
		double	b[]
	)

Definition at line 77 of file fcrs.c.