菜鸟求助：IVF中实矩阵求逆用哪个函数啊？
原先CVF还了解一点，现在用IVF有点迷糊了。求逆矩阵不是.i.了吗？program main
use imsl_libraries
implicit none
integer,parameter::n=3
real::a(n,n)=(/1.0,2.0,3.0,4.0,5.0,6.0,7.0,8.0,9.0/)
real::b(n,n)=(/5.0,6.0,4.0,8.0,9.0,7.0,2.0,3.0,1.0/)
real::c(n,n)
c=.i.a
write(*,*)c
end program求指点
多谢多谢！
cvf 中自动安装了 4.0 版本的 IMSL
现在您用 IVF，默认是不带有 IMSL 的，并且 4.0 的无法使用。
你需要：
1.安装高版本的IMSL
2.配置并使用
详解本论坛视频教程：http://v.fcode.cn/video-use_library.html vvt 发表于 2016-12-31 11:21
cvf 中自动安装了 4.0 版本的 IMSL
现在您用 IVF，默认是不带有 IMSL 的，并且 4.0 的无法使用。
多谢多谢，先学习一下，有问题再向您请教。
新手的福音啊{:5_118:} 矩阵求逆Excel 矩阵求逆Excel有现成的函数 经过提升，程序能运行了，不过只要是加上USE operation_x就报错误
1 Compilation Aborted (code 1)
不知道是哪里出了问题？
在工具-选项-IVF-compiles里面的includes和lib已经把相关的
C:\Program Files (x86)\VNI\imsl\fnl600\Intel64\include\dll
C:\Program Files (x86)\VNI\imsl\fnl600\Intel64\include\static
和C:\Program Files (x86)\VNI\imsl\fnl600\Intel64\lib
都加上了。
纠结啊，求指教，多谢多谢。
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
program main
include 'link_fnl_shared.h'
include 'link_fnl_static.h'
use operation_x !//这句
implicit none
integer,parameter::m=3,n=3
integer::mi,ni,iaq,jaq
real,parameter::hoa=7.0,h=0.1
real::a(m,n)
real::t(m,n)
real::e(m,n)
!
open(24,file='test12311339.txt')
do mi=1,m
do ni=1,n
t(mi,ni)=hoa*ni+hoa*mi
a(mi,ni)=hoa*(ni-1)+hoa*mi
end do
end do
e=a.x.t
write(24,*)e
end program weixing1531 发表于 2016-12-31 21:38
矩阵求逆Excel有现成的函数
嗯嗯 是的，不过求逆这个运算是一个大程序里面的一部分，单独拿出来计算可能会不方便了。
谢谢你 IMSL 的 bug ;-P vvt 发表于 2017-1-1 10:44
IMSL 的 bug
{:2_29:}
有什么解决的建议吗？
多谢多谢了 1. 用 matmul 代替 .x. 进行矩阵相乘。
2. 用 IMSL 5.0 代替 6.0和7.0（因为它们有bug）
3. 用 MKL 、Lapack 等代替 IMSL 进行求逆。
选其一
页:
[1]
2