/*
    Print a list of all possible codons
    using IUPAC standard nucleotide codes.
*/

char ncodes[] = "gatucrymkswhbvdnx.-";

int main(int argc, char *argv[])
{
  int i, j, k;
  int numberOfCodes;

  numberOfCodes = ( sizeof ncodes ) - 1;
  for ( i = 0; i < numberOfCodes; i++ ) {
    for ( j = 0; j < numberOfCodes; j++ ) {
      for ( k = 0; k < numberOfCodes; k++ ) {
        putchar( ncodes[i] );
        putchar( ncodes[j] );
        putchar( ncodes[k] );
      }
    }
  }
  putchar( '\n' );

}