feature; $accession = $node->accession; $organism = $node->organism; }?>
">

'; } ?>

'. theme('username', $node).'' . t(' - Posted on ') . ''.format_date($node->created, 'custom', "d F Y").''; ?>

is_obsolete == 't'){ drupal_set_message(t('This feature is obsolete and no longer used in analysis, but is here for reference.')); }?> lib_additions) { ?> synonyms; if(count($synonyms) > 0){ ?>
Namefeaturename; ?>
Unique Nameuniquename; ?>
Internal ID
Lengthseqlen ?>
Typecvname; ?>
Organism org_nid) { print"org_nid") ."\">$organism->genus $organism->species ($organism->common_name)"; } else { print"$organism->genus $organism->species ($organism->common_name)"; } ?>
Library lib_additions; foreach ($libraries as $lib_url => $lib_name) { // Check if library exists as a node in drupal if ($lib_url) { ?>
Synonyms name."
"; } } else { print $synonyms; } ?>

[-] Collapse All

Sequence

cvname; ?> sequence
residues){
              print ereg_replace("(.{100})","\\1
",$feature->residues); } else { print "sequence currently not available"; } ?>
references; if(count($references) > 0){ ?>

References

Dababase Accession
db_name?> urlprefix){ ?>accession?>accession; } ?>
featurelocs; if(count($featurelocs) > 0){ ?>

Locations

$loc){ ?>
Feature Type Position Phase Strand
name ?> cvname ?> fmin . ".." . $loc->fmax ?> phase ?> strand ?>
myfeaturelocs; if(count($myfeaturelocs) > 0){ ?>

Features Located on featurename;?>

$loc){ ?>
Feature Type Position Phase Strand
name ?> cvname ?> fmin . ".." . $loc->fmax ?> phase ?> strand ?>
"; print "

Relationships

"; print "
"; $srelationships = $node->subject_relationships; if(count($srelationships) > 0){ print "Subject Relationships
"; print " "; foreach ($srelationships as $result){ print ""; print ""; print ""; print ""; } print "
Relationship Feature Type
$result->rel_type"; if(isset($result->object_nid)){ print "object_nid") . "\">$result->object_name "; } else { print "$result->object_name "; } print "$result->object_type

"; } ?> object_relationships; $other_seqs = array(); if(count($orelationships) > 0){ print "Object Relationships
"; print " "; foreach ($orelationships as $result){ $subject_name = $result->subject_uniquename; if($result->subject_name) { $subject_name = $result->subject_name; } print ""; print ""; print ""; print ""; if($result->src_name){ print ""; } else { print ""; } print ""; // anything with a src_name does not have a location on a // reference sequence, so let's keep track of those and print // the sequences later. Those that are located elsewhere // will get printed separately. if(!$result->src_name){ $other_seqs[]=$result; } } print "
Feature Type Relationship Position
"; if(isset($result->subject_nid)){ print "subject_nid") . "\">$result->subject_name ($result->subject_type) "; } else { print "$subject_name"; } print "$result->subject_type$result->rel_type$result->src_name ($result->src_cvname):$result->fmin $result->fmax
"; // print the sequences for those that are located on a references // sequence $rel_info = $node->relationship_object_info; foreach($rel_info as $index => $info){ if($info->source){ print "
Sequence Context:
"; print "$info->source:$info->fmin..$info->fmax
"; print $info->residues; } } // now print any remaining sequences foreach($other_seqs as $i => $rel){ print "
$rel->subject_type sequence"; print "
";
               print ereg_replace("(.{100})","\\1
",$rel->subject_residues); print "
"; } print "
"; } ?>