|
|
|
subroutine dcsmm(trans,m,n,k,alpha,pl,fida,descra,a,ia1,ia2,&
|
|
|
|
& infoa,pr,b,ldb,beta,c,ldc,work,lwork,ierror)
|
|
|
|
subroutine dcsrp(trans,m,n,fida,descra,ia1,ia2,infoa,&
|
|
|
|
& pl,fidt,descrt,t,it1,it2,infot,pr,&
|
|
|
|
& ia2, infoa, ia, ja, fidh, descrh, h, ih1, ih2,&
|
|
|
|
subroutine dswmm(trans,m,n,k,alpha,fida,descra,a,ia1,ia2,&
|
|
|
|
& infoa,b,ldb,beta,c,ldc,work,lwork,ierror)
|
|
|
|
subroutine dswprt(m,n,fida,descra,a,ia1,ia2,infoa,title,&
|
|
|
|
subroutine dswsm(trans,m,n,alpha,unitd,d,fidt,descrt,t,it1,it2,&
|
|
|
|
& infot,b,ldb,beta,c,ldc,work,lwork,ierror)
|