Question

我与英特尔Fortran Compiler11在2008年视频演播室遇到腐败问题。 Im在Windows 7 64-bit上工作。

This is a call to a (F77) lapack subroutine in my F90 program:

  call dgetrs( N , nbParams, one, a, nbParams, ipv, x, nbParams, err)

在发出这一呼吁之前,夸张显示了所有参数的预期价值。 a 和x 两种“可转移”变量,其大小(nbParams,nbParams)和(nbParams)分别。

然而,在执行这条线后,执行停止了侵犯出入通道读址0x00000001。自2006年以来我已经以易卜拉方式汇编了能够在电话中穿透的包装材料,我看到,除了输电外,所有东西都只是在利比里亚人总局的第一份声明中腐败。

  SUBROUTINE DGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO )
  ...
  CHARACTER          TRANS
  INTEGER            INFO, LDA, LDB, N, NRHS
  ...
  INTEGER            IPIV( * )
  DOUBLE PRECISION   A( LDA, * ), B( LDB, * )
  ......
  INFO = 0     **--> Now all input vars but TRANS are corrupted or dereferenced!**

我会尝试一切,我无法找到问题。谁能帮助我找到问题?

感谢你们的帮助!

Answer 1

这种问题通常出现在没有接口的假定形形形形阵列中。 1. 宣布接口如下:

INTERFACE
   SUBROUTINE DGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO )
    CHARACTER          TRANS
    INTEGER            INFO, LDA, LDB, N, NRHS
    INTEGER            IPIV( * )
    DOUBLE PRECISION   A( LDA, * ), B( LDB, * )
  END SUBROUTINE
END INTERFACE

友情链接