From: Ben Woodcroft <b.woodcroft@uq.edu.au>
To: "guix-devel@gnu.org" <guix-devel@gnu.org>
Subject: [PATCH] Add MAFFT.
Date: Thu, 23 Jul 2015 22:43:31 +1000 [thread overview]
Message-ID: <55B0E173.1030406@uq.edu.au> (raw)
[-- Attachment #1: Type: text/plain, Size: 110 bytes --]
Note that the "extensions" listed on the website are research/non-profit
only, and so not fit for inclusion.
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-gnu-Add-mafft.patch --]
[-- Type: text/x-patch; name="0001-gnu-Add-mafft.patch", Size: 3797 bytes --]
From b966b0c8ab9b194bbb7089cc4b4e3a9727862691 Mon Sep 17 00:00:00 2001
From: Ben Woodcroft <donttrustben@gmail.com>
Date: Thu, 23 Jul 2015 22:42:17 +1000
Subject: [PATCH] gnu: Add mafft.
* gnu/packages/bioinformatics.scm (mafft): New variable
---
gnu/packages/bioinformatics.scm | 57 +++++++++++++++++++++++++++++++++++++++++
1 file changed, 57 insertions(+)
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index 78cd3ce..a09b89e 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -1394,6 +1394,63 @@ resolution of binding sites through combining the information of both
sequencing tag position and orientation.")
(license license:bsd-3)))
+(define-public mafft
+ (package
+ (name "mafft")
+ (version "7.221")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append
+ "http://mafft.cbrc.jp/alignment/software/mafft-" version
+ "-without-extensions-src.tgz"))
+ (file-name (string-append name "-" version ".tgz"))
+ (sha256
+ (base32
+ "0xi7klbsgi049vsrk6jiwh9wfj3b770gz3c8c7zwij448v0dr73d"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f ; no automated tests, though there are tests in the readme
+ #:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
+ (string-append "BINDIR=" (string-append
+ (assoc-ref %outputs "out")
+ "/bin")))
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'enter-dir
+ (lambda _ (chdir "core") #t))
+ ;; on advice from the MAFFT authors, do not distribute mafft-profile,
+ ;; mafft-distance mafft-homologs.rb
+ (add-after 'enter-dir 'patch-makefile
+ (lambda _
+ (substitute* "Makefile"
+ (("^SCRIPTS = mafft mafft-homologs.rb")
+ "SCRIPTS = mafft")
+ (((string-append "^PROGS = dvtditr dndfast7 dndblast"
+ " sextet5 mafft-distance"))
+ "PROGS = dvtditr dndfast7 dndblast sextet5")
+ (((string-append "splittbfast disttbfast tbfast "
+ "mafft-profile f2cl mccaskillwrap"))
+ "splittbfast disttbfast tbfast f2cl mccaskillwrap")
+ (("^rm -f mafft-profile mafft-profile.exe") "#")
+ (("^rm -f mafft-distance mafft-distance.exe") ")#")
+ ;; do not install MAN pages in libexec folder
+ (((string-append "^\t\\$\\(INSTALL\\) -m 644 \\$\\("
+ "MANPAGES\\) \\$\\(DESTDIR\\)\\$"
+ "\\(LIBDIR\\)")) "#"))
+ #t))
+ (delete 'configure))))
+ (inputs
+ `(("perl" ,perl)))
+ (home-page "http://mafft.cbrc.jp/alignment/software/")
+ (synopsis
+ "Multiple sequence alignment program for unix-like operating systems")
+ (description
+ "MAFFT offers a range of multiple alignment methods for nucleotide and
+protein sequences. For instance, it offers L-INS-i (accurate; for alignment
+of <∼200 sequences) and FFT-NS-2 (fast; for alignment of <∼30,000
+sequences).")
+ (license (license:non-copyleft "file://license"
+ "See license in the distribution."))))
(define-public metabat
(package
--
2.4.3
next reply other threads:[~2015-07-23 12:43 UTC|newest]
Thread overview: 13+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-07-23 12:43 Ben Woodcroft [this message]
2015-07-25 19:26 ` [PATCH] Add MAFFT Ricardo Wurmus
2015-07-26 3:10 ` Ben Woodcroft
2015-07-26 9:43 ` Andreas Enge
2015-07-26 10:16 ` Ricardo Wurmus
2015-07-26 10:29 ` Andreas Enge
2015-07-31 22:42 ` Ben Woodcroft
2015-08-25 20:58 ` Ludovic Courtès
2015-09-07 8:55 ` Andreas Enge
2015-09-07 9:07 ` Ricardo Wurmus
2015-09-12 12:20 ` Ben Woodcroft
2015-09-16 20:19 ` Ludovic Courtès
2015-09-16 21:09 ` Ricardo Wurmus
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=55B0E173.1030406@uq.edu.au \
--to=b.woodcroft@uq.edu.au \
--cc=guix-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).