面1

mainprogram mesh1.f
subroutine  face1 (ln, po, r, g, b)

説明:点の座標を与え、三角メッシュで面を描くプログラム
入力変数:
  ln:データ数
  po:点の(x, y, z) 座標を順番に与える
  r:面の赤色の値 [0,1]
  g:面の緑色の値 [0,1]
  b:面の青色の値 [0,1]

使用例: