“d—£Œ—‚Μ‚RŽŸŒ³ŠiŽq
mainprogram  denline3d.f
subroutine  lat3d3 (ic,aa) < (re1,re2,r,g,b)

ΰ–ΎF“d—£Œ—‚π‚RŽŸŒ³ŠiŽq‚Ε•`‚­ƒvƒƒOƒ‰ƒ€
“ό—͕ϐ”F
      re1 = aa(1)F“ΰ‰~‚Μ”ΌŒaiRej
      re2 = aa(2)FŠO‰~‚Μ”ΌŒaiRej
      r = aa(3)FΤF‚Μ’l [ 0,1 ]
      g = aa(4)F—ΐF‚Μ’l [ 0,1 ]
      b = aa(5)FΒF‚Μ’l [ 0,1 ]



Žg—p—αF