- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
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
Link Copied
1 Reply
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I reproduced this using the current CXE 2013 SP1 Update 2 (Version 14.0.2.144 Build 20140120) and reported it to Development (see internal tracking id below).
You can remove the -C to avoid the error (as noted) or use the alternative spelling: -check
(Internal tracking id: DPD200255045)
![](/skins/images/D2683F18326913BBA0436CB7114DD569/responsive_peak/images/icon_anonymous_message.png)
Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page