| %!PS-Adobe-3.0
% P.27 2.7.6 述語の定義
% 3つの引数が全て等しいかどうかを判定 /triple {
3 dict begin
/any1 exch def
/any2 exch def
/any3 exch def
any1 any2 eq any1 any3 eq and
end
} def 1 1 1 triple == % true
1 2 1 triple == % false
1 1 3 triple == % false
1 2 3 triple == % false | 
0 件のコメント:
コメントを投稿