Whitespace clean

This commit is contained in:
Tiago Gomes 2012-12-19 18:22:47 +00:00
parent 60ff9daafd
commit c407594146
4 changed files with 22 additions and 22 deletions

View File

@ -5,7 +5,10 @@
% support for a single sequence.
%
:- module(fasta, [fa2atoms/2,fa2atoms/3]).
:- module(fasta,
[fa2atoms/2,
fa2atoms/3
]).
fa2atoms(F, L) :-
fa2atoms(F, L, []).
@ -44,4 +47,3 @@ skip_header(_,S) :-
skip_header(C,S).

View File

@ -327,4 +327,3 @@ max_index([_|L],I0,Max0,MaxIndex0,Max,MaxIndex) :-
I is I0+1,
max_index(L,I,Max0,MaxIndex0,Max,MaxIndex).

View File

@ -9,8 +9,7 @@
[fa2atoms/3]).
:- use_module(library(lists),
[
nth/3,
[nth/3,
append/3
]).