FASTA format: Difference between revisions
Content added Content deleted
Drkameleon (talk | contribs) |
|||
Line 994: | Line 994: | ||
Rosetta_Example_2: THERECANBESEVERALLINESBUTTHEYALLMUSTBECONCATENATED |
Rosetta_Example_2: THERECANBESEVERALLINESBUTTHEYALLMUSTBECONCATENATED |
||
</pre> |
</pre> |
||
=={{header|Objeck}}== |
|||
<lang objeck>class Fasta { |
|||
function : Main(args : String[]) ~ Nil { |
|||
if(args->Size() = 1) { |
|||
is_line := false; |
|||
tokens := System.Utility.Parser->Tokenize(System.IO.File.FileReader->ReadFile(args[0]))<String>; |
|||
each(i : tokens) { |
|||
token := tokens->Get(i); |
|||
if(token->Get(0) = '>') { |
|||
is_line := true; |
|||
if(i <> 0) { |
|||
"\n"->Print(); |
|||
}; |
|||
} |
|||
else { |
|||
if(is_line) { |
|||
"{$token}: "->Print(); |
|||
is_line := false; |
|||
} |
|||
else { |
|||
token->Print(); |
|||
}; |
|||
}; |
|||
}; |
|||
}; |
|||
} |
|||
} |
|||
</lang> |
|||
=={{header|OCaml}}== |
=={{header|OCaml}}== |