##########
#
# JimsModule.pm is an example of a perl module - 
# that is, a container for subroutines.
# 
###########

use strict;
use warnings;

# Usage: $y = double_and_add_one($x);
# Returns 2*$x+1.
sub double_and_add_one {
  my ($x) = @_;
  my $y = 2*$x + 1;
  return $y;
}


# All modules should return true. We do that with a "1" at the end.
1;
