2009/11/13

PostScript forall

GS>[1 2 3 4 5] { dup mul } forall
GS<5>stack
25
16
9
4
1
GS<5>[1 2 3 4 5] { 10 mul } forall
GS<10>stack
50
40
30
20
10
25
16
9
4
1
GS<10>

0 件のコメント:

コメントを投稿