🚀 go-pugleaf

  $@$3$s$K$A$O!#$3$^$($G(J$@$9!#(J

In article <UZUHARA.92May11231835@iceberg.sfc.keio.ac.jp>
 uzuhara@sfc.keio.ac.jp (Shigeru Uzuhara) writes:

 > >$@$G$b!"(J
 > >	  FORALL (I = 1:N) A(i1(I),j1(I)) = A(i1(I),j(I)) + B(I)
 > >$@$J$I$O!"%7(J$@%j%"%k$K$J$C$F$7$^$$$^$9!#(J
 >
 >$@$J$<$B$c$"!#2r@b$7$F2<$5$l!#(J

  $@%i%$%V%i%j$N%^%K%e%"%k$KL@5-$5$l$F$$$^(J$@$7$?!#(J

$@$G$O!"IT?F@Z$J$N$G!"$b$&>/$7@53N$K=q$/$H!"$=$N%^%K%e%"%k$K$O2<$N$h$&$J(J
$@0UL#$NJ8$,$"$j$^$7$?!#(J

C  $@2<$N%3!<%I$O<!$NJ8$HF1$8$G$"$k!#$*$=$i$/!"%3%s%Q%$%i$,$3$NJ8$r$&$^(J
C  $@$/%3%s%Q%$%k$9$k$G$"$m$&>-(J$@Mh$K$*$$$F$O!#8=:_$O!"$3$N#F#O#R#A#L#LJ8(J
C  $@$O%7%j%"%k$K<B9T$5$l$k!#(J
C
C	FORALL (I = 1:M, J = 1:N) HISTOGRAM(V1(I,J),V2(I,J)) =
C	                          HISTOGRAM(V1(I,J),V2(I,J)) + ARRAY(I,J)
C
$@!J0J(J$@2<!"FCJL$J%i%$%V%i%j!J#C#M#F!2#S#E#N#D!2#A#D#D$J$I!K$r6n;H$7$FJBNs(J
$@$KF0$-$=$&$J<jB3$-$,=q$$$F$"$j$^$7(J$@$?$,!">JN,$7$^$9!K(J

  $@3N$+$K!"$3$l$K$OFq$7$$LdBj$,$"$C$F!"%$%s%G%C%/%9$K;H$o$l$F$$$k%Y%/%H(J
$@%k$NCM$K$h(J$@$C$F$O!"F1$8MWAG$KBP$7$FJ#?t2s;2>H!?1i;;$HBeF~$,5/$3$j!"$=$N(J
$@;2>H!?1i;;$HBeF~$,IT2DJ,$K9T$J$o$l$J$$$H(J$@$$$1$^$;$s$h$M!#(J

  $@$^$"!"$3$l$KBP1~$9$k<jB3$-$,Dj5A$G$-$k$N$@$+$i!"C1$K%3%s%Q%$%i$,$^$@(J
$@BP1~$7$F$$$J(J$@$$$H$$$&$@$1$N$3$H$J$N$G$7$g$&$1$I!D!#(J
---
$@>.A0(J $@?8(J       $@")(J252$@F#Bt;T1sF#(J5322$@7DXf5A=NBg3X4D6->pJs3XIt0B(J$@B<8&(J($@&I(J201)
komae@sfc.keio.ac.jp (komae@csd.sumikin.co.jp)   Tel:0466-47-5000-3221