Skip to content

Instantly share code, notes, and snippets.

@tail-call
Created June 19, 2023 15:35
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tail-call/f3fa8df93981bd7fae03bfbca91ae0cc to your computer and use it in GitHub Desktop.
Save tail-call/f3fa8df93981bd7fae03bfbca91ae0cc to your computer and use it in GitHub Desktop.
0 0 SUBSYSTEM ALGORITHMICAL ;
0 1 AUTHOR J SMITH MALE 43 YO ;
0 2 COMPANY JCN COMPUTING ;
0 3 DEPARTMENT BUSINESS COMPUTING !BLANK! ;
com 0 PUBLIC NOTE ^ ;
com 1 PUBLIC NOTE DEPARTMENT REQUIRES THREE WORDS ;
com 2 PUBLIC NOTE SO WE BLANK OUT THIRD WORD SEE ;
com 3 PUBLIC NOTE OP MANUAL VOL 8 ;
1 0 BEGIN EXTERNALIZABLE OPERATION FACTORIAL ;
1 1 DECLARE FACTORIAL ACCEPTS INTEGRAL PARAM NAMED ≈n≈ ;
1 2 BEGIN EXECUTION BLOCK NAMED ≈entry≈ ;
1 3 BEGIN RECURRENT BLOCK NAMED ≈loop≈ ;
1 4 WRITE DATA 2 ;
1 5 USING CONTROL ;
com 0 PRIVATE NOTE FOR J SMITH 43 YO HERE WE GO ;
2 1 TEST IF \ ≈n≈ < DATA \ ;
2 2 AFFIRMATIVE TRANSFERS CONTROL WITHIN OPERATION FACTORIAL 2 6 ;
2 3 RESTART RECURRENT BLOCK ≈loop≈ WRITING TO DATA ;
2 4 PUT \ ≈loop≈ MULTIPLIC DATA \ RESULT OF OPERATION FACTORIAL ;
2 5 STOP OPERATION FACTORIAL IMMEDIATELY ;
2 6 WRITE NUMBER \ 1 \ ;
2 6 UNWIND RECURRENT BLOCK NAMED ≈loop≈ ;
2 7 CANCEL EXECUTION BLOCK NAMED ≈entry≈ ;
2 8 FINISH EXTERNALIZABLE OPERATION FACTORIAL ;
2 9 SWORN BY AUTHOR J SMITH MALE 43 YO I SWEAR TO LEAK TRADE SECRETS TO NO BODY ;
com 0 PAGE NOTE !BLANK! ;
3 0 EXTERNALIZE OPERATION FACTORIAL WITH MINIMAL RESTRICTIONS ;
3 1 END SUBSYSTEM ALGORITHMICAL ;
private notes are for hiding knowledge from others, the system will never display private notes for you
when your age changes, your private notes aren't available for you anymore, this is to make sure people are regularly reviewing their private notes
the main feature of the language is recurrent block which enables elegant algorithmical solutions for mathematical problems
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment