RosettaCodeData/Task/FASTA-format/J/fasta-format-1.j
2023-07-01 13:44:08 -04:00

2 lines
128 B
Text

require 'strings' NB. not needed for J versions greater than 6.
parseFasta=: ((': ' ,~ LF&taketo) , (LF -.~ LF&takeafter));._1