RNAdesign 0.1.2.1 → 0.1.2.2

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• BioInf/RNAdesign/Assignment.hs +1/−1
• RNAdesign.cabal +1/−1

@@ -42,7 +42,7 @@   | noNodes g == 2 = let [n,m] = nodes g                          svnm = [[a,b] | a <- sv V.! n, b <- sv V.! m, isViennaPair a b]                      in  Assignment (VU.fromList [n,m]) (V.fromList $ map VU.fromList $ svnm) True (genericLength svnm)-  | noNodes g >  2 = let es :: [(Int,Int)] = nub . filter (uncurry (<)) . map (\(a,b,_) -> (a,b)) . sortBy (compare `on` sel3) . labEdges $ g' -- $ ears g+  | noNodes g >  2 = let es :: [(Int,Int)] = nub . filter (uncurry (<)) . map (\(a,b,_) -> (a,b)) . sortBy (compare `on` sel3) . labEdges $ g' -- \ $ ears g                          g' = case bcc g of                                 [_] -> ears g                                 xs  -> emap (const 0) g

@@ -1,5 +1,5 @@ name:           RNAdesign-version:        0.1.2.1+version:        0.1.2.2 author:         Christian Hoener zu Siederdissen copyright:      Christian Hoener zu Siederdissen, 2013-2014 maintainer:     choener@tbi.univie.ac.at