24小时热门版块排行榜

返回列表

当前主题已经存档。

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

落日照秋草

木虫 (正式写手)

应助: 8 (幼儿园)
金币: 2388.6
散金: 617
红花: 8
帖子: 670
在线: 912小时
虫号: 472183
注册: 2007-12-04
专业: 药物化学

[交流] 【求助】求助LAPACK 问题！【已完结】已有1人参与

请问哪位知道ＺＧＥＴＲＩ这个语句如何使用啊？

[ Last edited by 余泽成 on 2010-3-28 at 19:08 ]

回复此楼

» 猜你喜欢

1楼 2010-01-27 16:27:11

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

ftp0000

木虫 (小有名气)

应助: 0 (幼儿园)
金币: 1822.1
帖子: 292
在线: 6.6小时
虫号: 585530
注册: 2008-08-08
专业: 凝聚态物性 II ：电子结构

★
小木虫(金币+0.5):给个红包，谢谢回帖交流
jjdg:直接pm5楼吧！那样会快很多~ 2010-02-12 00:04

在windows环境下，总是马上装成功了，提示错误，好像是跟其他什么软件冲突了

还没有找到原因，没有装上

赞一下(2人)

回复此楼

7楼2010-02-11 20:23:50

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

查看全部 11 个回答

dic213

木虫 (著名写手)

第三军团儿童团团长

应助: 0 (幼儿园)
金币: 1777.4
散金: 5
帖子: 2476
在线: 37.1小时
虫号: 42931
注册: 2004-04-03
性别: GG
专业: 计算数学

★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
jjdg(金币+2):辛苦了 1-27 19:07

SUBROUTINE ZGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO )
016: *  Purpose
017: *  =======
018: *
019: *  ZGETRI computes the inverse of a matrix using the LU factorization
020: *  computed by ZGETRF.
021: *
022: *  This method inverts U and then computes inv(A) by solving the system
023: *  inv(A)*L = inv(U) for inv(A).
024: *
025: *  Arguments
026: *  =========
027: *
028: *  N    (input) INTEGER
029: *       The order of the matrix A.  N >= 0.
030: *
031: *  A    (input/output) COMPLEX*16 array, dimension (LDA,N)
032: *       On entry, the factors L and U from the factorization
033: *       A = P*L*U as computed by ZGETRF.
034: *       On exit, if INFO = 0, the inverse of the original matrix A.
035: *
036: *  LDA    (input) INTEGER
037: *       The leading dimension of the array A.  LDA >= max(1,N).
038: *
039: *  IPIV (input) INTEGER array, dimension (N)
040: *       The pivot indices from ZGETRF; for 1<=i<=N, row i of the
041: *       matrix was interchanged with row IPIV(i).
042: *
043: *  WORK (workspace/output) COMPLEX*16 array, dimension (MAX(1,LWORK))
044: *       On exit, if INFO=0, then WORK(1) returns the optimal LWORK.
045: *
046: *  LWORK (input) INTEGER
047: *       The dimension of the array WORK.  LWORK >= max(1,N).
048: *       For optimal performance LWORK >= N*NB, where NB is
049: *       the optimal blocksize returned by ILAENV.
050: *
051: *       If LWORK = -1, then a workspace query is assumed; the routine
052: *       only calculates the optimal size of the WORK array, returns
053: *       this value as the first entry of the WORK array, and no error
054: *       message related to LWORK is issued by XERBLA.
055: *
056: *  INFO (output) INTEGER
057: *       = 0:  successful exit
058: *       < 0:  if INFO = -i, the i-th argument had an illegal value
059: *       > 0:  if INFO = i, U(i,i) is exactly zero; the matrix is
060: *             singular and its inverse could not be computed.
061: *
062: *  =====================================================================

http://www.netlib.org/lapack/explore-html/zgetri.f.html

赞一下(11人)

回复此楼

春梦随云散, 飞花逐水流. 寄言众儿女, 何必觅闲愁.