* Added documentation for colors to the wheel source.

diff --git a/wheel.pl b/wheel.pl
index 0c319235c049f0f5791dbfed4916012ead32c234..a4c05c3139538f4052d049033dd117f8624c5f97 100755 (executable)
--- a/wheel.pl
+++ b/wheel.pl
@@ -20,7 +20,7 @@
 
 
 
-my $VERSION=q$Id: wheel.pl,v 1.2 2004-10-19 01:16:18 don Exp $;
+my $VERSION=q$Id: wheel.pl,v 1.3 2004-10-21 22:32:38 don Exp $;
 
 # Intial Released Version 0.10
 # p01: Fixing displayed angle
@@ -523,6 +523,21 @@ else {
   if (defined $q->param('submit') and $q->param('submit')=~/Submit/) {
     print $q->h1('Wheel:'.$q->param('sequence'));
     print $q->img({-src=>$q->self_url.'&draw=yes'});
+
+    print <<OUT
+<table width="400"><tr><td>By default the output presents the
+hydrophilic residues as circles, hydrophobic residues as diamonds,
+potentially negatively charged as triangles, and potentially
+positively charged as pentagons. Hydrophobicity is color coded as
+well: the most hydrophobic residue is green, and the amount of green
+is decreasing proportionally to the hydrophobicity, with zero
+hydrophobicity coded as yellow. Hydrophilic residues are coded red
+with pure red being the most hydrophilic (uncharged) residue, and the
+amount of red decreasing proportionally to the hydrophilicity. The
+potentially charged residues are light blue. (The color will not apply
+if you turn off color.)</td></tr></table>
+OUT
+
   }
   print $q->h1('Helical Wheel Projections'),
     $q->start_form(-method=>'GET'),