From: "Seymour J Metz" <sme...@gmu.edu>
Sent: Monday, September 07, 2020 4:30 AM


The default type for 3 and 4 is FIXED BINARY.

Definitely NOT.
3 and 4 are decimal digits.

PL/I does not have an integer type,

It does.

but the DIVIDE() BIF can be used to do an integer divide, and assigning a
quotient to a FIXED BIN(foo,0) variable may do what you want,
depending on precision issues.

________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Paul Gilmartin <0000000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Sunday, September 6, 2020 9:07 AM

On Sun, 6 Sep 2020 17:25:45 +1000, Robin Vowels wrote:

Beware!  Than might left-associate as:
    volume = ( 4/3 ) * 3.14159 * radius**3
... and the quotient of integers, 4/3, is 1.

No it's not. 4/3 yields 1.33333333333333.. to 15 digits in PL/I.
You're thinking of FORTRAN.

And C:
662 $ cat typetest.c
#include <stdio.h>
int main() {
   printf( "%10.6f\n",   4/3 * 3.14159 );
   printf( "%10.6f\n", 4.0/3 * 3.14159 ); }
663 $ gmake typetest &&amp; ./typetest
cc     typetest.c   -o typetest
 3.141590
 4.188787

It ought to depend on the types of the operands of the polymorphic
operator, '/'.  What are the default types of '4' and '3'?  Does PL/I
entirely lack an integer divide?

The Language Ref. properly cautions that a constant declaration may
be necessary to control the constant types.

---
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to