package Cvika::Matematika;

use strict;
use warnings;

use Exporter 'import';
our @EXPORT_OK = qw(soucet rozdil soucin podil);

sub soucet
{
  my ($x, $y) = @_;

  return $x + $y;
}

sub rozdil
{
  my ($x, $y) = @_;

  return $x - $y;
}

sub soucin
{
  my ($x, $y) = @_;

  return $x * $y;
}

sub podil
{
  my ($x, $y) = @_;

  return $x / $y;
}
