_  _   ,_
  /^\/^\-/ @D
~(________/   PERL.LT
   |L  |L
   L   L

• cos EXPR
• cos

  Gražina kosinusą (radianais). Jei EXPR funkcijai nenurodytas, cos() suveiks ant $_.

  Atvirkštiniam rezultatam gauti galima pasinaudoti Math::Trig::acos() funkcija, arba tiesiog:

      sub acos { atan2( sqrt(1 - $_[0] * $_[0]), $_[0] ) }