Created
June 19, 2023 15:35
-
-
Save tail-call/f3fa8df93981bd7fae03bfbca91ae0cc to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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 ; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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