$sine=rand(2)-1;
$cosine=sqrt(1-$sine**2);