/*
###############################################################################
Busca de ORFs encontradas pelo GLimmer2 na �ltima execu��o do PhredPhrap
Desenvolvida em: 22-Abr-2003 - Augusto Favetti
###############################################################################
*/
require ("../lib/genopar.lib.php");
#require ("../lib/filesystem.class.php");
if(!doAuth(LVLPES))
exit;
verGetPost(array("processa", "mtg", "id", "gene_name", 'function', 'product', 'aa', 'notes', 'report', 'ec', 'cog', 'anotador', 'reviewer', 'status'));
if ($processa == "detalhe"){
echo '
';
verGetPost(array("contig", "start", "end"));
$fcontig="Fasta/Contigs/Contig".$contig;
if ($start > $end) $reverse= 1;
if ( !(is_readable($fcontig)) )
$genopar->error("
N�o foi poss�vel ler contig do arquivo:
$fcontig");
$file = fopen($fcontig, 'r');
$line = fgets($file, 4096); #Eliminar primeira linha
$SEQ='';
for ($linha= 1; !feof($file); $linhas++){
$line = fgets($file, 4096);
$SEQ.= trim($line);
}
$seq= substr($SEQ,$start-1,$end-$start+1);
if ($reverse)
{
$size = $start-$end+1;
$array = str_split(substr($SEQ, 0, $size));
$array = array_reverse($array);
$seq = '';
foreach ($array as $nt){
$seq .= complement($nt);
}
}
$seqn="";
$cols = 50;
$rows = 5;
for($i=0;$i
$seqn";
exit();
}
$genopar = new Genopar(__FILE__);
$genopar->abrePagina("Busca de ORFs");
$mtgs = obtemMtgs($genopar);
echo '
';
$genopar->abreBanco();
echo '