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：処理回数
使用例：