Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!decvax!mcnc!kenkel
From: kenkel@mcnc.UUCP (Stephen Kenkel)
Newsgroups: net.lang.f77
Subject: possible implied-do bug?
Message-ID: <1452@alvin.mcnc.UUCP>
Date: Tue, 24-Jun-86 12:23:51 EDT
Article-I.D.: alvin.1452
Posted: Tue Jun 24 12:23:51 1986
Date-Received: Thu, 26-Jun-86 04:22:26 EDT
Organization: Microelectronics Center of NC; RTP, NC
Lines: 18
Keywords: implied do, parenthesis

The following program compiles under VMS fortran, but not
f77:

	  dimension l(10),m(10),n(10)
          write (*, * ) i,((l(k), m(k), n (k)), k=1,10)
	  end

This version works:

	  dimension l(10),m(10),n(10)
          write (*, * ) i,(l(k), m(k), n (k), k=1,10)
	  end

The extra parenthesis around the items in the implied do list
appears to be causing trouble.  Is this a bug, or is the compiler
in compliance with the standard?

Thanks.