The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Dive - Simulate a dive and corresponding tissues

SYNOPSIS

    use Deco::Dive;
    use Deco::Dive::Plot;
    
    my $dive = new Deco::Dive( );
    $dive->load_data_from_file( file => $file);
    $dive->simulate( model => 'haldane');

    my $diveplot = new Deco::Dive::Plot( dive => $dive );
    $diveplot->depth( file => 'depth.png' );
    $diveplot->pressures( file => 'pressures.png' );

DESCRIPTION

This package will plot the profile of the dive and internal pressures of the tissues of the model.

METHODS

new( dive => $dive )

The constructor of the class. Takes a required parameter: a Deco::Dive object.

$diveplot->depth( width=> $width, height => $height, file => $file );

Plots the depth versus time graph of the dive. It will default to a file called depth.png in the current directory, with a size of 600 x 400 pixels.

$diveplot->pressures( width=> $width, height => $height, file => $file );

This method will plot the internal pressures of all the tissues of the model during the dive.

$diveplot->percentage( time => $time, width=> $width, height => $height, file => $file );

This function will plot a bar graph of the pertenage of saturation (o fthe allowed value per tissue). You can specify the time in minutes for the point in the dive where you want to see the percentages for.

$diveplot->nodeco( width=> $width, height => $height, file => $file );

This method will plot the no deco time during the dive for each tissue

EXPORT

None by default.

SEE ALSO

Deco, Deco::Tissue, Deco::Dive. SCUBA::Table::NoDeco might be of interest to you as well.

In the docs directory you will find an extensive treatment of decompression theory in the file Deco.pdf. A lot of it has been copied from the www.deepocean.net website.

AUTHOR

Jaap Voets, <narked@xperience-automatisering.nl>

COPYRIGHT AND LICENSE

Copyright (C) 2006 by Jaap Voets