From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: a07f3367d7,a40f6d312191b68e
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,ASCII-7-bit
X-Received: by 10.66.72.232 with SMTP id g8mr7783465pav.23.1357490153104;
        Sun, 06 Jan 2013 08:35:53 -0800 (PST)
From: Simon Wright <simon@pushface.org>
Newsgroups: comp.lang.ada
Subject: Re: A thicker binding for Lapack
Date: Sun, 30 Dec 2012 19:41:54 +0000
Organization: A noiseless patient Spider
Message-ID: <lywqvzwcn1.fsf@pushface.org>
References: <9242b176-7050-46f8-a65d-6091aa4b2de8@googlegroups.com>
	<0bc6a851-8eea-4279-b616-3f7895049d4b@googlegroups.com>
	<6638b519-7fad-4908-9b80-3a43e6a0b8f7@googlegroups.com>
	<ly623ky6h9.fsf@pushface.org>
	<97d92098-cb4d-452a-91b9-eea7eb62eb41@googlegroups.com>
Mime-Version: 1.0
Injection-Info: mx04.eternal-september.org;
 posting-host="585248293da7adcafb924c79c19cf5ec";
	logging-data="20618"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX1+W6um9scKri1kSH7KZqrVO352+I8oWAr4="
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.2 (darwin)
Cancel-Lock: sha1:KKceS6xVve9bQKgOsWPb2EUfI34=
	sha1:Dr/7HODmgbLlQIwSKQe+I5AMCXM=
Path: 
 s9ni85603pbb.0!nntp.google.com!npeer01.iad.highwinds-media.com!news.highwinds-media.com!feed-me.highwinds-media.com!border3.nntp.dca.giganews.com!border1.nntp.dca.giganews.com!nntp.giganews.com!news.mccarragher.com!news.mccarragher.com!news.grnet.gr!de-l.enfer-du-nord.net!feeder2.enfer-du-nord.net!eternal-september.org!feeder.eternal-september.org!mx04.eternal-september.org!.POSTED!not-for-mail
X-Received-Bytes: 2493
Content-Type: text/plain
Date: 2012-12-30T19:41:54+00:00
List-Id: <comp.lang.ada>

jpwoodruff@gmail.com writes:

> On Saturday, December 29, 2012 12:59:46 PM UTC-7, Simon Wright wrote:
>> jpwoodruff@gmail.com writes:
>> 
>> > Conclusion:   transpose appears necessary.
>> 
>> For info, the compiler (well, GNAT) will automatically transpose when
>> doing assignment between arrays with different conventions. And it's
>> quicker (not by very much at -O2, though).
>> 
>
> I'll be darned.  You are both right about pragma Convention.  I am
> going to unwrite some code.  Even my old gnat gpl 2010 got it right. 
> I need to (re)learn to trust Lady Ada.
>
>
> From Simon's context, I found System.Generic_Real_LAPACK. There is
> quite a lot there.  I want to spend some time reading that, then
> determine if (as I suspect) the problem I stated has already been
> solved by the structures there.

System.Generic_Real_LAPACK looks a bit off to me - lots of unchecked
conversions of address-of-array into access-to-another-array-type. But
it may do what you need.

NB, GNATs later than GCC 4.6 or GNAT GPL 2010 don't use LAPACK or
BLAS. I wrote a bit about this on comp.lang.ada at [1].

[1] http://coding.derkeiler.com/Archive/Ada/comp.lang.ada/2012-07/msg00138.html