您所在位置：主题：imsl小例子出错
zijide
[专家分：0] 发布于 2010-04-26 17:21:00
想求一个gamma分布。
program main
use imsl
implicit none
real a,x,p1
real gamdf
external gamdf
a=4.0
x=0.5
p1=gamdf(x,a)
write(*,*) 'p1=',p1
end
------------------------
出错：
E:\kk\kk.f90(9) : Error: The attributes of this name conflict with those made accessible by a USE statement. [GAMDF]
p1=gamdf(x,a)[em15]
请大家看看，谢谢了
program main
use imsl
implicit none
real a,x,p1
real gamdf
external gamdf
a=4.0
x=0.5
p1=gamdf(x,a)
write(*,*) 'p1=',p1
end
------------------------
出错：
E:\kk\kk.f90(9) : Error: The attributes of this name conflict with those made accessible by a USE statement. [GAMDF]
p1=gamdf(x,a)[em15]
请大家看看，谢谢了