On Wed, 7 Jun 2000, Dan Nagle wrote:
> BTW, how would you specify a SELECT_LOG_KIND() ?
Heh, heh. Well, first I'd call it SELECTED_LOGICAL_KIND().
Since by definition any LOGICAL KIND must be able to hold only
the values .T. and .F., I'd define it this way:
SELECTED_LOGICAL_KIND( [MOLD] )
If issued without the optional MOLD argument, it returns
the default integer scalar for the smallest LOGICAL KIND
able to hold the values .T. and .F. .
If MOLD is supplied, it returns the default integer scalar
for the LOGICAL KIND that is the same size as MOLD, if
there is one, or -1 otherwise. MOLD must be an integer
or REAL constant of some KIND.
Since, by definition, the default LOGICAL KIND must be the same
size as the default INTEGER KIND, SELECTED_LOGICAL_KIND(1) would
return the default LOGICAL KIND.
-P.
--
** Whether the playing field is level depends on the coordinate system. ***
********* Peter S. Shenkin; Schrodinger, Inc.; (201)433-2014 x111 *********
*********** [log in to unmask]; http://www.schrodinger.com ***********
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|