=head1 AUTHOR Michael Brehler <*****@*****.**>, Georg Zeplin <*****@*****.**>, =head1 COPYRIGHT University of LE<uuml>beck, Germany, 2011 =cut ENDOFDOCUMENTATION */ require_once '../eqtl/header.php'; $upper_tit = '<div id="headline">Ensembl Compara interface for Expression QTL</div>'; show_large_header("Intergenomics - Syntenies for selected regions", true, $upper_tit, '../eqtl/', array('css/style.css', 'css/prettyPhoto.css')); ?> <script src="js/jquery-1.4.4.min.js" type="text/javascript" charset="utf-8"></script> <script src="js/jquery.prettyPhoto.js" type="text/javascript" charset="utf-8"></script> <script src="js/mouseposition.js" type="text/javascript"></script> <?php require_once 'qtl_functions.php'; require_once 'db_functions.php'; require_once 'utils.php'; require_once 'fill_related_projects.php'; fill_compara_array();
foreach ($compara_array as $project_name => $project_info) { echo '<option value="' . implode("+", explode(" ", $project_name)) . '" ' . ($project_name == $projects[$index] ? 'selected="selected">' : '>') . $project_name . ' (' . $project_info['species'] . ')</option>'; } echo '</select>'; } $species_str = 'species'; $reg_str = 'regions'; $args = $_GET; require_once 'db_functions.php'; require_once 'qtl_functions.php'; require_once 'utils.php'; require_once 'fill_related_projects.php'; fill_compara_array(); require_once '../eqtl/header.php'; $upper_tit = '<div id="headline">Ensembl Compara interface for Expression QTL</div>'; show_large_header("Intergenomics", true, $upper_tit, '../eqtl/', array('css/style.css', 'css/prettyPhoto.css')); global $compara_array; $proj_str = 'projects'; if (!isset($args[$proj_str])) { //no project selected $projects = array(); } else { $projects = $args[$proj_str]; } // enlarge project array with NULLs $n = count($projects); while ($n < 2) { $projects[] = NULL; $n++; } if (isset($args['err'])) {
$is_homo2[$homo2] = true; } } } deleteNonHomos($loci2stable_ids_ex2, $is_homo2); break; default: $homos_exist = true; break; } //warn($loci2stable_ids_ex1[0]); //exit(); if (!$homos_exist) { // no homologies found require_once '../eqtl/header.php'; show_large_header("Intergenomics - Details", true, "Ensembl Compara interface for Expression QTL", '../eqtl/', array('css/style.css', 'css/prettyPhoto.css')); warn("Sorry, no homologies found for the given region."); echo <<<END \t<button onclick="javascript:history.back();">Back to the syntenic regions.</button> END; include '../eqtl/footer.php'; include 'html/footer.html'; exit; } // display ----------------------- $cols = 250; // width of left offset $rows = 157; // heigth of above offset include 'utils/write_detail_table.php'; $scroll_width = 16;