DomainKey-Signature: a=rsa-sha1; c=nofws; d=sourceware.org; h=list-id
	:list-unsubscribe:list-subscribe:list-archive:list-post
	:list-help:sender:mime-version:date:message-id:subject:from:to
	:content-type; q=dns; s=default; b=lS3s9jFeA3v/M80sQNeIHMThvOF2X
	GmEf0DsOkZ9i8cUP3m1FRYxiBkC7cZLJjvwqYGJT/iCdOb+99FVn7Cc81pNJWdLA
	vU36BTXcpPV0jXFKd0N4eKpEH/ovAqgEWAa23+j1U31rW/zpYu6epYvuchzqMazZ
	oQCKwZtVOIHmzE=
Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
MIME-Version: 1.0
Date: Mon, 20 Oct 2014 02:35:30 -0400
Message-ID: <CAHeeG7cRDfjebV4LvFQHpODr-G90CBQ4zY8b-xHnO6SLVGZc8Q@mail.gmail.com>
Subject: gfortran and lapack problem
From: Christian <cdeb77 AT gmail DOT com>
To: cygwin AT cygwin DOT com
Content-Type: text/plain; charset=UTF-8

Hi all,

I'm having problems setting up gfrortran with lapack. I installed
lapack and liblapack-devel from cygwin, but when I try to compile I
cannot get any result, although I don't get any error. This a very
simple code I'm trying to compile:

PROGRAM MyTest
  IMPLICIT NONE
  DOUBLE PRECISION :: A(2,2) = RESHAPE( (/1, 2, 3, 4/), (/2,2/) )
  DOUBLE PRECISION :: B(2,1) = RESHAPE( (/5, 6/), (/2,1/) )
  INTEGER, DIMENSION(2) :: ipiv
  INTEGER :: n, info
  EXTERNAL DGESV
  PRINT *,'Printing the results'
  CALL DGESV(2, 1, A, 2, ipiv, B, 2, info)
  PRINT *, info
  PRINT *,'End printing'
END PROGRAM MyTest

I compile it as gfortran MyTest.f90 -o MyTest -llapack -lblas. I don't
get any errors (it says "compilation finished"), but the output file
doesn't print anything (neither the strings, or the variable info). If
I comment the "CALL DGESV" line, it does print everything (with
info=0, of course).

Am I doing something wrong or is there any problem in my lapack installation?

Best,
C

--
Problem reports:       http://cygwin.com/problems.html
FAQ:                   http://cygwin.com/faq/
Documentation:         http://cygwin.com/docs.html
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple