psblas3-type-indexed
Salvatore Filippone 14 years ago
parent dbbbcf5fc7
commit 3bf487d6e4

@ -106,9 +106,9 @@ end subroutine psb_dfree
! frees a dense matrix structure ! frees a dense matrix structure
! !
! Arguments: ! Arguments:
! x():) - real, allocatable The dense matrix to be freed. ! x(:) - real, allocatable The dense matrix to be freed.
! desc_a - type(psb_desc_type). The communication descriptor. ! desc_a - type(psb_desc_type). The communication descriptor.
! info - integer. Return code ! info - integer. Return code
subroutine psb_dfreev(x, desc_a, info) subroutine psb_dfreev(x, desc_a, info)
use psb_base_mod, psb_protect_name => psb_dfreev use psb_base_mod, psb_protect_name => psb_dfreev
implicit none implicit none

@ -335,7 +335,7 @@ ac_link='${MPIFC-$FC} -o conftest${ac_exeext} $FCFLAGS $LDFLAGS conftest.$ac_ext
dnl Warning : square brackets are EVIL! dnl Warning : square brackets are EVIL!
[cat > conftest.$ac_ext <<EOF [cat > conftest.$ac_ext <<EOF
program test program test
use psb_sparse_mod use psb_base_mod
end program test end program test
EOF EOF
if AC_TRY_EVAL(ac_link) && test -s conftest${ac_exeext}; then if AC_TRY_EVAL(ac_link) && test -s conftest${ac_exeext}; then

@ -43,7 +43,7 @@ AC_INIT([PSBLAS],3.0, salvatore.filippone@uniroma2.it)
psblas_cv_version="3.0" psblas_cv_version="3.0"
# A sample source file # A sample source file
AC_CONFIG_SRCDIR([base/modules/psb_sparse_mod.f90]) AC_CONFIG_SRCDIR([base/modules/psb_base_mod.f90])
dnl AC_CONFIG_AUX_DIR(config) dnl AC_CONFIG_AUX_DIR(config)
# Our custom M4 macros are in the 'config' directory # Our custom M4 macros are in the 'config' directory

Loading…
Cancel
Save