", substr($seq1,0, $iP), "\n

";
 echo "
", substr($seq1,0, $iP), "\n
";
 echo substr( $seq1, $iP ),"
";

/** test green text
 echo "
", substr($seq1,0, $iP), "\n
";
 echo substr( $seq1, $iP ),"
";
 echo "
", substr($seq1,0, $iP), "\n
";
 echo substr( $seq1, $iP ),"
";
 echo "
", substr($seq1,0, $iP), "\n
";
 echo substr( $seq1, $iP ),"
";
 echo "
", substr($seq1,0, $iP), "\n
";
 echo substr( $seq1, $iP ),"
";
**/

 $iP = strpos( $seq2, "\n" );                  // TODO: check iP  ?
 //echo "
", substr($seq2,0, $iP), "\n
";
 echo "
", substr($seq2,0, $iP), "\n
";
 echo substr( $seq2, $iP ),"
";


 // --------------------------------------------------------
 // List of the mouse sensitive msgs - maps' polygons, etc.
 // --------------------------------------------------------

 $fmsg = fopen( $MAP_MSGS, "r" );
 while( $buf = fgets( $fmsg, 128 ) )    {
    echo $buf;
 }
 fclose( $fmsg );
 //echo "";
 //echo "";


 $fmot = fopen( $MOT_LIST, "r" );


 #_________________________ Loop on Matrices.
for( $i = 0; $i < $numMatr; $i++ ) {
 $wm_    = strToUpper( f_fileBase( $wmList[$i] ) );
 $wmFile = $wmList[$i];

 echo "
 
 Weight Matrix of $wm_";
 echo  "
 ";

 //echo  "";
 //                                                                *********
 //echo  "";
 echo  "";
 
 echo  "
  
Aminoacid matrix
";
 echo  "
";
 //$fmat = fopen( "../data/".$MATR.".matrix", "r" );
 //+$fmat = fopen( $WMATR, "r" );
 $fmat = fopen( $wmFile, "r" );
 while( $buf = fgets( $fmat, 128 ) )    {
    echo $buf;
 }
 fclose( $fmat );
 //echo  "
";

 echo "

";

?>




 > 
: Graphic of the Pairwise Motifs' Collection of DotHelix





  
 align=center >

   >

  

  
  

      
      
      _1 size=80  align=center>
      
      _2 size=80  align=center>

      _3 size=80  align=center 
             value="Put mouse over a motif in the map." >
      
      

	    
      >

   
   





    
      

      

$wm_: List of Motifs
   
";

 //+$fmot = fopen( $MOT_LIST, "r" );
 while( $buf = fgets( $fmot, 128 ) )    {
    //-if( !( $buf = fgets( $fmot, 128 ) ) ) break;

    if( substr($buf,0,5) == "*next" ) 
      //echo "***Next motif collection";
      break;
    else
      echo $buf;
 }
 //+fclose( $fmot );

 //echo "
";


?>

 
 
 Top";
     echo "";
     echo "";
     echo "";
     echo "";
     echo "";
     echo "
 

Parameters
Sequences 
Matrix of $wm_
Collection Map
Motifs
";

} // end Loop on WM

    fclose( $fmot );

    #                             Delete all temporary files.
 
   if( $Linux ) {
      system( "rm $S1_FNAME" );
      system( "rm $S2_FNAME" );
      system( "rm $MAP_MSGS" );
      system( "rm $MOT_LIST" );
      system( "rm $PARMFILE" );             // ? + images
      for( $i = 0; $i < $numMatr; $i++ ) {
        //system( "rm ".$IMAGE_PREF.$i.".png" );
      }

    }

    echo "
";
?>



     Designed by Valeri Kazatchenko.
                  Last updated: April 20, 2001. 
   
Comments and bug-reports send to 
        Vladimir Nikolaev 
    
   
Created: .