境界条件は周期境界条件（torus）とする。 以下のプログラムで上下左右のセルをコピーし合う。 Define conv_to_torus(mat)= Func :©行列の上下左右をつなぐ。 :Local rdim,cdim,mat_top,mat_bottom,mat_temp,mat_left,mat_right : :©上端行を下端行の下に挿…