Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Revert back to using full Def on graph legend

  • Loading branch information...
commit 612abf2483d6014971ac57f655d960dd45ad25f1 1 parent 7689846
@chrisbanks authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 CpiPlot.hs
View
4 CpiPlot.hs
@@ -45,8 +45,8 @@ plotTimeSeriesFiltered :: LA.Vector Double -> LA.Matrix Double -> [Species] -> [
plotTimeSeriesFiltered ts soln ss ss'
= plot
(LA.toList ts)
- (filter (\(s,_)-> s `elem` (map specName ss'))
- (zip (map specName ss) (map LA.toList (LA.toColumns soln))))
+ (filter (\(s,_)-> s `elem` (map pretty ss'))
+ (zip (map pretty ss) (map LA.toList (LA.toColumns soln))))
plot :: [Double] -> [(String,[Double])] -> IO ()
-- Plots the time series in a GTK window
Please sign in to comment.
Something went wrong with that request. Please try again.