A problem I have had more than once, but most recently using xlf:
The following statement
IF (K.GT.0 .AND. X(K).GT.0.) THEN
produces an error condition when K=0 and X is dimensioned in a normal way,
i.e., 0 is an invalid subscript for X.
My question is whether this behavior is a violation of the FORTRAN standard.
Thanks, Wes
Dr. W. J. Metzger Experimental High Energy Physics Group
tel. +31-24-3653127 Faculty of Natural Sciences
+31-24-3652099 (secr.) University of Nijmegen
fax. +31-24-3652191 Toernooiveld 1
telex 48228 wina nl 6525 ED Nijmegen, The Netherlands
e-mail: [log in to unmask] or [log in to unmask]
or [log in to unmask] [log in to unmask]
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|