Article View: comp.lang.misc
Article #185Re: Fortran90 and Arrays
From: Peter da Silva
Date: Mon, 13 Apr 1992 18:03
Date: Mon, 13 Apr 1992 18:03
28 lines
1606 bytes
1606 bytes
In article <sb9e0INNdbb@network.ucsd.edu> mbk@lyapunov.ucsd.edu (Matt Kennel) writes:
> On the other hand, what does it mean to index an array with a complex number?
Well, that depends. If you're talking about an integral complex number then
it could be quite useful. If you're talking about a complex real then you need
to address the question of what it means to index an array with a real.
Perhaps your array contains a set of experimental results, and you want to
extract the result for a given phase. Then:
A = array(complex integer) of float;
c = function_returning_complex_float(args);
A(c) = x
Becomes equivalent to:
A = array(integer, integer) of float;
A(integer(real(c)), integer(complex(c))) = x
[irrelevant discussion about terse languages omitted... I would
hardly call Smalltalk terse]
--
/F{findfont exch scalefont setfont}def /S{moveto show}def /T{/Times-Roman F}def
8 T(Ferranti International Controls Corporation)24 28 S(+1 713 274 5180)24 12 S
(Sugar Land, TX 77487-5012)24 20 S 12 /Courier F(`-_-')320 32 S( 'U` )320 16 S
12 T(Peter da Silva)24 36 S 16 T(Have you hugged your wolf today?)358 24 S
Technical Details
Message-ID:
<id.ZCVO.9NA@ferranti.com>Path:
arc1-ca.pugleaf.net!sparky!uunet!zaphod.mps.ohio-state.edu!menudo.uh.edu!sugar!ficc!peterReferences:
<1992Apr11.172154.21417@yrloc.ipsa.reuter.COM> <sb9e0INNdbb@network.ucsd.edu>Show Full Headers
Complete Article Headers
Newsgroups: comp.lang.misc Path: arc1-ca.pugleaf.net!sparky!uunet!zaphod.mps.ohio-state.edu!menudo.uh.edu!sugar!ficc!peter From: peter@ferranti.com (Peter da Silva) Subject: Re: Fortran90 and Arrays Message-ID: <id.ZCVO.9NA@ferranti.com> Sender: peter@ferranti.com (peter da silva) Organization: Xenix Support, FICC References: <1992Apr11.172154.21417@yrloc.ipsa.reuter.COM> <sb9e0INNdbb@network.ucsd.edu> Date: Mon, 13 Apr 1992 18:03:09 GMT Lines: 28