New --min-skirt-length option. #269

This commit is contained in:
Alessandro Ranellucci 2012-10-29 11:17:57 +01:00
parent c25e54a830
commit e9ae62a9d1
6 changed files with 49 additions and 6 deletions

View file

@ -55,4 +55,10 @@ sub mm3_per_mm {
return $self->_mm3_per_mm_cache->{$cache_key};
}
sub e_per_mm {
my $self = shift;
my ($s, $h) = @_;
return $self->mm3_per_mm($s, $h) * $self->e_per_mm3;
}
1;