d£ΜR³iq
mainprogram denline3d.f subroutine lat3d3 (ic,aa) < (re1,re2,r,g,b) ΰΎFd£πR³iqΕ`vO όΝΟF re1 = aa(1)Fΰ~ΜΌaiRej re2 = aa(2)FO~ΜΌaiRej r = aa(3)FΤFΜl [ 0,1 ] g = aa(4)FΞFΜl [ 0,1 ] b = aa(5)FΒFΜl [ 0,1 ] gpαF