Merge pull request #1 from revbayes/dev

Added Taxa Tab without Displayer

README.md

@@ -1,2 +1,65 @@
 # RevScripter
-Working repository for javascript GUI that generates Rev scripts
+
+## Description
+
+RevScripter is a web-based graphical tool for creating scripts in the Rev language, which then can be executed in [RevBayes](https://revbayes.github.io). 
+
+To use RevScripter on the web, go to:
+[https://revbayes.github.io/revscripter/](https://revbayes.github.io/revscripter/)
+
+## Motivation
+
+RevBayes is extremely flexible and the Rev language and graphical model framework enable researchers to apply a very rich set of complex evolutionary models. The development of RevScripter was motivated by a need to provide a familiar introductory interface for RevBayes and the Rev language. It will not be possible to maintain a menu-driven graphical user interface that encompasses the wide range of models and methods available in RevBayes. Thus, this tool will be useful for those new to RevBayes to set up standard analyses and easily see how elements of the model are reflected in the generated Rev language script. 
+
+## Available Analyses
+
+Currently, the options available in RevScripter are limited and the tool is still very much in development. Below are the current types of analyses that are possible in RevScripter:
+
+- Data types & substitution models:
+	- DNA analysis under JC, F81, K80, HKY, GTR
+	- morphological analysis under Mk (coming soon!)
+	- amino acid analysis under standard models (coming soon!)
+- Among-site rate heterogeneity:
+	- proportion of invariant sites
+	- gamma-distributed rates
+- Tree models:
+	- unrooted trees
+		- topology model: with or without outgroups assuming a uniform distribution on tree topologies
+		- branch lengths: iid branch lengths under standard parametric distributions
+		- clade constraints: (coming soon!)
+	- rooted trees & divergence time analysis (coming soon!)
+- MCMC options
+	- MCMC simulation for approximating the posterior distribution
+	- marginal-likelihood approximation (coming soon!)
+
+## Developers
+
+The development of RevScripter is led by [Lorenzo Chavarria](https://github.com/LorenzoCh11), with contributions from Walker Pett, Tracy Heath, and Sebastian Höhna.
+
+## Design
+
+The design of RevScripter is very much inspired by the BEAUti tool in the BEAST[1,2] package and the graphical user interface for the program BPP[3].
+
+## Graphical Interface for Complex Models
+
+While RevScripter is intended for use on the web and only to build scripts for standard phylogenetic analyses, a much more complex and rich graphical user interface is currently in development. Please stay tuned for the release of the official RevBayes GIU. This work is led by John Huelsenbeck. 
+
+### References
+
+[1] BEAST 1: [http://beast.community](http://beast.community)
+
+[2] BEAST 2: [http://www.beast2.org](http://www.beast2.org)
+
+[3] BPPg: [http://www.rannala.org/software/](http://www.rannala.org/software/)
+
+## License
+
+RevScripter is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.

examples/README.md

@@ -0,0 +1,3 @@
+# Example Files
+
+This directory contains example input data files for RevScripter, and examples of scripts.

examples/scriptexamples/clades.txt

@@ -0,0 +1,22 @@
+## This example is based on the clades selected in the
+## file "clades_example_screenshot.png"
+
+# First, create a variable for each clade.
+# This will use the name created by the user
+# So this probably means, we may have to pay attention to ways
+# that user-given names may be problematic. 
+# I think it makes sense for each of these to have a prefix (taxset_)
+
+
+taxset_G1 = clade("Ailuropoda_melanoleuca", "Tremarctos_ornatus")
+taxset_G2 = clade("Tremarctos_ornatus", "Helarctos_malayanus",
+				  "Melursus_ursinus", "Ursus_americanus")
+taxset_G3 = clade("Ursus_arctos", "Ursus_thibetanus")
+taxset_G4 = clade("Ursus_arctos","Ursus_thibetanus", "Ursus_maritimus")
+
+# Next, we will handle the monophyletic constraints.
+# So the following will only apply to those that have Monophyletic == TRUE
+# Though, if we want to really don anything with these, we will deal 
+# with them in the Tree Model window.
+
+monophyl_constraints = v(taxset_G2, taxset_G4)

examples/treeandnexusexamples/bears_dosReis.tre

@@ -0,0 +1,18 @@
+#NEXUS
+begin taxa;
+	dimensions ntax=8;
+	taxlabels
+	Ailuropoda_melanoleuca
+	Tremarctos_ornatus
+	Helarctos_malayanus
+	Ursus_americanus
+	Ursus_thibetanus
+	Ursus_arctos
+	Ursus_maritimus
+	Melursus_ursinus
+;
+end;
+
+begin trees;
+	tree tree_1 = [&R] (Ailuropoda_melanoleuca:33.2407,(Tremarctos_ornatus:27.9089,(((Helarctos_malayanus:11.6028,(Ursus_americanus:9.94807,Ursus_thibetanus:9.94807):1.65475):1.50343,(Ursus_arctos:2.8,Ursus_maritimus:2.8):10.3062):2.79539,Melursus_ursinus:15.9016):12.0072):5.33187);
+end;

examples/treeandnexusexamples/bears_irbp.nex

@@ -0,0 +1,30 @@
+#NEXUS
+begin taxa;
+	dimensions ntax=8;
+	taxlabels
+	Ailuropoda_melanoleuca
+	Tremarctos_ornatus
+	Helarctos_malayanus
+	Melursus_ursinus
+	Ursus_americanus
+	Ursus_arctos
+	Ursus_thibetanus
+	Ursus_maritimus
+;
+end;
+
+begin characters;
+	dimensions nchar=1281;
+	format datatype=dna missing=? gap=-;
+	matrix
+	Ailuropoda_melanoleuca	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACGCAAGAGGAACAGCTTGCCCAGTTGCAGAAGGGCATCCGCCATGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAAGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGAGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCCTACCTGCACCCCGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCGGGTCCTAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACAGGGGGCGTGGCTGAGGACATCACTTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTAGCCAACATGGACTTCTCTGCGGTGGTCTCCCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCGTCAGAGGACCCCAGGCTCCTGGTGCGGGCCGTCAGGCCCAAGGAAAGCTCTGCCGGGCC------CGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATTGTGCGCCAGGTGTGGGAGCCCCT-
+	Tremarctos_ornatus	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAATGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGCCCAGCGTCTGGAGGAAGCTCATGGGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCACATTTCTGGCATTCCCTACATCATCTCTTACCTGCACCCCGGGAACACGGTCCTGCATGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCTAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTCGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTAGCCAACATGGACTTCTCTGCGGTGGTCTCCCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCATCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTCAGGCCCAAGGAAAGCTCTGCTGAGCCCGAGATCGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCTGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATCATGCGCCAGGTGTGGGAGCCCCT-
+	Helarctos_malayanus	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGGGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCTTACCTGCACCCTGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCAAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTAGCCAACATGGACTTCTCTGCGGTGGTCTCTCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCGTCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTCAGGCCCAAGGAAAGCTCTGCTGAGCC------CGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATCATGCGCCAGGTGTGGGAGCCCCT-
+	Melursus_ursinus	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGGGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCTTACCTGCACCCCGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCAAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTGGCCAACATGGACTTCTCTGCGGTGGTCTCTCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGTGTCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTCAGGCCCAAGGAAAGCTCTGCTGAGCC------CGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCACACATCATGCGCCAGGTGTGGGAGCCCCT-
+	Ursus_americanus	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGGGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCTTACCTGCACCCCGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCAAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATTGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTGGCCAACATGGACTTCTCTGCGGTGGTCTCTCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCGTCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTCAGGCCCAAGGAAAGCTCTGCTGAGCC------CGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCAGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATCATGCGCCAGGTGTGGGAGCCCCT-
+	Ursus_arctos	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGGGCACCTCCGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCTTACCTGCACCCCGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCAAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTGGCCAACATGGACTTCTCTGCGGTGGTCTCTCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCGTCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTGAGGCCCAAGGAAAGCTCTGCTGAGCC------CGAGATCGGAGACGATGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATCATGCGCCAGGTGTGGGAGCCCCT-
+	Ursus_thibetanus	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGGGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCTTACCTGCACCCCGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCAAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTGGCCAACATGGACTTCTCTGCGGTGGTCTCTCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCGTCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTCAGGCCCAAGGAAAGCTCTGCTGAGCC------CGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCTGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATCATGCGCCAGGTGTGGGAGCCCCT-
+	Ursus_maritimus	CCAGAGAACCTGATGGGGATGCAGGAAGCCATCGAGCAGGCCACCAAGAGTCGTGAGATCCTCGCCATCTCAGACCCTCAGACTCTGGCCCATGTGCTGACCACTGGGGTGCAGAGCTCCTTGAACGACCCTCGCCTTGTCATCTCATATGAGCCCAGCACCCTCGAGGCTCCCCGGCAAGCCCCAGCACTCACCAACCTCACACAAGAGGAACTGCTTGCCCGGTTGCAGAAGGGCATCCGCCACGAGGTTCTGGAGGGCAATGTGGGCTACCTGCGTGTGGACGACATCCCAGGCCAGGAGGTGGTGAGCAAGCTGGGGGGCTTCCTGGTGGCCAGCGTCTGGAGGAAGCTCATGGGCACCTCTGCCTTGGTACTGGACCTCCGGCACTGCACTGGGGGCCGCATTTCCGGCATCCCCTACGTCATCTCTTACCTGCACCCCGGGAACACGGTCCTGCACGTGGATACCATCTACGACCGCCCCTCCAACACGACCACTGAGATCTGGACCCTGCCCCAGGTCCAAGGAGAAAGGTACAGTGCCGACAAAGATGTGGTGGTCCTCACCAGCGGCCACACGGGGGGCGTGGCTGAGGACATCACCTACATCCTCAAACAGATGCGCAGGGCCATCGTGGTGGGTGAGCGGACTGTGGGGGGTGCCCTGGACCTCCAGAAACTGAGGATAGGCCAGTCCGACTTCTTCCTCACCGTGCCCGTGTCCCGGTCCCTAGGGCCCCTGGGAGGGGGCAGCCAGACATGGGAGGGCAGCGGGGTGCTGCCCTGTGTGGGGACACCAGCCGAGCAGGCCCTCGAGAAAGCCCTGGCCATCCTCACTCTGCGCCGGGCCCTGCCAGGGATAGTGCGGCGCCTGCAGGAGGCCCTGCAGGCCTACTACACGCTGGTGGACCGTGTGCCCACCCTGCTGCACCACCTGGCCAACATGGACTTCTCTGCGGTGGTCTCTCAGGAGGACCTGGTCACGAAGCTCAACGCTGGCCTACAGACTGCGTCTGAGGACCCCAGGCTCCTGGTGCGGGCCGTGAGGCCCAAGGAAAGCTCTGCTGAGCC------CGAGATCGGAGACGACGACCTTCCGGAGGTGGTCCCCACAGTGCCCGGGGATGAGGCTGCCCGGCGGGCCCTGGTGGACTCTATGTTCCAGGTGTCCGTGCTGCCAGGCAACGTGGGCTACCTCCGCTTTGACAGCTGTGCCGACGCCTCGGTGCTGGAGGTGCTGAGCCCGCACATCATGCGCCAGGTGTGGGAGCCCCT-
+
+;
+end;