Many days ago, I saw this code on an open source community:
frq =: [:-.[:(2:|+/)\''''&= sp =: (#@[)([:<[}.[:>])"0 0[(]</.~[:+/\E.*.[:frq]), spf =: [:<[:([:','&sp[:-.&')'=&'('{"0 1,.&',')> cl =: #~[:-.e.&(33{.a.)*.frq parse =: [:([:<[:((spf@{.),(}.`([:<[:([:<[:spf"0[:'),'&sp>)"0[:');'&sp[:>{:)@.(2:=#)))[:':-'&sp>)"0 _1:}.[:'.'&sp cl isVar =: [:(91&>*.64&<)[:a.&i.[:{.> replace =: ((]i.~[:{.[){([:{:[),]`([:<[$:[:>])@.([:32&=[:3!:0[:>]))"2 0 gp =: [:>[:{.> gv =: [:(#~[:+./"1 isVar"0),. suit =: ([(0:`(([:(#=[:#[:~.[:{.|:)[:~.[:(#~[:-.[:isVar"0[:{:|:)gv)*.([:*./[:+./[:(isVar"0,=/),:))@.(([:#[)=[:#]))[:gp])"1 0#] sr =: [(](replace~[:|:])"2[:(([:-.[:isVar{:)"1#])[gv~[:gp])"1 0 suit groupVars =: [:([:<]$~2:,~[:-:#)"1[:>[:([:<[:;(>@[)([:<,"1 1)"1 2(>@]))/]</.~[:{.|: isRuleTrue =: ([:+./([:*./](isTrue~[:>])"1 0[:>[)"0 1)`(0:<[:#getVarsFromRule)@.(0:<#@gv@;@;@[) isTrue =: ]((a:&e.@])+.[:+./[(isRuleTrue~[:>])"1 0[:-.&a:])[:{:[:|:[:-.&(a:,a:)[:(0 2$a:)&,[:>sr getVars =: ;(([:<[:~.(>@{.@[)gv[:gp])`((>@{.@[)$:(<@<@gp@])([replace~[:|:[:>])"0 0(}.@[)getVarsFromRule~[:>[:{:[:>])@.([:<:[:#[:>]))"1 0 sr getVarsFromRule =: ](([:{.])#~[(isRuleTrue~[:>])"1 0[:{:])[:|:[(],[:<[replace~[:|:[:>])"1 0[:]`groupVars@.(0:<#)[:~.[:;[:;]([:<[getVars~[:>])"1 0[:;[ goal =: ([:<S:0[:{.[:parse[:,&'.'])([:{&(>'No';'Yes')isTrue)`([:(]`((>@{.),[:' = '&,[:>{:)@.(2:=#))"1[:>getVars)@.([:+./[:isVar"0[)([:parse[) I have searched .j on these pages: (http://filext.com/file-extension/J), (http://fileinfo.com/extension/j). They said that written in Java language.
But, it is named: interpreter.j; and, on its repository, it is defined: Objective-J.
I have asked some people: "Is it written in Objective-J?". They asked me: "Have this code been obfuscated?".
Which programming language is used in this code?
[:), which to me indicates someone ran everything through J's explicit-to-tacit converter.