|
目前的编译环境是VS 2013 + IVF2015 +IMSL 7.0,执行下面的测试代码时,提示Cannot find license file,不知道是否是IMSL没有破解成功,还是什么问题,请各位大侠指点,谢谢了!
编译链接都没有任何问题。
[Fortran] 纯文本查看 复制代码 01 | include 'link_fnl_shared.h' |
04 | use error_option_packet |
05 | integer , parameter :: NDATA = 10 , N = 20 |
06 | real XDATA ( NDATA ) , FDATA ( NDATA ) |
07 | real XVEC ( N ) , VALUE ( N ) |
08 | real , parameter :: xmin = -5.0 , xmax = 5.0 |
12 | xinc = ( xmax - xmin ) / ( NDATA -1 ) |
16 | FDATA ( I ) = SIN ( XDATA ( I ) ) |
20 | xinc = ( xmax - xmin ) / ( N -1 ) |
27 | call CSIEZ ( NDATA , XDATA , FDATA , N , XVEC , VALUE ) |
30 | write ( * , "('(',F5.2,',',F5.2,') error:'F6.3)" ) & |
31 | XVEC ( i ) , VALUE ( i ) , VALUE ( i ) - sin ( XVEC ( i ) ) |
|
|