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, $pop_id, $list_id, $dataset_id, $data_structure );
{
    my %pos;
    for ( my $x = 0; $x < @_; $x += 2 )
    {
        $pos{ $_[$x] } = $x + 1;
    }
#line 24 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
     $trial_id = exists $pos{'trial_id'} ? $_[ $pos{'trial_id'} ] :  undef;
#line 25 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
     $pop_id = exists $pos{'pop_id'} ? $_[ $pos{'pop_id'} ] :  undef;
#line 26 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
     $list_id = exists $pos{'list_id'} ? $_[ $pos{'list_id'} ] :  undef;
#line 27 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
     $dataset_id = exists $pos{'dataset_id'} ? $_[ $pos{'dataset_id'} ] :  undef;
#line 28 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
     $data_structure = exists $pos{'data_structure'} ? $_[ $pos{'data_structure'} ] :  undef;
}
$m->debug_hook( $m->current_comp->path ) if ( HTML::Mason::Compiler::IN_PERL_DB() );

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


$pop_id = $trial_id if $trial_id;

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

my $title = 'Kinship and Inbreeding Analysis'; 
my $collapsed = 0;
my $collapsible = 0;
my $section_title;

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

if ($url !~ /kinship\/analysis/) {
  $section_title = 'Kinship and inbreeding analysis';
  $collapsible = 1;
  $collapsed = 1 if $url =~ /breeders\/trial/;
}

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

' );
#line 61 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
 if ($url =~ /kinship\/analysis/) {
$m->print( '  ' );
#line 62 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->comp(   '/page/page_title.mas',
    title => $title
      
); #line 64 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->print( '
' );
#line 65 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
}
$m->print( '
' );
#line 67 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->comp( { content => sub {
#line 71 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->print( '

<div id=\'kinship_div\'>
' );
#line 74 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
 if ($url =~ /kinship\/analysis|breeders\/trial\//) {
$m->print( '    ' );
#line 75 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->comp(   '/solgs/genotyping_protocol/index.mas'  
); #line 75 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->print( '
' );
#line 76 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
}
$m->print( '
' );
#line 78 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
 if ($url =~ /kinship\/analysis/) {
$m->print( '    ' );
#line 79 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->comp(   '/solgs/tools/login.mas',
    tool_url => '/kinship/analysis/',
    analysis_type => 'kinship' 
      
); #line 82 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->print( '
' );
#line 83 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
}
$m->print( '
' );
#line 85 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
 if ($url =~ /solgs\/|breeders\/trial\//) {
$m->print( '    <input id="run_kinship" class="btn btn-success" type="button" value="Run kinship" />
' );
#line 87 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
}
$m->print( '
  ' );
#line 89 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->comp(   'plot.mas',
      pop_id => $pop_id,
      list_id => $list_id,
      dataset_id => $dataset_id,
      data_structure => $data_structure,
    
); #line 94 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->print( '

</div>

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

' );
#line 100 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->comp(   '/util/import_javascript.mas', classes => ["solGS.kinship", "solGS.heatMap"]   
); #line 100 "/home/production/cxgn/sgn/mason/solgs/tools/kinship/analysis.mas"
$m->print( '
' );
;return;
},
'declared_args' => {
  '$data_structure' => { default => ' undef' },
  '$dataset_id' => { default => ' undef' },
  '$list_id' => { default => ' undef' },
  '$pop_id' => { default => ' undef' },
  '$trial_id' => { default => ' undef' }
},
'load_time' => 1763102299,

)
;