またHaskell。rubycoの日記「人工知能もどき」より。deriveの作りがマズイ。あとで何とかする(かも)。Stateを使うしかないのかしらん。 (追記)ちょっといじりました。うまく動いたが。今はこれがせーいっぱい(「カリオストロの城」より) (さらに追記)Knowled…