このディレクトリの索引
http://pc12.2ch.net/test/read.cgi/tech/1255709298/507 
#  [1] 授業単元: C++ 
#  [2] 問題文(含コード&リンク):http://ime.nu/kansai2channeler.hp.infoseek.co.jp/cgi-bin/joyful/img/10044.txt 
#  http://ime.nu/kansai2channeler.hp.infoseek.co.jp/cgi-bin/joyful/img/10045.txt 
#  問題が2つあります。それぞれ違うファイルにしてもらえたならば幸いです。 
#  宜しくお願い致します。 
# <問題1> 
# 自動車クラスCarにデータメンバやメンバ関数を自由に追加せよ 
# (ナンバーを表すデータメンバを追加する。燃費を表すデータメンバを追加する, 
# 移動による燃料残量の計算に燃費を反映させる, 
# タンク容量を表すデータメンバを追加する,給油のためのメンバ関数を追加する等)。 
# また追加したものがテストできる main関数も作成し,提出すること。 
# <問題2> 
# 名前・身長・体重などをメンバとしてもつ人間クラスを自由に定義せよ。 
# 作成したクラスがテストできる main関数も作成し,提出すること。 

% ESP

class さつまのかみ has 
    nature 人間,実像; 
    attribute 戸籍名:='平忠度',契機,実像; 
    :create(Class,_契機,_実像,Obj) :- 
        :new(Class,Obj), 
        Obj!契機:=_契機,Obj!実像:=_実像,Obj!誕生日:='19490126'; 
instance 
    :予定(Obj,_契機,_予定) :- _契機@>=Obj!契機,予定(Obj,_契機,_予定); 
local 
    予定(Obj,'20091107','ESPのお勉強'); 
end. 

class 人間 has 
    nature 誕生,死亡,遺伝子; 
    attribute 戸籍名; 
end. 

class 実像 has 
    attribute 身長,体重,髪の毛の色,体毛,肌の色,歯型,印象; 
end. 

class 誕生 has 
    attribute 誕生日,時刻,立会い医師または助産婦,誕生にまつわるエピソード; 
end. 

class 死亡 has 
    attribute 死亡時刻,確認医師,死因,死亡に至る経過,辞世,墓の在り処; 
end. 

class 遺伝子 has 
    attribute 遺伝子; 
end.