Open main menu

Biolecture.org β

Changes

Perl Code of CTNNB1

No change in size, 22:58, 25 May 2016
no edit summary
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TAC/i ){ return &#39;Y&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TAT/i ){ return &#39;Y&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TAA/i ){ return &#39;_*&#39; }<br />&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TAG/i ){ return &#39;_*&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TGC/i ){ return &#39;C&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TGT/i ){ return &#39;C&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TGA/i ){ return &#39;_*&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /TGG/i ){ return &#39;W&#39; }<br />
&nbsp; &nbsp; &nbsp;elsif( $codon =~ /CTA/i ){ return &#39;L&#39; }<br />
Anonymous user
Retrieved from "https://Biolecture.org/Special:MobileDiff/8931"