Quantcast
Channel: Intel® Fortran Compiler
Viewing all articles
Browse latest Browse all 3270

-C options Internal compiler error

$
0
0
Hi all, 

The compiler is crashing with the following piece of code, with the options 
 ifort -O2 -c -C . removing -C seems to resolve the issue
Thanks


subroutine pinv(A,X)
implicit none
double complex,dimension(:,:),intent(in):: A
double complex,dimension(:,:) :: X
double complex,dimension(:,:), allocatable :: U,V
double complex,dimension(:), allocatable :: work
double precision,dimension(:), allocatable :: s,rwork
integer :: n,r,lwork,i,info
double precision :: tol

n = size(A,1)
X=A
![U,S,V] = svd(A)
lwork=5*n
allocate(work(lwork),s(n),rwork(lwork),U(n,n),V(n,n))
call zgesvd('A','A',n,n,X,n, s,U,n,V,n,work,lwork,rwork,info)
end subroutine pinv

 


Viewing all articles
Browse latest Browse all 3270

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>