Δημοσιεύτηκε: 17 Μάιος 2010, 03:48
Το LWORK πρέπει να είναι >=max(1,3*N-1). Οχι step+1 αλλά 3*step+2yallou έγραψε:
- Κώδικας: Επιλογή όλων
call dsyev(JOBZ='V' ,UPLO='L' ,N=step+1 ,A=jac ,LDA=step+1 ,W=w ,WORK=eigen_values ,LWORK=step+1 ,INFO=info)