package SGN::View::Mason::Commands;
use strict;
use vars qw($m $c);
HTML::Mason::Component::FileBased->new(
'code' => sub {
use utf8; local $SGN::View::Mason::Commands::m = $HTML::Mason::Commands::m;
HTML::Mason::Exception::Params->throw
    ( error =>
      "Odd number of parameters passed to component expecting name/value pairs"
    ) if @_ % 2;
my ( $trial_id, $list_id, $dataset_id, $data_structure, $pop_name, $pop_type, $corr_pop_id, $corr_pop_name, $data_set_type );
{
    my %pos;
    for ( my $x = 0; $x < @_; $x += 2 )
    {
        $pos{ $_[$x] } = $x + 1;
    }
#line 24 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $trial_id = exists $pos{'trial_id'} ? $_[ $pos{'trial_id'} ] :  undef;
#line 25 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $list_id = exists $pos{'list_id'} ? $_[ $pos{'list_id'} ] :  undef;
#line 26 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $dataset_id = exists $pos{'dataset_id'} ? $_[ $pos{'dataset_id'} ] :  undef;
#line 27 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $data_structure = exists $pos{'data_structure'} ? $_[ $pos{'data_structure'} ] :  undef;
#line 28 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $pop_name = exists $pos{'pop_name'} ? $_[ $pos{'pop_name'} ] :  undef;
#line 29 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $pop_type = exists $pos{'pop_type'} ? $_[ $pos{'pop_type'} ] :  undef;
#line 30 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $corr_pop_id = exists $pos{'corr_pop_id'} ? $_[ $pos{'corr_pop_id'} ] :  undef;
#line 31 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $corr_pop_name = exists $pos{'corr_pop_name'} ? $_[ $pos{'corr_pop_name'} ] :  undef;
#line 32 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
     $data_set_type = exists $pos{'data_set_type'} ? $_[ $pos{'data_set_type'} ] :  undef;
}
$m->debug_hook( $m->current_comp->path ) if ( HTML::Mason::Compiler::IN_PERL_DB() );

#line 21 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '
' );
#line 36 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '
' );
#line 37 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"


$corr_pop_id = $trial_id if !$corr_pop_id;

if (!$data_structure) {
   if ($dataset_id) {
      $data_structure = 'dataset';
   } elsif ($list_id) {
     $data_structure = 'list';
   }
}


my $url = $c->req->path;

my $title; 
my $collapsed = 0;
my $collapsible = 0;

if ($url !~ /correlation\/analysis/) {
  $title = 'Phenotypic correlation analysis (Pearson)';
  $collapsible = 1;
  $collapsed = 1 if $url =~ /breeders\/trial/;
}

#line 63 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '
' );
#line 64 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->comp(   '/solgs/tools/base.mas'  
); #line 64 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '

' );
#line 66 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
 if ($url =~ /correlation\/analysis/) {
$m->print( '
' );
#line 68 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->comp(   '/page/page_title.mas',
   title => "Correlation Analysis"
    
); #line 70 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '
  
' );
#line 72 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
}
$m->print( '
' );
#line 74 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->comp( { content => sub {
#line 78 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '

  <div id=\'corr_div\'>

' );
#line 82 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
 if ($url =~ /correlation\/analysis/) {
$m->print( '
    ' );
#line 84 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->comp(   '/solgs/tools/login.mas',
    tool_url => '/correlation/analysis/' ,
    analysis_type => 'correlation' 
      
); #line 87 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '

' );
#line 89 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
} else {
$m->print( '    <input id="run_correlation" class="btn btn-success" type="button" value="Run correlation" />
' );
#line 91 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
}
$m->print( '
' );
#line 93 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->comp(   'plot.mas',
   corr_pop_id => $corr_pop_id,
   corr_pop_name => $corr_pop_name,
  list_id => $list_id,
  dataset_id => $dataset_id,
  data_structure => $data_structure,
  data_set_type => $data_set_type
    
); #line 100 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '

</div>
' );
#line 103 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
} }, '/page/info_section.mas',
  collapsible => $collapsible,
  collapsed   => $collapsed,
  title       => $title
 );
#line 103 "/home/production/cxgn/sgn/mason/solgs/tools/correlation/analysis.mas"
$m->print( '



' );
;return;
},
'declared_args' => {
  '$corr_pop_id' => { default => ' undef' },
  '$corr_pop_name' => { default => ' undef' },
  '$data_set_type' => { default => ' undef' },
  '$data_structure' => { default => ' undef' },
  '$dataset_id' => { default => ' undef' },
  '$list_id' => { default => ' undef' },
  '$pop_name' => { default => ' undef' },
  '$pop_type' => { default => ' undef' },
  '$trial_id' => { default => ' undef' }
},
'load_time' => 1763102299,

)
;