fdurastante
/
psblas3
mirror of https://github.com/sfilippone/psblas3.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Changed copyright statement.

Browse Source
psblas3-type-indexed
Salvatore Filippone 18 years ago
parent 1ac9dae334
commit bf9640b4c2
40 changed files with 56 additions and 56 deletions
Show Stats Download Patch File Download Diff File

2
src/prec/psb_dasmatbld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dbaseprc_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dbaseprc_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dbjac_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dbldaggrmat.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_ddiagsc_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dgenaggrmap.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dilu_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dilu_fct.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

16
src/prec/psb_dmlprc_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without
@ -165,10 +165,10 @@ subroutine psb_dmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! 1. X(1) = Xext ! 1. X(1) = Xext
! 2. DO ILEV=2,NLEV ! 2. DO ILEV=2,NLEV
! X(ILEV) = AV(PR_SM_T_)*X(ILEV-1) ! X(ILEV) = AV(PR_SM_T_)*X(ILEV-1)
! 3. Y(ILEV) = (K(ILEV)**(-1))*X(ILEV) ! Y(ILEV) = (K(ILEV)**(-1))*X(ILEV)
! 4. DO ILEV=NLEV-1,1,-1 ! 3. DO ILEV=NLEV-1,1,-1
! Y(ILEV) = AV(PR_SM_)*Y(ILEV+1) ! Y(ILEV) = AV(PR_SM_)*Y(ILEV+1)
! 5. Yext = beta*Yext + Y(1) ! 4. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0
@ -294,12 +294,12 @@ subroutine psb_dmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! Y(ILEV) = AV(PR_SM_,ILEV+1)*Y(ILEV+1) ! Y(ILEV) = AV(PR_SM_,ILEV+1)*Y(ILEV+1)
! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV)) ! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV))
! !
! 5. Yext = beta*Yext + Y(1) ! 5. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0
! !
! Also: post smoothing is not spelled out in detail in DD. ! Also: post smoothing in the ref. DD is only presented for NLEV=2.
! !
! !
@ -433,7 +433,7 @@ subroutine psb_dmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! TX(ILEV) = (X(ILEV)-A(ILEV)*Y(ILEV)) ! TX(ILEV) = (X(ILEV)-A(ILEV)*Y(ILEV))
! 5. DO ILEV=NLEV-1,1,-1 ! 5. DO ILEV=NLEV-1,1,-1
! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1) ! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1)
! 6. Yext = beta*Yext + Y(1) ! 6. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0
@ -584,7 +584,7 @@ subroutine psb_dmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! 5. DO ILEV=NLEV-1,1,-1 ! 5. DO ILEV=NLEV-1,1,-1
! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1) ! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1)
! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV)) ! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV))
! 6. Yext = beta*Yext + Y(1) ! 6. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0

2
src/prec/psb_dmlprc_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

4
src/prec/psb_dprc_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without
@ -156,7 +156,7 @@ end subroutine psb_dprc_aply
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dprecbld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dprecfree.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dprecset.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dslu_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dsp_renum.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_dumf_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_slu_impl.c
Unescape Escape View File

@ -6,7 +6,7 @@
* *
* (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata * (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
* Alfredo Buttari * Alfredo Buttari
* Daniela Di Serafino II University of Naples * Daniela di Serafino Second University of Naples
* Pasqua D'Ambra ICAR-CNR * Pasqua D'Ambra ICAR-CNR
* *
* Redistribution and use in source and binary forms, with or without * Redistribution and use in source and binary forms, with or without

2
src/prec/psb_umf_impl.c
Unescape Escape View File

@ -6,7 +6,7 @@
* *
* (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata * (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
* Alfredo Buttari * Alfredo Buttari
* Daniela Di Serafino II University of Naples * Daniela di Serafino Second University of Naples
* Pasqua D'Ambra ICAR-CNR * Pasqua D'Ambra ICAR-CNR
* *
* Redistribution and use in source and binary forms, with or without * Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zasmatbld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zbaseprc_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zbaseprc_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zbjac_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zbldaggrmat.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zdiagsc_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zgenaggrmap.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zilu_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zilu_fct.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

16
src/prec/psb_zmlprc_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without
@ -164,10 +164,10 @@ subroutine psb_zmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! 1. X(1) = Xext ! 1. X(1) = Xext
! 2. DO ILEV=2,NLEV ! 2. DO ILEV=2,NLEV
! X(ILEV) = AV(PR_SM_T_)*X(ILEV-1) ! X(ILEV) = AV(PR_SM_T_)*X(ILEV-1)
! 3. Y(ILEV) = (K(ILEV)**(-1))*X(ILEV) ! Y(ILEV) = (K(ILEV)**(-1))*X(ILEV)
! 4. DO ILEV=NLEV-1,1,-1 ! 3. DO ILEV=NLEV-1,1,-1
! Y(ILEV) = AV(PR_SM_)*Y(ILEV+1) ! Y(ILEV) = AV(PR_SM_)*Y(ILEV+1)
! 5. Yext = beta*Yext + Y(1) ! 4. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0
@ -293,12 +293,12 @@ subroutine psb_zmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! Y(ILEV) = AV(PR_SM_,ILEV+1)*Y(ILEV+1) ! Y(ILEV) = AV(PR_SM_,ILEV+1)*Y(ILEV+1)
! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV)) ! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV))
! !
! 5. Yext = beta*Yext + Y(1) ! 5. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0
! !
! Also: post smoothing is not spelled out in detail in DD. ! Also: post smoothing in the ref. DD is only presented for NLEV=2.
! !
! !
@ -432,7 +432,7 @@ subroutine psb_zmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! TX(ILEV) = (X(ILEV)-A(ILEV)*Y(ILEV)) ! TX(ILEV) = (X(ILEV)-A(ILEV)*Y(ILEV))
! 5. DO ILEV=NLEV-1,1,-1 ! 5. DO ILEV=NLEV-1,1,-1
! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1) ! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1)
! 6. Yext = beta*Yext + Y(1) ! 6. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0
@ -583,7 +583,7 @@ subroutine psb_zmlprc_aply(alpha,baseprecv,x,beta,y,desc_data,trans,work,info)
! 5. DO ILEV=NLEV-1,1,-1 ! 5. DO ILEV=NLEV-1,1,-1
! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1) ! Y(ILEV) = Y(ILEV) + AV(PR_SM_,ILEV+1)*Y(ILEV+1)
! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV)) ! Y(ILEV) = Y(ILEV) + (K(ILEV)**(-1))*(X(ILEV)-A(ILEV)*Y(ILEV))
! 6. Yext = beta*Yext + Y(1) ! 6. Yext = beta*Yext + alpha*Y(1)
! !
! Note: level numbering reversed wrt ref. DD, i.e. ! Note: level numbering reversed wrt ref. DD, i.e.
! 1..NLEV <=> (j) <-> 0 ! 1..NLEV <=> (j) <-> 0

2
src/prec/psb_zmlprc_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

4
src/prec/psb_zprc_aply.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without
@ -156,7 +156,7 @@ end subroutine psb_zprc_aply
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zprecbld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zprecfree.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zprecset.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zslu_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zslu_impl.c
Unescape Escape View File

@ -6,7 +6,7 @@
* *
* (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata * (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
* Alfredo Buttari * Alfredo Buttari
* Daniela Di Serafino II University of Naples * Daniela di Serafino Second University of Naples
* Pasqua D'Ambra ICAR-CNR * Pasqua D'Ambra ICAR-CNR
* *
* Redistribution and use in source and binary forms, with or without * Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zsp_renum.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zumf_bld.f90
Unescape Escape View File

@ -6,7 +6,7 @@
!!$ Parallel Sparse BLAS v2.0 !!$ Parallel Sparse BLAS v2.0
!!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata !!$ (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
!!$ Alfredo Buttari University of Rome Tor Vergata !!$ Alfredo Buttari University of Rome Tor Vergata
!!$ Daniela Di Serafino II University of Naples !!$ Daniela di Serafino Second University of Naples
!!$ Pasqua D'Ambra ICAR-CNR !!$ Pasqua D'Ambra ICAR-CNR
!!$ !!$
!!$ Redistribution and use in source and binary forms, with or without !!$ Redistribution and use in source and binary forms, with or without

2
src/prec/psb_zumf_impl.c
Unescape Escape View File

@ -6,7 +6,7 @@
* *
* (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata * (C) Copyright 2006 Salvatore Filippone University of Rome Tor Vergata
* Alfredo Buttari * Alfredo Buttari
* Daniela Di Serafino II University of Naples * Daniela di Serafino Second University of Naples
* Pasqua D'Ambra ICAR-CNR * Pasqua D'Ambra ICAR-CNR
* *
* Redistribution and use in source and binary forms, with or without * Redistribution and use in source and binary forms, with or without

Write Preview
Loading…
Cancel
Save