From owner-sc22wg5@open-std.org  Thu Dec 11 19:41:27 2008
Return-Path: <owner-sc22wg5@open-std.org>
X-Original-To: sc22wg5-dom7
Delivered-To: sc22wg5-dom7@www2.open-std.org
Received: by www2.open-std.org (Postfix, from userid 521)
	id DDF29CA6006; Thu, 11 Dec 2008 19:41:27 +0100 (CET)
X-Original-To: sc22wg5@open-std.org
Delivered-To: sc22wg5@open-std.org
Received: from mail.jpl.nasa.gov (sentrion2.jpl.nasa.gov [128.149.139.106])
	by www2.open-std.org (Postfix) with ESMTP id EC61ACA3439
	for <sc22wg5@open-std.org>; Thu, 11 Dec 2008 19:41:25 +0100 (CET)
Received: from mprox2.jpl.nasa.gov (mprox2.jpl.nasa.gov [137.78.160.141])
	by mail.jpl.nasa.gov (Switch-3.3.2mp/Switch-3.3.2mp) with ESMTP id mBBIfLSk000811
	for <sc22wg5@open-std.org>; Thu, 11 Dec 2008 18:41:22 GMT
Received: from [137.79.7.57] (math.jpl.nasa.gov [137.79.7.57])
	(authenticated bits=0)
	by mprox2.jpl.nasa.gov (Switch-3.2.6/Switch-3.2.6) with ESMTP id mBBIfJTS016013
	(version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NOT)
	for <sc22wg5@open-std.org>; Thu, 11 Dec 2008 10:41:20 -0800
Subject: Re: (j3.2006) (SC22WG5.3817)   Response on the TR29113 draft N1761
From: Van Snyder <Van.Snyder@jpl.nasa.gov>
Reply-To: Van.Snyder@jpl.nasa.gov
To: WG5 <sc22wg5@open-std.org>
In-Reply-To: <20081211112028.E92D9C178E6@www2.open-std.org>
References: <493E10FF.6010504@llnl.gov>
	 <20081209174400.D37EDC178D6@www2.open-std.org>
	 <20081211112028.E92D9C178E6@www2.open-std.org>
Content-Type: text/plain
Organization: Yes
Date: Thu, 11 Dec 2008 10:41:19 -0800
Message-Id: <1229020879.15904.1112.camel@math.jpl.nasa.gov>
Mime-Version: 1.0
X-Mailer: Evolution 2.12.3 (2.12.3-8.el5_2.2) 
Content-Transfer-Encoding: 7bit
X-Source-IP: math.jpl.nasa.gov [137.79.7.57]
X-Source-Sender: Van.Snyder@jpl.nasa.gov
X-AUTH: Authorized
Sender: owner-sc22wg5@open-std.org
Precedence: bulk


On Thu, 2008-12-11 at 03:20 -0800, Robert Corbett wrote:
> I agree that adding a function RANK makes sense, even if it can
> be implemented another way.  Most people would not immediately
> recognized what SIZE(SHAPE(X)) does.  Most compilers would if it
> became a common idiom, but Fortran code should be understandable
> by humans as well as machines.

given
  dimension X(:,:,:), Y(..)
size(shape(x)) is not an initialization expression, but rank(x) would
be.  size(lbound(x)) ought to be an initialization expression, but some
vendors have gotten that wrong.  It's hard to imagine not recognizing
that rank(x) is an initialization expression, even though rank(y) would
not be an initialization expression.

-- 
Van Snyder                    |  What fraction of Americans believe 
Van.Snyder@jpl.nasa.gov       |  Wrestling is real and NASA is fake?
Any alleged opinions are my own and have not been approved or
disapproved by JPL, CalTech, NASA, the President, or anybody else.