Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!cornell!vax5!sdry
From: sdry@vax5.CIT.CORNELL.EDU
Newsgroups: comp.lang.fortran
Subject: Re: fortran statement
Keywords: arrays, intrinsics, MOD, FORTRAN77
Message-ID: <19202@vax5.CIT.CORNELL.EDU>
Date: 31 Jul 89 16:51:35 GMT
References: <28605@beta.lanl.gov> <588BLUMBERG@BGUVM>
Sender: news@vax5.CIT.CORNELL.EDU
Reply-To: gelato@astrosun.tn.cornell.edu (Sergio Gelato)
Lines: 26
Bcc: <gelato@astrosun.tn.cornell.edu>

In article <588BLUMBERG@BGUVM> BLUMBERG@BGUVM.BITNET (Dan Blumberg, Dept. Of Geog. Ben Gurion Univ. Israel) writes:
>mod is the name of a two fimensional matrix sized I by J. MOd (n,2) is the
>cell in matrix Mod with the coordinates of n,2(like geographical coordinates).
>MOD 1 2 3 4 5
>    2
>    3
>    .
>    .
>    n X          < mod(n,2) reffers to this cell
>                                              good luck
>                                                Fight the Fort ran
>                                                  Danny

CDIR$ FLAME(MILD)	! Not a new CFT directive (in case you wondered)

This is only true if the program unit contains a DIMENSION or equivalent
declarative statement defining array MOD. Normally, MOD is an intrinsic
function ( MOD(I,J) returns the remainder of the division of I by J; thus,
IF (MOD(N,2).EQ.0) tests whether N is even. The original posting had just
such a statement.)
    As a general rule, an identifier followed by an argument list within
parentheses is interpreted as an external (or intrinsic) function call
unless it has been explicitly declared as an array.

CDIR$ FLAME(OFF)
					Sergio Gelato