Special factorials: Difference between revisions

Content added Content deleted
m (→‎{{header|jq}}: simplify def rf)
m (→‎{{header|REXX}}: increased the number of decimal digits.)
Line 1,335: Line 1,335:
<lang rexx>/*REXX program to compute some special factorials: superfactorials, hyperfactorials,*/
<lang rexx>/*REXX program to compute some special factorials: superfactorials, hyperfactorials,*/
/*───────────────────────────────────── alternating factorials, exponential factorials.*/
/*───────────────────────────────────── alternating factorials, exponential factorials.*/
numeric digits 100 /*allows humongous results to be shown.*/
numeric digits 1000 /*allows humongous results to be shown.*/
call hdr 'super'; do j=0 to 9; $= $ sf(j); end; call tell
call hdr 'super'; do j=0 to 9; $= $ sf(j); end; call tell
call hdr 'hyper'; do j=0 to 9; $= $ hf(j); end; call tell
call hdr 'hyper'; do j=0 to 9; $= $ hf(j); end; call tell