mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-19 20:32:12 +00:00
*** empty log message ***
This commit is contained in:
@@ -12,8 +12,11 @@ FOBJS = psb_dallc.o psb_dasb.o psb_dcsrp.o psb_descprt.o \
|
||||
MPFOBJS = psb_descasb.o psb_dcsrovr.o
|
||||
|
||||
INCDIRS = -I ../../lib -I .
|
||||
LIBDIR = ../../lib
|
||||
|
||||
lib: mpfobjs $(FOBJS)
|
||||
$(AR) $(LIBDIR)/$(LIBNAME) $(MPFOBJS) $(FOBJS)
|
||||
$(RANLIB) $(LIBDIR)/$(LIBNAME)
|
||||
|
||||
|
||||
mpfobjs:
|
||||
@@ -22,3 +25,5 @@ mpfobjs:
|
||||
|
||||
clean:
|
||||
/bin/rm -f $(MPFOBJS) $(FOBJS)
|
||||
|
||||
veryclean: clean
|
||||
|
||||
@@ -22,7 +22,7 @@ subroutine psb_dalloc(m, n, x, desc_a, info, js)
|
||||
!....parameters...
|
||||
integer, intent(in) :: m,n
|
||||
real(kind(1.d0)), pointer :: x(:,:)
|
||||
type(psb_desc_type), intent(inout) :: desc_a
|
||||
type(psb_desc_type), intent(in) :: desc_a
|
||||
integer :: info
|
||||
integer, optional, intent(in) :: js
|
||||
|
||||
|
||||
Reference in New Issue
Block a user