From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-0.3 required=5.0 tests=BAYES_00, REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news1.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!t-online.de!news.karotte.org!news.musoftware.de!wum.musoftware.de!weretis.net!feeder2.news.weretis.net!news.teledata-fn.de!newsfeed.arcor.de!newsspool1.arcor-online.net!news.arcor.de.POSTED!not-for-mail Date: Sun, 02 Aug 2009 13:39:52 +0200 From: Georg Bauhaus Reply-To: rm.tsoh+bauhaus@maps.futureapps.de User-Agent: Thunderbird 2.0.0.22 (Windows/20090605) MIME-Version: 1.0 Newsgroups: comp.lang.ada Subject: Re: Ada Shootout program for K-Nucleotide (patches) References: <4a743343$0$32674$9b4e6d93@newsspool2.arcor-online.net> <3f9f9e21-e088-4fbe-baac-dd43fdf6b911@r38g2000yqn.googlegroups.com> In-Reply-To: <3f9f9e21-e088-4fbe-baac-dd43fdf6b911@r38g2000yqn.googlegroups.com> Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Message-ID: <4a757b0d$0$31328$9b4e6d93@newsspool4.arcor-online.net> Organization: Arcor NNTP-Posting-Date: 02 Aug 2009 13:39:57 CEST NNTP-Posting-Host: 19690bad.newsspool4.arcor-online.net X-Trace: DXC=kYoejZ;cY:Ij7E:bke<5HF4IUK jonathan wrote: > > I forgot to add I used: > > gnatmake -gnatnp -O3 -funroll-all-loops -march=native knucleotide > > with a running time of (usually) 7.25 sec on the 25Meg data file: > > time ./knucleotide < fasta25.dat Thanks for running the program, glad to hear how they work. Meanwhile I have a tasking version which runs a little (25%) faster. The two new changes are 1 - make 3 additional tasks call Write; round robin 2 - order the results using a protected Printer object with entry families. Heck, these entry families have clever features! :-) http://home.arcor.de/bauhaus/Ada/knucleotide.tasking.gnat