aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Task/Narcissist/J/narcissist-1.j Normal file
View file

@ -0,0 +1,6 @@
#!/usr/bin/ijconsole
main=:3 : 0 NB. tested under j602
self=: '#!/j602/bin/jconsole',LF,'main=:',(5!:5<'main'),LF,'main''''',LF
echo self -: stdin''
)
main''

2
Task/Narcissist/J/narcissist-2.j Normal file
View file

@ -0,0 +1,2 @@
$ ./narcissist.ijs <narcissist.ijs
1

1
Task/Narcissist/J/narcissist-3.j Normal file
View file

@ -0,0 +1 @@
narcissist=.(-:,~,2#{:)&'(-:,~,2#{:)&'''

4
Task/Narcissist/J/narcissist-4.j Normal file
View file

@ -0,0 +1,4 @@
(-:,~,2#{:)&'(-:,~,2#{:)&''' '(-:,~,2#{:)'
0
(-:,~,2#{:)&'(-:,~,2#{:)&''' '(-:,~,2#{:)&''(-:,~,2#{:)&'''''''
1