您所在位置：主题：关于imsl下用.i.求逆矩阵的几点疑问
tianhy2010
[专家分：60] 发布于 2010-10-11 22:45:00
program exammm
use imsl
implicit none
real:: v=2.3
integer i
real h00(6,6)
real h0(6,6)
h00=0.0
do i=1,6
if(mod(i,2)==0) then
h00(i,i-1)=v
else
h00(i,i+1)=v
end if
end do
h0=.i.h00 ！这里求逆
write(*,*) h0 ！能得到逆矩阵的值
end program
以上是程序代码。运行可以得到逆矩阵h0。
但是如果我调试程序，F11，运行到
h0=.i.h00
会提示你： please enter the path for OPERATION_I F90
或者有时会提示：please enter the path for CRT0.C
后面这个提示不是每次都会出现，偶尔会出现，为什么会有这样事呢？
[em7][em7][em7][em8][em8][em8][em10][em10][em10][em12][em12][em12]
use imsl
implicit none
real:: v=2.3
integer i
real h00(6,6)
real h0(6,6)
h00=0.0
do i=1,6
if(mod(i,2)==0) then
h00(i,i-1)=v
else
h00(i,i+1)=v
end if
end do
h0=.i.h00 ！这里求逆
write(*,*) h0 ！能得到逆矩阵的值
end program
以上是程序代码。运行可以得到逆矩阵h0。
但是如果我调试程序，F11，运行到
h0=.i.h00
会提示你： please enter the path for OPERATION_I F90
或者有时会提示：please enter the path for CRT0.C
后面这个提示不是每次都会出现，偶尔会出现，为什么会有这样事呢？
[em7][em7][em7][em8][em8][em8][em10][em10][em10][em12][em12][em12]
