Какой язык программирования используется в этом коде?

Question

Много дней назад я увидел этот код на качестве открытого исходного кода:

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[) 

Я искал .j на этих страницах: (http://filext.com/file-extension/J), (http://fileinfo.com/extension/j). Они сказали, что написаны на языке Java.

Но, это называется: interpreter.j; и в его репозитории определено: Objective-J.

Я спросил некоторых людей: «Это написано в Objective-J?». Они спросили меня: «Неужели этот код был запутан?».

---

Какой язык программирования используется в этом коде?

Answer 1

Не знаю, что такое J-язык, но кажется, что ваш код правильно анализирует его.

http://www.jsoftware.com/

Answer 2

Это J programming language, как расширение файла и bass-ackward assignment указывают.

Основываясь на моей ограниченной экспозиции (которая, по общему признанию, состоит только из фрагмента кода, предоставленного в вопросе), это также, по-видимому, первый язык, который я когда-либо обнаружил, что на самом деле превосходит Perl с точки зрения языка записи, Я думал, что никогда не доживу до этого :-) Думаю, я предпочел бы придерживаться чего-то более читаемого.

Answer 3

Да, это язык программирования J. Если вы на самом деле хотите узнать больше об этом, посмотрите на http://www.jsoftware.com

Поскольку он настолько краток, его может быть трудно прочитать вначале, но есть очень благоприятное сообщество, которое хочет ответить на вопросы. http://www.jsoftware.com/forums.htm

Кроме того, интерактивная среда J также включает в себя лаборатории, которые на самом деле помогут вам понять некоторые концепции, позволяя вам использовать всю мощь языка.

Если вы хотите хихикать о том, как трудно читать, а затем идти вперед - но, возможно, также попробовать. :-)