在這裏使用什麼語言？

Question

我正在閱讀一篇關於如何將AI添加到井字遊戲的文章。介於兩者之間，他們有一些僞代碼段像這樣：

to checkwin :candidate :mysquares :free ;; old program 
if memberp first :candidate :free ~ 
[output check1 butfirst :candidate :mysquares] 
if memberp last :candidate :free ~ 
[output check1 butlast :candidate :mysquares] 
if memberp first butfirst :candidate :free ~ 
[output check1 list first :candidate last :candidate :mysquares] 
output "false 
end 

什麼語言是什麼？
它試圖傳達什麼？

Answer 1

這是一塊的井字的實現的示例代碼，寫入標誌，從布賴恩Harvey的「小樣科學標誌V1 2E」

http://books.google.com.au/books?id=BmuqURW0G5UC&lpg=PA114&ots=qZctpJejJa&dq=butfirst%20candidate%20free&pg=PA114#v=onepage&q&f=false