Thank you, Mike and Rob. S0C7s are no longer a plague. :-) Probably
an elementary question here, but does the 'a+0' make the result binary?
Is that why this works?
Thanks
DeWayne
On 11/29/21 16:15, Mike Harding wrote:
Or more simply,
pipe literal 16 | strip | specs a: 1.2 . if a>0 then set #1:=sqrt(a+0) endif
print #1 1 | console
4
[email protected]
z/VM systems support for Kyndryl
WWVM and Xagent support
[email protected]
(925) 672-4403 (o)
(925) 672-3922 (h)
(925) 323-2070 (m)
<resistance is futile>
________________________________
From: CMSTSO Pipelines Discussion List<[email protected]> on behalf of Rob
van der Heij<[email protected]>
Sent: Monday, November 29, 2021 13:49
To:[email protected] <[email protected]>
Subject: [EXTERNAL] Re: sqrt
By apologies for the abend. I think we could have responded differently. If
you define a structure with a binary value like this:
PIPE literal :dewayne square u l 2 | structure add thread
PIPE strliteral x06e4 | spec qual dewayne 1 print sqrt(square) 1 | cons
That should work. And "spec sqrt(1764) 1" probably also works, but it's not
as interesting.
Rob
On Mon, 29 Nov 2021 at 22:30, DeWayne Thomas<[email protected]>
wrote:
OK, I've tried a bunch of stuff but I continue to get S0C7 using sqrt,
so I must not be understanding what the input to the sqrt function
should look like. ;-) Please give me some pointers.
Here's the log:
pipe literal 16 | strip | specs a: 1.2 . if a>0 then set #1:=sqrt(a)
endif print #1 1 | console
FPLINX410E ABEND 000000C7 at 02CD89A6; PSW 03EC0000 82CD89A6 00060007
FPLINX411I ... In SQRT; offset 0000368E in FPLSPV 06/22/18 11.41
FPLINX412I ... GPR0: 0000000E 02CD5868 7F27AFA8 00000002
FPLINX412I ... GPR4: 7F27AFA8 00000002 7F27AFC0 7F27B2E4
FPLINX412I ... GPR8: 7F27EC3F 7F27B6F8 7F278DA8 7F2781B0
FPLINX412I ... GPRC: 82CD898E 7F278E68 82CD61C4 02CD8988
FPLINX413I ... Store 02CD899C: 98E1F00C F9F07004 C9BE47B0 C0381F00 41100531
FPLINX1198I Stage is active
FPLMSG003I ... Issued from stage 4 of pipeline 1
FPLMSG001I ... Running "specs a: 1.2 . if a>0 then set #1:=sqrt(a) endif"
DMSABE141T Data exception occurred at 82CD89A6 in routine PIPE
CMS
