mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-06 14:44:55 +00:00
Update for PSBLAS_CBIND switching to LINSOLVE
This commit is contained in:
@@ -4,7 +4,7 @@
|
||||
#include "amg_const.h"
|
||||
#include "psb_base_cbind.h"
|
||||
#include "psb_prec_cbind.h"
|
||||
#include "psb_krylov_cbind.h"
|
||||
#include "psb_linsolve_cbind.h"
|
||||
|
||||
/* Object handle related routines */
|
||||
/* Note: amg_get_XXX_handle returns: <= 0 unsuccessful */
|
||||
|
||||
@@ -4,7 +4,7 @@
|
||||
#include "amg_const.h"
|
||||
#include "psb_base_cbind.h"
|
||||
#include "psb_prec_cbind.h"
|
||||
#include "psb_krylov_cbind.h"
|
||||
#include "psb_linsolve_cbind.h"
|
||||
|
||||
/* Object handle related routines */
|
||||
/* Note: amg_get_XXX_handle returns: <= 0 unsuccessful */
|
||||
|
||||
@@ -251,7 +251,7 @@ contains
|
||||
use psb_prec_mod
|
||||
use psb_linsolve_mod
|
||||
use psb_prec_cbind_mod
|
||||
use psb_dkrylov_cbind_mod
|
||||
use psb_dlinsolve_cbind_mod
|
||||
implicit none
|
||||
integer(psb_c_ipk_) :: res
|
||||
type(psb_c_object_type) :: ah,cdh,ph,bh,xh
|
||||
|
||||
@@ -250,7 +250,7 @@ contains
|
||||
& ah,ph,bh,xh,cdh,options) bind(c) result(res)
|
||||
use psb_linsolve_mod
|
||||
use psb_prec_cbind_mod
|
||||
use psb_zkrylov_cbind_mod
|
||||
use psb_zlinsolve_cbind_mod
|
||||
implicit none
|
||||
integer(psb_c_ipk_) :: res
|
||||
type(psb_c_object_type) :: ah,cdh,ph,bh,xh
|
||||
|
||||
@@ -8,7 +8,7 @@ HERE=.
|
||||
|
||||
FINCLUDES=$(FMFLAG). $(FMFLAG)$(LIBDIR) $(FMFLAG)$(PSBLAS_INCDIR)
|
||||
#PSBLAS_LIBS= -L$(PSBLAS_LIBDIR) -L$(LIBDIR) $(CPSBLAS_LIB) $(PSBLAS_LIB)
|
||||
# -lpsb_krylov_cbind -lpsb_prec_cbind -lpsb_base_cbind
|
||||
# -lpsb_linsolve_cbind -lpsb_prec_cbind -lpsb_base_cbind
|
||||
PSBC_LIBS= -L$(PSBLAS_LIBDIR) -lpsb_cbind -lpsb_linsolve -lpsb_prec
|
||||
AMGC_LIBS=-L$(LIBDIR) -lamg_cbind -lamg_prec
|
||||
#
|
||||
|
||||
Reference in New Issue
Block a user