应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 使用MKL现成的函数，可是却出现了ACCESS VIOLATION
71/1返回列表
查看: 1568  |  回复: 6
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

国家重点型号

新虫 (初入文坛)

[求助] 使用MKL现成的函数，可是却出现了ACCESS VIOLATION

我打算求解大型稀疏矩阵问题，所以选用MKL里的LAPACK

随便写了一段测试一下，就出现forrtl: severe (157): Program Exception - access violation

错误就出现在MKL给的程序里，但是因为封装着，所以看不到。

以下是我的代码，SPOSV是我调用的LAPACK函数:

      program main

      REAL A1(5,5),B1(5,3)
   
      INTERFACE
      
         SUBROUTINE SPOSV(A,B)
         
          REAL A(:,
          REAL B(:,
         
         END SUBROUTINE SPOSV
         
      END INTERFACE
      
      DATA A1/38,3,4,6,5,3,48,6,7,7,4,6,52,1,6,6,7,1,56,10,5,7,6,10,74/
      
      DATA B1/56,71,69,80,102,112,142,138,160,204,168,213,207,240,306/

      CALL SPOSV(A1,B1)     
      
      DO I=1,5
      
      WRITE(*,*)(B1(I,J),J=1,3)
      
      END DO
      
      end program main

*************************************************************************

MKL给的子程序里，用的是假定形状数组，这个需要在主程序里加上显示借口。我之前没有做。

但是现在加上了，却还是不行，问题依旧。具体问题出现在“++pfbegin; ”这一行：

#ifdef CRTDLL
void __cdecl _initterm (
#else  /* CRTDLL */
static void __cdecl _initterm (
#endif  /* CRTDLL */
        _PVFV * pfbegin,
        _PVFV * pfend
        )
{
        /*
         * walk the table of function pointers from the bottom up, until
         * the end is encountered.  Do not skip the first entry.  The initial
         * value of pfbegin points to the first valid entry.  Do not try to
         * execute what pfend points to.  Only entries before pfend are valid.
         */
        while ( pfbegin < pfend )
        {
            /*
             * if current table entry is non-NULL, call thru it.
             */
            if ( *pfbegin != NULL )
                (**pfbegin)();               
            ++pfbegin;     ！！！！问题出现在这里
        }
}

这一段据说是在对全局变量进行初始化。但是并不懂得具体对应什么问题。

******************************************************************
回复此楼

» 猜你喜欢
1楼 2015-12-05 09:36:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

国家重点型号

新虫 (初入文坛)
自挽一个

发自小木虫Android客户端
回复此楼
2楼2015-12-05 10:53:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

国家重点型号

新虫 (初入文坛)
自挽一个

发自小木虫Android客户端
回复此楼
3楼2015-12-05 16:06:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

国家重点型号

新虫 (初入文坛)
已经解决了～

发自小木虫Android客户端
回复此楼
4楼2015-12-13 21:39:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小红豆

主管区长 (知名作家)

优秀区长优秀区长
引用回帖:
4楼: Originally posted by 国家重点型号 at 2015-12-13 21:39:47
已经解决了～

麻烦一下 怎么解决啊
赞一下 回复此楼
5楼2016-09-12 17:33:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

国家重点型号

新虫 (初入文坛)
引用回帖:
5楼: Originally posted by 小红豆 at 2016-09-12 17:33:12
麻烦一下 怎么解决啊 ...

去FORTRAN论坛可解决

bbs.fcode.cn
赞一下 回复此楼
6楼2016-09-12 18:11:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小红豆

主管区长 (知名作家)

优秀区长优秀区长
引用回帖:
6楼: Originally posted by 国家重点型号 at 2016-09-12 18:11:51
去FORTRAN论坛可解决

bbs.fcode.cn...

谢谢！
回复此楼
7楼2016-09-12 18:35:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 国家重点型号 的主题更新
71/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急 +3 FChKX8meu1ds 2026-11-09 4/200 2026-11-10 21:07 by Z7qfCsdIiD1T
[论文投稿] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +3 FChKX8meu1ds 2026-11-09 4/200 2026-11-10 20:56 by Z7qfCsdIiD1T
[硕博家园] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 FChKX8meu1ds 2026-11-09 4/200 2026-11-10 20:51 by Z7qfCsdIiD1T
[教师之家] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 cqv1zKnzd7hr 2026-11-09 5/250 2026-11-10 20:45 by Z7qfCsdIiD1T
[考研] 售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急 +3 cqv1zKnzd7hr 2026-11-09 4/200 2026-11-10 20:40 by Z7qfCsdIiD1T
[硕博家园] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +3 cqv1zKnzd7hr 2026-11-09 4/200 2026-11-10 20:07 by Z7qfCsdIiD1T
[教师之家] 售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急 +4 0TEMgxdT1eIw 2026-11-09 5/250 2026-11-10 20:01 by Z7qfCsdIiD1T
[公派出国] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +4 zSbvVX9JFl9J 2026-11-09 4/200 2026-11-10 19:39 by Z7qfCsdIiD1T
[考研] 售一区SCI文章T0P，我:8O.551.O54,科目全,可十急 +3 zSbvVX9JFl9J 2026-11-09 4/200 2026-11-10 19:17 by czAiolzR0IJC
[教师之家] 延安大学回应“副教授留绝笔信”：确已离世，正核实举报内容 +4 yexuqing 2026-11-04 6/300 2026-11-10 11:13 by susizheng
[教师之家] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 zSbvVX9JFl9J 2026-11-09 5/250 2026-11-10 09:23 by 1yv6QACPoY1E
[考博] 售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急 +3 zSbvVX9JFl9J 2026-11-09 4/200 2026-11-10 01:29 by FChKX8meu1ds
[考博] 27博士申请 +3 白白白ly 2026-11-09 3/150 2026-11-09 21:39 by szq0819
[文学芳草园] 厉娜 +3 张丹枫1991 2026-11-09 5/250 2026-11-09 16:53 by 张丹枫1991
[考研] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 15/750 2026-11-09 13:19 by Equinoxhua
[教师之家] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +5 5sJFDKp2kwuI 2026-11-06 9/450 2026-11-08 22:46 by l48hFd8Nwae2
[公派出国] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 16:12 by 5sJFDKp2kwuI
[硕博家园] 售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 16/800 2026-11-06 05:00 by qL1cU46YIdK0
[考研] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 02:04 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 hNpp4Y2CGvSC 2026-11-04 12/600 2026-11-06 01:53 by qL1cU46YIdK0
信息提示
关闭
请填处理意见
关闭