Special factorials: Difference between revisions

Content added Content deleted

Inline

@@ Line 194: / Line 194: @@
 say @   5   " is:";                $= ' 'commas( efn( ef(5) ) );           call tell
     @= 'the inverse factorial of'
-                              do j=1  for 10;  say @ || right(!(j), 9)   " is: "  rf(!(j))
+                              do j=1  for 10;  say @ right(!(j), 8)    " is: "    rf(!(j))
                               end   /*j*/
+                                               say @ right(119,  8)    " is: "    rf(119)
-                                               say @ || right(119,  9)   " is: "  rf(119)
 exit 0                                           /*stick a fork in it,  we're all done. */
 /*──────────────────────────────────────────────────────────────────────────────────────*/