Skip to content

Commit

Permalink
colors
Browse files Browse the repository at this point in the history
  • Loading branch information
goosedb committed Oct 24, 2019
1 parent e95582a commit 8331d04
Show file tree
Hide file tree
Showing 2 changed files with 20 additions and 24 deletions.
40 changes: 18 additions & 22 deletions resources/prolog.ascii
Original file line number Diff line number Diff line change
@@ -1,22 +1,18 @@


?- write("Hello , Prolog
"), n_factorial (0,1 ).n_facto
rial(N, F):-N #>0,N1#=N -1,n_factori
al(N1,F1),F#=N *F1.bin_se arch(Elt,List,R
esult):-length(List,N),bin _search_inner(El
t, List,1,N,Result).bin_sea rch_inner(Elt,Lis
t,J,J,J):- nth(J,List,Elt). bin_search_inner (
Elt,List,B egin,End, Mid):-Begin<End,Mid
is(Begin+E nd)div 2,nth(M id,List,Elt).bin_sea
rch_inne r(Elt,Li st,Beg in,End,Result):- B
egin<En d,Mid is (Begin +End)div2,nth(Mid,
List,M id,El t),Mid,El t<El
t,New BeginisMid+1,bin_search_inner(E
lt,L ist,NewBegin,End,Result). bin_search_
inn er(Elt,List,Begin,End,Result):-Begin
<En d,Mid is(Begin+End)div 2,nth( Mid,
L ist,MidElt),Mid,Elt>Elt,NewEnd is
Mid-1,bin_search_inner(Elt,Lis
,Begin, NewEnd, Result ).

{0} bin_search(Elt,Li{1}st,{0}Re
{0} sult):-length(List,N{1}), {0}bin_se
{0} arch_inner(Elt,List,1,N{1},Re{0}sult).bi
{0} n_search_inner(Elt,List,{1}J,J{0},J):-nth(J
{0} ,List,Elt).bin_search_inn{1}er({0}Elt,List,Be
{0} gin,End,M{1}id):-Begin{0} < End,{1}Mid{0} is (Begin+E
{0} nd) div 2{1},n({0}thMid,L{1}is{0}t,Elt){1}.bi{0}n_search_inn
{0} er(Elt,L{1}is{0}t,B{1}egin,{0}End{1},R{0}esul{1}t):{0}-Begin < End,
{0} Mid is ({1}De{0}gi{1}n+En{0}d) {1}d{0}i{1}v{0} 2,nt{1}h(M{0}id,List,MidEl
{0} t),MidEl{1}t<{0}El{1}t,NewBeg{0}i{1}n i{0}s M{1}id+{0}1,bin_search_
{0} inner(El{1}t,L{0}ist{1},Ne{0}wBeg{1}in{0},End,{1}Result). bin{0}_se
{0} arch_inn{1}er(E{0}lt,List,{1}Be{0}gin,End{1},Result):-Be{0}gi
{0} n<End,M{1}id is (Begin{0}+End) div 2,nth(Mid,Li
{0} st,Mid{1}Elt{0}),MidElt>Elt,NewEnd is Mid-1,b
{0} in_s{1}ear{0}ch_inner(Elt,List,Begin,NewEn
{0} d,R{1}esu{0}lt).n_factorial(0,1).n_fact
{0} o{1}ria{0}l(N,F):-N #>0,N1#=N-1,n_f
{0} {1}ac{0}torial(N1,F1),F#=N *F1.
4 changes: 2 additions & 2 deletions src/language.rs
Original file line number Diff line number Diff line change
Expand Up @@ -175,7 +175,7 @@ impl Language {
Language::ObjectiveC => include_str!("../resources/objectivec.ascii"),
Language::Perl => include_str!("../resources/perl.ascii"),
Language::Php => include_str!("../resources/php.ascii"),
Language::Prolog => include_str!("../resource/prolog.ascii"),
Language::Prolog => include_str!("../resources/prolog.ascii"),
Language::PureScript => include_str!("../resources/purescript.ascii"),
Language::Python => include_str!("../resources/python.ascii"),
Language::R => include_str!("../resources/r.ascii"),
Expand Down Expand Up @@ -222,7 +222,7 @@ impl Language {
Language::ObjectiveC => vec![Color::BrightBlue, Color::Blue],
Language::Perl => vec![Color::BrightBlue],
Language::Php => vec![Color::BrightWhite],
Language::Prolog => vec![Color::White],
Language::Prolog => vec![Color::Blue, Color::Red],
Language::PureScript => vec![Color::White],
Language::Python => vec![Color::Blue, Color::Yellow],
Language::R => vec![Color::White, Color::Blue],
Expand Down

0 comments on commit 8331d04

Please sign in to comment.