mainprogram defusem1.f subroutine defusem (nx, ny, u, p, x1, y1, z1, x2, y2, z2, r, n) 説明:点のデータから三角メッシュで作成した面を、少しずつ移動させながら 描画して、立体にするプログラム 入力変数: nx:x方向のデータ数 ny:y方向のデータ数 u:点の色(r, g, b)を順番に与える p:点の(x, y, z) 座標を順番に与える x1:x方向の平行移動量 y1:y方向の平行移動量 z1:z方向の平行移動量 x2:回転軸のx座標 y2:回転軸のy座標 z2:回転軸のz座標 r:移動回転角(ラジアン) n:処理回数 使用例: