Mercurial > hg > octave-nkf

annotate libcruft/lapack-xtra/xilaenv.f @ 12432:455f2db40a8f release-3-4-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
update NEWS
author John W. Eaton <jwe@octave.org>
date Wed, 09 Feb 2011 16:29:14 -0500
parents 8b22207ef9ca
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7477
8b22207ef9ca ilaenv --> xilaenv
John W. Eaton <jwe@octave.org>
parents:
diff changeset
1 subroutine xilaenv (ispec, name, opts, n1, n2, n3, n4, retval)
8b22207ef9ca ilaenv --> xilaenv
John W. Eaton <jwe@octave.org>
parents:
diff changeset
2 character*(*) name, opts
8b22207ef9ca ilaenv --> xilaenv
John W. Eaton <jwe@octave.org>
parents:
diff changeset
3 integer ilaenv, ispec, n1, n2, n3, n4, retval
8b22207ef9ca ilaenv --> xilaenv
John W. Eaton <jwe@octave.org>
parents:
diff changeset
4 retval = ilaenv (ispec, name, opts, n1, n2, n3, n4)
8b22207ef9ca ilaenv --> xilaenv
John W. Eaton <jwe@octave.org>
parents:
diff changeset
5 return
8b22207ef9ca ilaenv --> xilaenv
John W. Eaton <jwe@octave.org>
parents:
diff changeset
6 end