// 08.07.11 function Initangle() global PHI THETA; PHI=30*%pi/180; THETA=60*%pi/180; endfunction