EQA1630E The argument in built-in function is too large.

This applies to the PL/I trigonometric built-in functions. For short floating-point arguments, the limits are:

COS and SIN

ABS(X) <= (2**18)*pi

TAN

ABS(X) <= (2**18)*pi if x is real and ABS(REAL(X)) <= (2**17)*pi if x is complex

TANH

ABS(IMAG(X)) <= (2**17)*pi if x is complex

COSH, EXP and SINH

ABS(IMAG(X)) <= (2**18)*pi if x is complex

COSD, SIND and TAND

ABS(X) <= (2**18)*180

For long floating-point arguments, the limits are:

COS and SIN

ABS(X) <= (2**50)*pi

TAN

ABS(X) <= (2**50)*pi if x is real and ABS(REAL(X)) <= (2**49)*pi if x is complex

TANH

ABS(IMAG(X)) <= (2**49)*pi if x is complex

COSH, EXP and SINH

ABS(IMAG(X)) <= (2**50)*pi if x is complex

COSD, SIND and TAND

ABS(X) <= (2**50)*180

For extended floating-point arguments, the limits are:

COS and SIN

ABS(X) <= (2**106)*pi

TAN

ABS(X) <= (2**106)*pi if x is real and ABS(REAL(X)) <= (2**105)*pi if x is complex

TANH

ABS(IMAG(X)) <= (2**105)*pi if x is complex

COSH, EXP and SINH

ABS(IMAG(X)) <= (2**106)*pi if x is complex

COSD, SIND and TAND

ABS(X) <= (2**106)*180