=head formulae
$area_square=$side**2;
...
=cut