mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-14 09:32:22 +00:00
533 lines
62 KiB
HTML
533 lines
62 KiB
HTML
<html>
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
|
|
<style type="text/css">
|
|
span.lineno { color: white; background: #aaaaaa; border-right: solid white 12px }
|
|
span.nottickedoff { background: yellow}
|
|
span.istickedoff { background: white }
|
|
span.tickonlyfalse { margin: -1px; border: 1px solid #f20913; background: #f20913 }
|
|
span.tickonlytrue { margin: -1px; border: 1px solid #60de51; background: #60de51 }
|
|
span.funcount { font-size: small; color: orange; z-index: 2; position: absolute; right: 20 }
|
|
span.decl { font-weight: bold }
|
|
span.spaces { background: white }
|
|
</style>
|
|
</head>
|
|
<body>
|
|
<pre>
|
|
<span class="decl"><span class="nottickedoff">never executed</span> <span class="tickonlytrue">always true</span> <span class="tickonlyfalse">always false</span></span>
|
|
</pre>
|
|
<pre>
|
|
<span class="lineno"> 1 </span>{-# LANGUAGE OverloadedStrings #-}
|
|
<span class="lineno"> 2 </span>{-|
|
|
<span class="lineno"> 3 </span> A colormap takes a number between 0 and 1 (inclusive) and spits out a color.
|
|
<span class="lineno"> 4 </span> The colors do not have an alpha component but one can be added with
|
|
<span class="lineno"> 5 </span> `Codec.Picture.Types.promotePixel`.
|
|
<span class="lineno"> 6 </span>-}
|
|
<span class="lineno"> 7 </span>module Reanimate.ColorMap
|
|
<span class="lineno"> 8 </span> ( turbo
|
|
<span class="lineno"> 9 </span> , viridis
|
|
<span class="lineno"> 10 </span> , magma
|
|
<span class="lineno"> 11 </span> , inferno
|
|
<span class="lineno"> 12 </span> , plasma
|
|
<span class="lineno"> 13 </span> , sinebow
|
|
<span class="lineno"> 14 </span> , parula
|
|
<span class="lineno"> 15 </span> , cividis
|
|
<span class="lineno"> 16 </span> , jet
|
|
<span class="lineno"> 17 </span> , hsv
|
|
<span class="lineno"> 18 </span> , hsvMatlab
|
|
<span class="lineno"> 19 </span> , greyscale
|
|
<span class="lineno"> 20 </span> ) where
|
|
<span class="lineno"> 21 </span>
|
|
<span class="lineno"> 22 </span>import Data.Text (Text)
|
|
<span class="lineno"> 23 </span>import Data.Vector (Vector)
|
|
<span class="lineno"> 24 </span>import qualified Data.Text as T
|
|
<span class="lineno"> 25 </span>import qualified Data.Vector as V
|
|
<span class="lineno"> 26 </span>import Codec.Picture
|
|
<span class="lineno"> 27 </span>import Data.Char
|
|
<span class="lineno"> 28 </span>import Data.Bits
|
|
<span class="lineno"> 29 </span>import qualified Data.Colour.RGBSpace.HSV as HSV
|
|
<span class="lineno"> 30 </span>import Data.Colour.RGBSpace
|
|
<span class="lineno"> 31 </span>
|
|
<span class="lineno"> 32 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 33 </span>-- the “turbo” color scheme by Anton Mikhailov.
|
|
<span class="lineno"> 34 </span>--
|
|
<span class="lineno"> 35 </span>-- <<docs/gifs/doc_turbo.gif>>
|
|
<span class="lineno"> 36 </span>turbo :: Double -> PixelRGB8
|
|
<span class="lineno"> 37 </span><span class="decl"><span class="istickedoff">turbo t = PixelRGB8 red green blue</span>
|
|
<span class="lineno"> 38 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 39 </span><span class="spaces"> </span><span class="istickedoff">red = trunc (round (34.61 + t * (1172.33 - t * (10793.56 - t * (33300.12 - t * (38394.49 - t * 14825.05))))))</span>
|
|
<span class="lineno"> 40 </span><span class="spaces"> </span><span class="istickedoff">green = trunc (round (23.31 + t * (557.33 + t * (1225.33 - t * (3574.96 - t * (1073.77 + t * 707.56))))))</span>
|
|
<span class="lineno"> 41 </span><span class="spaces"> </span><span class="istickedoff">blue = trunc (round (27.2 + t * (3211.1 - t * (15327.97 - t * (27814 - t * (22569.18 - t * 6838.66))))))</span>
|
|
<span class="lineno"> 42 </span><span class="spaces"> </span><span class="istickedoff">trunc :: Integer -> Pixel8</span>
|
|
<span class="lineno"> 43 </span><span class="spaces"> </span><span class="istickedoff">trunc = fromIntegral . min 255 . max 0</span></span>
|
|
<span class="lineno"> 44 </span>
|
|
<span class="lineno"> 45 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 46 </span>-- the “viridis” perceptually-uniform color scheme designed by van der Walt,
|
|
<span class="lineno"> 47 </span>-- Smith and Firing for matplotlib, represented as an RGB string.
|
|
<span class="lineno"> 48 </span>--
|
|
<span class="lineno"> 49 </span>-- <<docs/gifs/doc_viridis.gif>>
|
|
<span class="lineno"> 50 </span>viridis :: Double -> PixelRGB8
|
|
<span class="lineno"> 51 </span><span class="decl"><span class="istickedoff">viridis = ramp (colors</span>
|
|
<span class="lineno"> 52 </span><span class="spaces"> </span><span class="istickedoff">"44015444025645045745055946075a46085c460a5d460b5e470d60470e614710634711644713\</span>
|
|
<span class="lineno"> 53 </span><span class="spaces"> </span><span class="istickedoff">\6548146748166848176948186a481a6c481b6d481c6e481d6f481f7048207148217348237448\</span>
|
|
<span class="lineno"> 54 </span><span class="spaces"> </span><span class="istickedoff">\2475482576482677482878482979472a7a472c7a472d7b472e7c472f7d46307e46327e46337f\</span>
|
|
<span class="lineno"> 55 </span><span class="spaces"> </span><span class="istickedoff">\463480453581453781453882443983443a83443b84433d84433e85423f854240864241864142\</span>
|
|
<span class="lineno"> 56 </span><span class="spaces"> </span><span class="istickedoff">\874144874045884046883f47883f48893e49893e4a893e4c8a3d4d8a3d4e8a3c4f8a3c508b3b\</span>
|
|
<span class="lineno"> 57 </span><span class="spaces"> </span><span class="istickedoff">\518b3b528b3a538b3a548c39558c39568c38588c38598c375a8c375b8d365c8d365d8d355e8d\</span>
|
|
<span class="lineno"> 58 </span><span class="spaces"> </span><span class="istickedoff">\355f8d34608d34618d33628d33638d32648e32658e31668e31678e31688e30698e306a8e2f6b\</span>
|
|
<span class="lineno"> 59 </span><span class="spaces"> </span><span class="istickedoff">\8e2f6c8e2e6d8e2e6e8e2e6f8e2d708e2d718e2c718e2c728e2c738e2b748e2b758e2a768e2a\</span>
|
|
<span class="lineno"> 60 </span><span class="spaces"> </span><span class="istickedoff">\778e2a788e29798e297a8e297b8e287c8e287d8e277e8e277f8e27808e26818e26828e26828e\</span>
|
|
<span class="lineno"> 61 </span><span class="spaces"> </span><span class="istickedoff">\25838e25848e25858e24868e24878e23888e23898e238a8d228b8d228c8d228d8d218e8d218f\</span>
|
|
<span class="lineno"> 62 </span><span class="spaces"> </span><span class="istickedoff">\8d21908d21918c20928c20928c20938c1f948c1f958b1f968b1f978b1f988b1f998a1f9a8a1e\</span>
|
|
<span class="lineno"> 63 </span><span class="spaces"> </span><span class="istickedoff">\9b8a1e9c891e9d891f9e891f9f881fa0881fa1881fa1871fa28720a38620a48621a58521a685\</span>
|
|
<span class="lineno"> 64 </span><span class="spaces"> </span><span class="istickedoff">\22a78522a88423a98324aa8325ab8225ac8226ad8127ad8128ae8029af7f2ab07f2cb17e2db2\</span>
|
|
<span class="lineno"> 65 </span><span class="spaces"> </span><span class="istickedoff">\7d2eb37c2fb47c31b57b32b67a34b67935b77937b87838b9773aba763bbb753dbc743fbc7340\</span>
|
|
<span class="lineno"> 66 </span><span class="spaces"> </span><span class="istickedoff">\bd7242be7144bf7046c06f48c16e4ac16d4cc26c4ec36b50c46a52c56954c56856c66758c765\</span>
|
|
<span class="lineno"> 67 </span><span class="spaces"> </span><span class="istickedoff">\5ac8645cc8635ec96260ca6063cb5f65cb5e67cc5c69cd5b6ccd5a6ece5870cf5773d05675d0\</span>
|
|
<span class="lineno"> 68 </span><span class="spaces"> </span><span class="istickedoff">\5477d1537ad1517cd2507fd34e81d34d84d44b86d54989d5488bd6468ed64590d74393d74195\</span>
|
|
<span class="lineno"> 69 </span><span class="spaces"> </span><span class="istickedoff">\d84098d83e9bd93c9dd93ba0da39a2da37a5db36a8db34aadc32addc30b0dd2fb2dd2db5de2b\</span>
|
|
<span class="lineno"> 70 </span><span class="spaces"> </span><span class="istickedoff">\b8de29bade28bddf26c0df25c2df23c5e021c8e020cae11fcde11dd0e11cd2e21bd5e21ad8e2\</span>
|
|
<span class="lineno"> 71 </span><span class="spaces"> </span><span class="istickedoff">\19dae319dde318dfe318e2e418e5e419e7e419eae51aece51befe51cf1e51df4e61ef6e620f8\</span>
|
|
<span class="lineno"> 72 </span><span class="spaces"> </span><span class="istickedoff">\e621fbe723fde725")</span></span>
|
|
<span class="lineno"> 73 </span>
|
|
<span class="lineno"> 74 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 75 </span>-- the “magma” perceptually-uniform color scheme designed by van der Walt and
|
|
<span class="lineno"> 76 </span>-- Smith for matplotlib, represented as an RGB string.
|
|
<span class="lineno"> 77 </span>--
|
|
<span class="lineno"> 78 </span>-- <<docs/gifs/doc_magma.gif>>
|
|
<span class="lineno"> 79 </span>magma :: Double -> PixelRGB8
|
|
<span class="lineno"> 80 </span><span class="decl"><span class="istickedoff">magma = ramp (colors</span>
|
|
<span class="lineno"> 81 </span><span class="spaces"> </span><span class="istickedoff">"00000401000501010601010802010902020b02020d03030f0303120404140504160605180605\</span>
|
|
<span class="lineno"> 82 </span><span class="spaces"> </span><span class="istickedoff">\1a07061c08071e0907200a08220b09240c09260d0a290e0b2b100b2d110c2f120d31130d3414\</span>
|
|
<span class="lineno"> 83 </span><span class="spaces"> </span><span class="istickedoff">\0e36150e38160f3b180f3d19103f1a10421c10441d11471e114920114b21114e221150241253\</span>
|
|
<span class="lineno"> 84 </span><span class="spaces"> </span><span class="istickedoff">\25125527125829115a2a115c2c115f2d11612f116331116533106734106936106b38106c390f\</span>
|
|
<span class="lineno"> 85 </span><span class="spaces"> </span><span class="istickedoff">\6e3b0f703d0f713f0f72400f74420f75440f764510774710784910784a10794c117a4e117b4f\</span>
|
|
<span class="lineno"> 86 </span><span class="spaces"> </span><span class="istickedoff">\127b51127c52137c54137d56147d57157e59157e5a167e5c167f5d177f5f187f601880621980\</span>
|
|
<span class="lineno"> 87 </span><span class="spaces"> </span><span class="istickedoff">\641a80651a80671b80681c816a1c816b1d816d1d816e1e81701f81721f817320817521817621\</span>
|
|
<span class="lineno"> 88 </span><span class="spaces"> </span><span class="istickedoff">\817822817922827b23827c23827e24828025828125818326818426818627818827818928818b\</span>
|
|
<span class="lineno"> 89 </span><span class="spaces"> </span><span class="istickedoff">\29818c29818e2a81902a81912b81932b80942c80962c80982d80992d809b2e7f9c2e7f9e2f7f\</span>
|
|
<span class="lineno"> 90 </span><span class="spaces"> </span><span class="istickedoff">\a02f7fa1307ea3307ea5317ea6317da8327daa337dab337cad347cae347bb0357bb2357bb336\</span>
|
|
<span class="lineno"> 91 </span><span class="spaces"> </span><span class="istickedoff">\7ab5367ab73779b83779ba3878bc3978bd3977bf3a77c03a76c23b75c43c75c53c74c73d73c8\</span>
|
|
<span class="lineno"> 92 </span><span class="spaces"> </span><span class="istickedoff">\3e73ca3e72cc3f71cd4071cf4070d0416fd2426fd3436ed5446dd6456cd8456cd9466bdb476a\</span>
|
|
<span class="lineno"> 93 </span><span class="spaces"> </span><span class="istickedoff">\dc4869de4968df4a68e04c67e24d66e34e65e44f64e55064e75263e85362e95462ea5661eb57\</span>
|
|
<span class="lineno"> 94 </span><span class="spaces"> </span><span class="istickedoff">\60ec5860ed5a5fee5b5eef5d5ef05f5ef1605df2625df2645cf3655cf4675cf4695cf56b5cf6\</span>
|
|
<span class="lineno"> 95 </span><span class="spaces"> </span><span class="istickedoff">\6c5cf66e5cf7705cf7725cf8745cf8765cf9785df9795df97b5dfa7d5efa7f5efa815ffb835f\</span>
|
|
<span class="lineno"> 96 </span><span class="spaces"> </span><span class="istickedoff">\fb8560fb8761fc8961fc8a62fc8c63fc8e64fc9065fd9266fd9467fd9668fd9869fd9a6afd9b\</span>
|
|
<span class="lineno"> 97 </span><span class="spaces"> </span><span class="istickedoff">\6bfe9d6cfe9f6dfea16efea36ffea571fea772fea973feaa74feac76feae77feb078feb27afe\</span>
|
|
<span class="lineno"> 98 </span><span class="spaces"> </span><span class="istickedoff">\b47bfeb67cfeb77efeb97ffebb81febd82febf84fec185fec287fec488fec68afec88cfeca8d\</span>
|
|
<span class="lineno"> 99 </span><span class="spaces"> </span><span class="istickedoff">\fecc8ffecd90fecf92fed194fed395fed597fed799fed89afdda9cfddc9efddea0fde0a1fde2\</span>
|
|
<span class="lineno"> 100 </span><span class="spaces"> </span><span class="istickedoff">\a3fde3a5fde5a7fde7a9fde9aafdebacfcecaefceeb0fcf0b2fcf2b4fcf4b6fcf6b8fcf7b9fc\</span>
|
|
<span class="lineno"> 101 </span><span class="spaces"> </span><span class="istickedoff">\f9bbfcfbbdfcfdbf")</span></span>
|
|
<span class="lineno"> 102 </span>
|
|
<span class="lineno"> 103 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 104 </span>-- the “inferno” perceptually-uniform color scheme designed by van der Walt
|
|
<span class="lineno"> 105 </span>-- and Smith for matplotlib, represented as an RGB string.
|
|
<span class="lineno"> 106 </span>--
|
|
<span class="lineno"> 107 </span>-- <<docs/gifs/doc_inferno.gif>>
|
|
<span class="lineno"> 108 </span>inferno :: Double -> PixelRGB8
|
|
<span class="lineno"> 109 </span><span class="decl"><span class="istickedoff">inferno = ramp (colors</span>
|
|
<span class="lineno"> 110 </span><span class="spaces"> </span><span class="istickedoff">"00000401000501010601010802010a02020c02020e0302100403120403140504170604190705\</span>
|
|
<span class="lineno"> 111 </span><span class="spaces"> </span><span class="istickedoff">\1b08051d09061f0a07220b07240c08260d08290e092b10092d110a30120a32140b34150b3716\</span>
|
|
<span class="lineno"> 112 </span><span class="spaces"> </span><span class="istickedoff">\0b39180c3c190c3e1b0c411c0c431e0c451f0c48210c4a230c4c240c4f260c51280b53290b55\</span>
|
|
<span class="lineno"> 113 </span><span class="spaces"> </span><span class="istickedoff">\2b0b572d0b592f0a5b310a5c320a5e340a5f3609613809623909633b09643d09653e0966400a\</span>
|
|
<span class="lineno"> 114 </span><span class="spaces"> </span><span class="istickedoff">\67420a68440a68450a69470b6a490b6a4a0c6b4c0c6b4d0d6c4f0d6c510e6c520e6d540f6d55\</span>
|
|
<span class="lineno"> 115 </span><span class="spaces"> </span><span class="istickedoff">\0f6d57106e59106e5a116e5c126e5d126e5f136e61136e62146e64156e65156e67166e69166e\</span>
|
|
<span class="lineno"> 116 </span><span class="spaces"> </span><span class="istickedoff">\6a176e6c186e6d186e6f196e71196e721a6e741a6e751b6e771c6d781c6d7a1d6d7c1d6d7d1e\</span>
|
|
<span class="lineno"> 117 </span><span class="spaces"> </span><span class="istickedoff">\6d7f1e6c801f6c82206c84206b85216b87216b88226a8a226a8c23698d23698f246990256892\</span>
|
|
<span class="lineno"> 118 </span><span class="spaces"> </span><span class="istickedoff">\25689326679526679727669827669a28659b29649d29649f2a63a02a63a22b62a32c61a52c60\</span>
|
|
<span class="lineno"> 119 </span><span class="spaces"> </span><span class="istickedoff">\a62d60a82e5fa92e5eab2f5ead305dae305cb0315bb1325ab3325ab43359b63458b73557b935\</span>
|
|
<span class="lineno"> 120 </span><span class="spaces"> </span><span class="istickedoff">\56ba3655bc3754bd3853bf3952c03a51c13a50c33b4fc43c4ec63d4dc73e4cc83f4bca404acb\</span>
|
|
<span class="lineno"> 121 </span><span class="spaces"> </span><span class="istickedoff">\4149cc4248ce4347cf4446d04545d24644d34743d44842d54a41d74b3fd84c3ed94d3dda4e3c\</span>
|
|
<span class="lineno"> 122 </span><span class="spaces"> </span><span class="istickedoff">\db503bdd513ade5238df5337e05536e15635e25734e35933e45a31e55c30e65d2fe75e2ee860\</span>
|
|
<span class="lineno"> 123 </span><span class="spaces"> </span><span class="istickedoff">\2de9612bea632aeb6429eb6628ec6726ed6925ee6a24ef6c23ef6e21f06f20f1711ff1731df2\</span>
|
|
<span class="lineno"> 124 </span><span class="spaces"> </span><span class="istickedoff">\741cf3761bf37819f47918f57b17f57d15f67e14f68013f78212f78410f8850ff8870ef8890c\</span>
|
|
<span class="lineno"> 125 </span><span class="spaces"> </span><span class="istickedoff">\f98b0bf98c0af98e09fa9008fa9207fa9407fb9606fb9706fb9906fb9b06fb9d07fc9f07fca1\</span>
|
|
<span class="lineno"> 126 </span><span class="spaces"> </span><span class="istickedoff">\08fca309fca50afca60cfca80dfcaa0ffcac11fcae12fcb014fcb216fcb418fbb61afbb81dfb\</span>
|
|
<span class="lineno"> 127 </span><span class="spaces"> </span><span class="istickedoff">\ba1ffbbc21fbbe23fac026fac228fac42afac62df9c72ff9c932f9cb35f8cd37f8cf3af7d13d\</span>
|
|
<span class="lineno"> 128 </span><span class="spaces"> </span><span class="istickedoff">\f7d340f6d543f6d746f5d949f5db4cf4dd4ff4df53f4e156f3e35af3e55df2e661f2e865f2ea\</span>
|
|
<span class="lineno"> 129 </span><span class="spaces"> </span><span class="istickedoff">\69f1ec6df1ed71f1ef75f1f179f2f27df2f482f3f586f3f68af4f88ef5f992f6fa96f8fb9af9\</span>
|
|
<span class="lineno"> 130 </span><span class="spaces"> </span><span class="istickedoff">\fc9dfafda1fcffa4")</span></span>
|
|
<span class="lineno"> 131 </span>
|
|
<span class="lineno"> 132 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 133 </span>-- the “plasma” perceptually-uniform color scheme designed by van der Walt and
|
|
<span class="lineno"> 134 </span>-- Smith for matplotlib, represented as an RGB string.
|
|
<span class="lineno"> 135 </span>--
|
|
<span class="lineno"> 136 </span>-- <<docs/gifs/doc_plasma.gif>>
|
|
<span class="lineno"> 137 </span>plasma :: Double -> PixelRGB8
|
|
<span class="lineno"> 138 </span><span class="decl"><span class="istickedoff">plasma = ramp (colors</span>
|
|
<span class="lineno"> 139 </span><span class="spaces"> </span><span class="istickedoff">"0d088710078813078916078a19068c1b068d1d068e20068f2206902406912605912805922a05\</span>
|
|
<span class="lineno"> 140 </span><span class="spaces"> </span><span class="istickedoff">\932c05942e05952f059631059733059735049837049938049a3a049a3c049b3e049c3f049c41\</span>
|
|
<span class="lineno"> 141 </span><span class="spaces"> </span><span class="istickedoff">\049d43039e44039e46039f48039f4903a04b03a14c02a14e02a25002a25102a35302a35502a4\</span>
|
|
<span class="lineno"> 142 </span><span class="spaces"> </span><span class="istickedoff">\5601a45801a45901a55b01a55c01a65e01a66001a66100a76300a76400a76600a76700a86900\</span>
|
|
<span class="lineno"> 143 </span><span class="spaces"> </span><span class="istickedoff">\a86a00a86c00a86e00a86f00a87100a87201a87401a87501a87701a87801a87a02a87b02a87d\</span>
|
|
<span class="lineno"> 144 </span><span class="spaces"> </span><span class="istickedoff">\03a87e03a88004a88104a78305a78405a78606a68707a68808a68a09a58b0aa58d0ba58e0ca4\</span>
|
|
<span class="lineno"> 145 </span><span class="spaces"> </span><span class="istickedoff">\8f0da4910ea3920fa39410a29511a19613a19814a099159f9a169f9c179e9d189d9e199da01a\</span>
|
|
<span class="lineno"> 146 </span><span class="spaces"> </span><span class="istickedoff">\9ca11b9ba21d9aa31e9aa51f99a62098a72197a82296aa2395ab2494ac2694ad2793ae2892b0\</span>
|
|
<span class="lineno"> 147 </span><span class="spaces"> </span><span class="istickedoff">\2991b12a90b22b8fb32c8eb42e8db52f8cb6308bb7318ab83289ba3388bb3488bc3587bd3786\</span>
|
|
<span class="lineno"> 148 </span><span class="spaces"> </span><span class="istickedoff">\be3885bf3984c03a83c13b82c23c81c33d80c43e7fc5407ec6417dc7427cc8437bc9447aca45\</span>
|
|
<span class="lineno"> 149 </span><span class="spaces"> </span><span class="istickedoff">\7acb4679cc4778cc4977cd4a76ce4b75cf4c74d04d73d14e72d24f71d35171d45270d5536fd5\</span>
|
|
<span class="lineno"> 150 </span><span class="spaces"> </span><span class="istickedoff">\546ed6556dd7566cd8576bd9586ada5a6ada5b69db5c68dc5d67dd5e66de5f65de6164df6263\</span>
|
|
<span class="lineno"> 151 </span><span class="spaces"> </span><span class="istickedoff">\e06363e16462e26561e26660e3685fe4695ee56a5de56b5de66c5ce76e5be76f5ae87059e971\</span>
|
|
<span class="lineno"> 152 </span><span class="spaces"> </span><span class="istickedoff">\58e97257ea7457eb7556eb7655ec7754ed7953ed7a52ee7b51ef7c51ef7e50f07f4ff0804ef1\</span>
|
|
<span class="lineno"> 153 </span><span class="spaces"> </span><span class="istickedoff">\814df1834cf2844bf3854bf3874af48849f48948f58b47f58c46f68d45f68f44f79044f79143\</span>
|
|
<span class="lineno"> 154 </span><span class="spaces"> </span><span class="istickedoff">\f79342f89441f89540f9973ff9983ef99a3efa9b3dfa9c3cfa9e3bfb9f3afba139fba238fca3\</span>
|
|
<span class="lineno"> 155 </span><span class="spaces"> </span><span class="istickedoff">\38fca537fca636fca835fca934fdab33fdac33fdae32fdaf31fdb130fdb22ffdb42ffdb52efe\</span>
|
|
<span class="lineno"> 156 </span><span class="spaces"> </span><span class="istickedoff">\b72dfeb82cfeba2cfebb2bfebd2afebe2afec029fdc229fdc328fdc527fdc627fdc827fdca26\</span>
|
|
<span class="lineno"> 157 </span><span class="spaces"> </span><span class="istickedoff">\fdcb26fccd25fcce25fcd025fcd225fbd324fbd524fbd724fad824fada24f9dc24f9dd25f8df\</span>
|
|
<span class="lineno"> 158 </span><span class="spaces"> </span><span class="istickedoff">\25f8e125f7e225f7e425f6e626f6e826f5e926f5eb27f4ed27f3ee27f3f027f2f227f1f426f1\</span>
|
|
<span class="lineno"> 159 </span><span class="spaces"> </span><span class="istickedoff">\f525f0f724f0f921")</span></span>
|
|
<span class="lineno"> 160 </span>
|
|
<span class="lineno"> 161 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 162 </span>-- the “sinebow” color scheme by Jim Bumgardner and Charlie Loyd.
|
|
<span class="lineno"> 163 </span>--
|
|
<span class="lineno"> 164 </span>-- <<docs/gifs/doc_sinebow.gif>>
|
|
<span class="lineno"> 165 </span>sinebow :: Double -> PixelRGB8
|
|
<span class="lineno"> 166 </span><span class="decl"><span class="istickedoff">sinebow t = PixelRGB8 r g b</span>
|
|
<span class="lineno"> 167 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 168 </span><span class="spaces"> </span><span class="istickedoff">pi_1_3 = pi / 3</span>
|
|
<span class="lineno"> 169 </span><span class="spaces"> </span><span class="istickedoff">pi_2_3 = pi * 2 / 3</span>
|
|
<span class="lineno"> 170 </span><span class="spaces"> </span><span class="istickedoff">x = (0.5 - t) * pi</span>
|
|
<span class="lineno"> 171 </span><span class="spaces"> </span><span class="istickedoff">r = round $ 255 * sin x**2</span>
|
|
<span class="lineno"> 172 </span><span class="spaces"> </span><span class="istickedoff">g = round $ 255 * sin (x+pi_1_3)**2</span>
|
|
<span class="lineno"> 173 </span><span class="spaces"> </span><span class="istickedoff">b = round $ 255 * sin (x+pi_2_3)**2</span></span>
|
|
<span class="lineno"> 174 </span>
|
|
<span class="lineno"> 175 </span>-- | Given a number t in the range [0,1], returns the corresponding color from
|
|
<span class="lineno"> 176 </span>-- the “cividis” color vision deficiency-optimized color scheme designed by
|
|
<span class="lineno"> 177 </span>-- Nuñez, Anderton, and Renslow, represented as an RGB string.
|
|
<span class="lineno"> 178 </span>--
|
|
<span class="lineno"> 179 </span>-- <<docs/gifs/doc_cividis.gif>>
|
|
<span class="lineno"> 180 </span>cividis :: Double -> PixelRGB8
|
|
<span class="lineno"> 181 </span><span class="decl"><span class="istickedoff">cividis t = PixelRGB8 red green blue</span>
|
|
<span class="lineno"> 182 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 183 </span><span class="spaces"> </span><span class="istickedoff">red = trunc $ round(-4.54 - t * (35.34 - t * (2381.73 - t * (6402.7 - t * (7024.72 - t * 2710.57)))))</span>
|
|
<span class="lineno"> 184 </span><span class="spaces"> </span><span class="istickedoff">green = trunc $ round(32.49 + t * (170.73 + t * (52.82 - t * (131.46 - t * (176.58 - t * 67.37)))))</span>
|
|
<span class="lineno"> 185 </span><span class="spaces"> </span><span class="istickedoff">blue = trunc $ round(81.24 + t * (442.36 - t * (2482.43 - t * (6167.24 - t * (6614.94 - t * 2475.67)))))</span>
|
|
<span class="lineno"> 186 </span><span class="spaces"> </span><span class="istickedoff">trunc :: Integer -> Pixel8</span>
|
|
<span class="lineno"> 187 </span><span class="spaces"> </span><span class="istickedoff">trunc = fromIntegral . min 255 . max 0</span></span>
|
|
<span class="lineno"> 188 </span>
|
|
<span class="lineno"> 189 </span>-- | Jet colormap. Used to be the default in matlab. Obsolete.
|
|
<span class="lineno"> 190 </span>--
|
|
<span class="lineno"> 191 </span>-- <<docs/gifs/doc_jet.gif>>
|
|
<span class="lineno"> 192 </span>jet :: Double -> PixelRGB8
|
|
<span class="lineno"> 193 </span><span class="decl"><span class="istickedoff">jet t = PixelRGB8 red green blue</span>
|
|
<span class="lineno"> 194 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 195 </span><span class="spaces"> </span><span class="istickedoff">red = trunc $ min (4*t - 1.5) (-4*t + 4.5)</span>
|
|
<span class="lineno"> 196 </span><span class="spaces"> </span><span class="istickedoff">green = trunc $ min (4*t - 0.5) (-4*t + 3.5)</span>
|
|
<span class="lineno"> 197 </span><span class="spaces"> </span><span class="istickedoff">blue = trunc $ min (4*t + 0.5) (-4*t + 2.5)</span>
|
|
<span class="lineno"> 198 </span><span class="spaces"> </span><span class="istickedoff">trunc :: Double -> Pixel8</span>
|
|
<span class="lineno"> 199 </span><span class="spaces"> </span><span class="istickedoff">trunc = round . min 255 . max 0 . (*) 255</span></span>
|
|
<span class="lineno"> 200 </span>
|
|
<span class="lineno"> 201 </span>-- | hsv colormap. Goes from 0 degrees to 360 degrees.
|
|
<span class="lineno"> 202 </span>--
|
|
<span class="lineno"> 203 </span>-- <<docs/gifs/doc_hsv.gif>>
|
|
<span class="lineno"> 204 </span>hsv :: Double -> PixelRGB8
|
|
<span class="lineno"> 205 </span><span class="decl"><span class="istickedoff">hsv t = PixelRGB8 (round $ r*255) (round $ g*255) (round $ b*255)</span>
|
|
<span class="lineno"> 206 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 207 </span><span class="spaces"> </span><span class="istickedoff">RGB r g b = HSV.hsv (t * 360) 1 1</span></span>
|
|
<span class="lineno"> 208 </span>
|
|
<span class="lineno"> 209 </span>-- | Matlab hsv colormap. Goes from 0 degrees to 330 degrees.
|
|
<span class="lineno"> 210 </span>--
|
|
<span class="lineno"> 211 </span>-- <<docs/gifs/doc_hsvMatlab.gif>>
|
|
<span class="lineno"> 212 </span>hsvMatlab :: Double -> PixelRGB8
|
|
<span class="lineno"> 213 </span><span class="decl"><span class="istickedoff">hsvMatlab t = PixelRGB8 (round $ r*255) (round $ g*255) (round $ b*255)</span>
|
|
<span class="lineno"> 214 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 215 </span><span class="spaces"> </span><span class="istickedoff">RGB r g b = HSV.hsv (t * 330) 1 1</span></span>
|
|
<span class="lineno"> 216 </span>
|
|
<span class="lineno"> 217 </span>-- | Greyscale colormap.
|
|
<span class="lineno"> 218 </span>--
|
|
<span class="lineno"> 219 </span>-- <<docs/gifs/doc_greyscale.gif>>
|
|
<span class="lineno"> 220 </span>greyscale :: Double -> PixelRGB8
|
|
<span class="lineno"> 221 </span><span class="decl"><span class="istickedoff">greyscale t = PixelRGB8 v v v</span>
|
|
<span class="lineno"> 222 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 223 </span><span class="spaces"> </span><span class="istickedoff">v = round $ t * 255</span></span>
|
|
<span class="lineno"> 224 </span>
|
|
<span class="lineno"> 225 </span>-- | Parula is the default colormap for matlab.
|
|
<span class="lineno"> 226 </span>--
|
|
<span class="lineno"> 227 </span>-- <<docs/gifs/doc_parula.gif>>
|
|
<span class="lineno"> 228 </span>parula :: Double -> PixelRGB8
|
|
<span class="lineno"> 229 </span><span class="decl"><span class="istickedoff">parula = ramp vec</span>
|
|
<span class="lineno"> 230 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 231 </span><span class="spaces"> </span><span class="istickedoff">vec = V.fromList $ pixels colorList</span>
|
|
<span class="lineno"> 232 </span><span class="spaces"> </span><span class="istickedoff">pixels [] = []</span>
|
|
<span class="lineno"> 233 </span><span class="spaces"> </span><span class="istickedoff">pixels (r:g:b:xs) =</span>
|
|
<span class="lineno"> 234 </span><span class="spaces"> </span><span class="istickedoff">PixelRGB8 (round $ r*255) (round $ g*255) (round $ b*255) :</span>
|
|
<span class="lineno"> 235 </span><span class="spaces"> </span><span class="istickedoff">pixels xs</span>
|
|
<span class="lineno"> 236 </span><span class="spaces"> </span><span class="istickedoff">pixels _ = <span class="nottickedoff">error "Reanimate.ColorMap.parula: Broken data"</span></span>
|
|
<span class="lineno"> 237 </span><span class="spaces"> </span><span class="istickedoff">colorList :: [Double]</span>
|
|
<span class="lineno"> 238 </span><span class="spaces"> </span><span class="istickedoff">colorList =</span>
|
|
<span class="lineno"> 239 </span><span class="spaces"> </span><span class="istickedoff">[0.2081, 0.1663, 0.5292</span>
|
|
<span class="lineno"> 240 </span><span class="spaces"> </span><span class="istickedoff">,0.2091, 0.1721, 0.5411</span>
|
|
<span class="lineno"> 241 </span><span class="spaces"> </span><span class="istickedoff">,0.2101, 0.1779, 0.5530</span>
|
|
<span class="lineno"> 242 </span><span class="spaces"> </span><span class="istickedoff">,0.2109, 0.1837, 0.5650</span>
|
|
<span class="lineno"> 243 </span><span class="spaces"> </span><span class="istickedoff">,0.2116, 0.1895, 0.5771</span>
|
|
<span class="lineno"> 244 </span><span class="spaces"> </span><span class="istickedoff">,0.2121, 0.1954, 0.5892</span>
|
|
<span class="lineno"> 245 </span><span class="spaces"> </span><span class="istickedoff">,0.2124, 0.2013, 0.6013</span>
|
|
<span class="lineno"> 246 </span><span class="spaces"> </span><span class="istickedoff">,0.2125, 0.2072, 0.6135</span>
|
|
<span class="lineno"> 247 </span><span class="spaces"> </span><span class="istickedoff">,0.2123, 0.2132, 0.6258</span>
|
|
<span class="lineno"> 248 </span><span class="spaces"> </span><span class="istickedoff">,0.2118, 0.2192, 0.6381</span>
|
|
<span class="lineno"> 249 </span><span class="spaces"> </span><span class="istickedoff">,0.2111, 0.2253, 0.6505</span>
|
|
<span class="lineno"> 250 </span><span class="spaces"> </span><span class="istickedoff">,0.2099, 0.2315, 0.6629</span>
|
|
<span class="lineno"> 251 </span><span class="spaces"> </span><span class="istickedoff">,0.2084, 0.2377, 0.6753</span>
|
|
<span class="lineno"> 252 </span><span class="spaces"> </span><span class="istickedoff">,0.2063, 0.2440, 0.6878</span>
|
|
<span class="lineno"> 253 </span><span class="spaces"> </span><span class="istickedoff">,0.2038, 0.2503, 0.7003</span>
|
|
<span class="lineno"> 254 </span><span class="spaces"> </span><span class="istickedoff">,0.2006, 0.2568, 0.7129</span>
|
|
<span class="lineno"> 255 </span><span class="spaces"> </span><span class="istickedoff">,0.1968, 0.2632, 0.7255</span>
|
|
<span class="lineno"> 256 </span><span class="spaces"> </span><span class="istickedoff">,0.1921, 0.2698, 0.7381</span>
|
|
<span class="lineno"> 257 </span><span class="spaces"> </span><span class="istickedoff">,0.1867, 0.2764, 0.7507</span>
|
|
<span class="lineno"> 258 </span><span class="spaces"> </span><span class="istickedoff">,0.1802, 0.2832, 0.7634</span>
|
|
<span class="lineno"> 259 </span><span class="spaces"> </span><span class="istickedoff">,0.1728, 0.2902, 0.7762</span>
|
|
<span class="lineno"> 260 </span><span class="spaces"> </span><span class="istickedoff">,0.1641, 0.2975, 0.7890</span>
|
|
<span class="lineno"> 261 </span><span class="spaces"> </span><span class="istickedoff">,0.1541, 0.3052, 0.8017</span>
|
|
<span class="lineno"> 262 </span><span class="spaces"> </span><span class="istickedoff">,0.1427, 0.3132, 0.8145</span>
|
|
<span class="lineno"> 263 </span><span class="spaces"> </span><span class="istickedoff">,0.1295, 0.3217, 0.8269</span>
|
|
<span class="lineno"> 264 </span><span class="spaces"> </span><span class="istickedoff">,0.1147, 0.3306, 0.8387</span>
|
|
<span class="lineno"> 265 </span><span class="spaces"> </span><span class="istickedoff">,0.0986, 0.3397, 0.8495</span>
|
|
<span class="lineno"> 266 </span><span class="spaces"> </span><span class="istickedoff">,0.0816, 0.3486, 0.8588</span>
|
|
<span class="lineno"> 267 </span><span class="spaces"> </span><span class="istickedoff">,0.0646, 0.3572, 0.8664</span>
|
|
<span class="lineno"> 268 </span><span class="spaces"> </span><span class="istickedoff">,0.0482, 0.3651, 0.8722</span>
|
|
<span class="lineno"> 269 </span><span class="spaces"> </span><span class="istickedoff">,0.0329, 0.3724, 0.8765</span>
|
|
<span class="lineno"> 270 </span><span class="spaces"> </span><span class="istickedoff">,0.0213, 0.3792, 0.8796</span>
|
|
<span class="lineno"> 271 </span><span class="spaces"> </span><span class="istickedoff">,0.0136, 0.3853, 0.8815</span>
|
|
<span class="lineno"> 272 </span><span class="spaces"> </span><span class="istickedoff">,0.0086, 0.3911, 0.8827</span>
|
|
<span class="lineno"> 273 </span><span class="spaces"> </span><span class="istickedoff">,0.0060, 0.3965, 0.8833</span>
|
|
<span class="lineno"> 274 </span><span class="spaces"> </span><span class="istickedoff">,0.0051, 0.4017, 0.8834</span>
|
|
<span class="lineno"> 275 </span><span class="spaces"> </span><span class="istickedoff">,0.0054, 0.4066, 0.8831</span>
|
|
<span class="lineno"> 276 </span><span class="spaces"> </span><span class="istickedoff">,0.0067, 0.4113, 0.8825</span>
|
|
<span class="lineno"> 277 </span><span class="spaces"> </span><span class="istickedoff">,0.0089, 0.4159, 0.8816</span>
|
|
<span class="lineno"> 278 </span><span class="spaces"> </span><span class="istickedoff">,0.0116, 0.4203, 0.8805</span>
|
|
<span class="lineno"> 279 </span><span class="spaces"> </span><span class="istickedoff">,0.0148, 0.4246, 0.8793</span>
|
|
<span class="lineno"> 280 </span><span class="spaces"> </span><span class="istickedoff">,0.0184, 0.4288, 0.8779</span>
|
|
<span class="lineno"> 281 </span><span class="spaces"> </span><span class="istickedoff">,0.0223, 0.4329, 0.8763</span>
|
|
<span class="lineno"> 282 </span><span class="spaces"> </span><span class="istickedoff">,0.0264, 0.4370, 0.8747</span>
|
|
<span class="lineno"> 283 </span><span class="spaces"> </span><span class="istickedoff">,0.0306, 0.4410, 0.8729</span>
|
|
<span class="lineno"> 284 </span><span class="spaces"> </span><span class="istickedoff">,0.0349, 0.4449, 0.8711</span>
|
|
<span class="lineno"> 285 </span><span class="spaces"> </span><span class="istickedoff">,0.0394, 0.4488, 0.8692</span>
|
|
<span class="lineno"> 286 </span><span class="spaces"> </span><span class="istickedoff">,0.0437, 0.4526, 0.8672</span>
|
|
<span class="lineno"> 287 </span><span class="spaces"> </span><span class="istickedoff">,0.0477, 0.4564, 0.8652</span>
|
|
<span class="lineno"> 288 </span><span class="spaces"> </span><span class="istickedoff">,0.0514, 0.4602, 0.8632</span>
|
|
<span class="lineno"> 289 </span><span class="spaces"> </span><span class="istickedoff">,0.0549, 0.4640, 0.8611</span>
|
|
<span class="lineno"> 290 </span><span class="spaces"> </span><span class="istickedoff">,0.0582, 0.4677, 0.8589</span>
|
|
<span class="lineno"> 291 </span><span class="spaces"> </span><span class="istickedoff">,0.0612, 0.4714, 0.8568</span>
|
|
<span class="lineno"> 292 </span><span class="spaces"> </span><span class="istickedoff">,0.0640, 0.4751, 0.8546</span>
|
|
<span class="lineno"> 293 </span><span class="spaces"> </span><span class="istickedoff">,0.0666, 0.4788, 0.8525</span>
|
|
<span class="lineno"> 294 </span><span class="spaces"> </span><span class="istickedoff">,0.0689, 0.4825, 0.8503</span>
|
|
<span class="lineno"> 295 </span><span class="spaces"> </span><span class="istickedoff">,0.0710, 0.4862, 0.8481</span>
|
|
<span class="lineno"> 296 </span><span class="spaces"> </span><span class="istickedoff">,0.0729, 0.4899, 0.8460</span>
|
|
<span class="lineno"> 297 </span><span class="spaces"> </span><span class="istickedoff">,0.0746, 0.4937, 0.8439</span>
|
|
<span class="lineno"> 298 </span><span class="spaces"> </span><span class="istickedoff">,0.0761, 0.4974, 0.8418</span>
|
|
<span class="lineno"> 299 </span><span class="spaces"> </span><span class="istickedoff">,0.0773, 0.5012, 0.8398</span>
|
|
<span class="lineno"> 300 </span><span class="spaces"> </span><span class="istickedoff">,0.0782, 0.5051, 0.8378</span>
|
|
<span class="lineno"> 301 </span><span class="spaces"> </span><span class="istickedoff">,0.0789, 0.5089, 0.8359</span>
|
|
<span class="lineno"> 302 </span><span class="spaces"> </span><span class="istickedoff">,0.0794, 0.5129, 0.8341</span>
|
|
<span class="lineno"> 303 </span><span class="spaces"> </span><span class="istickedoff">,0.0795, 0.5169, 0.8324</span>
|
|
<span class="lineno"> 304 </span><span class="spaces"> </span><span class="istickedoff">,0.0793, 0.5210, 0.8308</span>
|
|
<span class="lineno"> 305 </span><span class="spaces"> </span><span class="istickedoff">,0.0788, 0.5251, 0.8293</span>
|
|
<span class="lineno"> 306 </span><span class="spaces"> </span><span class="istickedoff">,0.0778, 0.5295, 0.8280</span>
|
|
<span class="lineno"> 307 </span><span class="spaces"> </span><span class="istickedoff">,0.0764, 0.5339, 0.8270</span>
|
|
<span class="lineno"> 308 </span><span class="spaces"> </span><span class="istickedoff">,0.0746, 0.5384, 0.8261</span>
|
|
<span class="lineno"> 309 </span><span class="spaces"> </span><span class="istickedoff">,0.0724, 0.5431, 0.8253</span>
|
|
<span class="lineno"> 310 </span><span class="spaces"> </span><span class="istickedoff">,0.0698, 0.5479, 0.8247</span>
|
|
<span class="lineno"> 311 </span><span class="spaces"> </span><span class="istickedoff">,0.0668, 0.5527, 0.8243</span>
|
|
<span class="lineno"> 312 </span><span class="spaces"> </span><span class="istickedoff">,0.0636, 0.5577, 0.8239</span>
|
|
<span class="lineno"> 313 </span><span class="spaces"> </span><span class="istickedoff">,0.0600, 0.5627, 0.8237</span>
|
|
<span class="lineno"> 314 </span><span class="spaces"> </span><span class="istickedoff">,0.0562, 0.5677, 0.8234</span>
|
|
<span class="lineno"> 315 </span><span class="spaces"> </span><span class="istickedoff">,0.0523, 0.5727, 0.8231</span>
|
|
<span class="lineno"> 316 </span><span class="spaces"> </span><span class="istickedoff">,0.0484, 0.5777, 0.8228</span>
|
|
<span class="lineno"> 317 </span><span class="spaces"> </span><span class="istickedoff">,0.0445, 0.5826, 0.8223</span>
|
|
<span class="lineno"> 318 </span><span class="spaces"> </span><span class="istickedoff">,0.0408, 0.5874, 0.8217</span>
|
|
<span class="lineno"> 319 </span><span class="spaces"> </span><span class="istickedoff">,0.0372, 0.5922, 0.8209</span>
|
|
<span class="lineno"> 320 </span><span class="spaces"> </span><span class="istickedoff">,0.0342, 0.5968, 0.8198</span>
|
|
<span class="lineno"> 321 </span><span class="spaces"> </span><span class="istickedoff">,0.0317, 0.6012, 0.8186</span>
|
|
<span class="lineno"> 322 </span><span class="spaces"> </span><span class="istickedoff">,0.0296, 0.6055, 0.8171</span>
|
|
<span class="lineno"> 323 </span><span class="spaces"> </span><span class="istickedoff">,0.0279, 0.6097, 0.8154</span>
|
|
<span class="lineno"> 324 </span><span class="spaces"> </span><span class="istickedoff">,0.0265, 0.6137, 0.8135</span>
|
|
<span class="lineno"> 325 </span><span class="spaces"> </span><span class="istickedoff">,0.0255, 0.6176, 0.8114</span>
|
|
<span class="lineno"> 326 </span><span class="spaces"> </span><span class="istickedoff">,0.0248, 0.6214, 0.8091</span>
|
|
<span class="lineno"> 327 </span><span class="spaces"> </span><span class="istickedoff">,0.0243, 0.6250, 0.8066</span>
|
|
<span class="lineno"> 328 </span><span class="spaces"> </span><span class="istickedoff">,0.0239, 0.6285, 0.8039</span>
|
|
<span class="lineno"> 329 </span><span class="spaces"> </span><span class="istickedoff">,0.0237, 0.6319, 0.8010</span>
|
|
<span class="lineno"> 330 </span><span class="spaces"> </span><span class="istickedoff">,0.0235, 0.6352, 0.7980</span>
|
|
<span class="lineno"> 331 </span><span class="spaces"> </span><span class="istickedoff">,0.0233, 0.6384, 0.7948</span>
|
|
<span class="lineno"> 332 </span><span class="spaces"> </span><span class="istickedoff">,0.0231, 0.6415, 0.7916</span>
|
|
<span class="lineno"> 333 </span><span class="spaces"> </span><span class="istickedoff">,0.0230, 0.6445, 0.7881</span>
|
|
<span class="lineno"> 334 </span><span class="spaces"> </span><span class="istickedoff">,0.0229, 0.6474, 0.7846</span>
|
|
<span class="lineno"> 335 </span><span class="spaces"> </span><span class="istickedoff">,0.0227, 0.6503, 0.7810</span>
|
|
<span class="lineno"> 336 </span><span class="spaces"> </span><span class="istickedoff">,0.0227, 0.6531, 0.7773</span>
|
|
<span class="lineno"> 337 </span><span class="spaces"> </span><span class="istickedoff">,0.0232, 0.6558, 0.7735</span>
|
|
<span class="lineno"> 338 </span><span class="spaces"> </span><span class="istickedoff">,0.0238, 0.6585, 0.7696</span>
|
|
<span class="lineno"> 339 </span><span class="spaces"> </span><span class="istickedoff">,0.0246, 0.6611, 0.7656</span>
|
|
<span class="lineno"> 340 </span><span class="spaces"> </span><span class="istickedoff">,0.0263, 0.6637, 0.7615</span>
|
|
<span class="lineno"> 341 </span><span class="spaces"> </span><span class="istickedoff">,0.0282, 0.6663, 0.7574</span>
|
|
<span class="lineno"> 342 </span><span class="spaces"> </span><span class="istickedoff">,0.0306, 0.6688, 0.7532</span>
|
|
<span class="lineno"> 343 </span><span class="spaces"> </span><span class="istickedoff">,0.0338, 0.6712, 0.7490</span>
|
|
<span class="lineno"> 344 </span><span class="spaces"> </span><span class="istickedoff">,0.0373, 0.6737, 0.7446</span>
|
|
<span class="lineno"> 345 </span><span class="spaces"> </span><span class="istickedoff">,0.0418, 0.6761, 0.7402</span>
|
|
<span class="lineno"> 346 </span><span class="spaces"> </span><span class="istickedoff">,0.0467, 0.6784, 0.7358</span>
|
|
<span class="lineno"> 347 </span><span class="spaces"> </span><span class="istickedoff">,0.0516, 0.6808, 0.7313</span>
|
|
<span class="lineno"> 348 </span><span class="spaces"> </span><span class="istickedoff">,0.0574, 0.6831, 0.7267</span>
|
|
<span class="lineno"> 349 </span><span class="spaces"> </span><span class="istickedoff">,0.0629, 0.6854, 0.7221</span>
|
|
<span class="lineno"> 350 </span><span class="spaces"> </span><span class="istickedoff">,0.0692, 0.6877, 0.7173</span>
|
|
<span class="lineno"> 351 </span><span class="spaces"> </span><span class="istickedoff">,0.0755, 0.6899, 0.7126</span>
|
|
<span class="lineno"> 352 </span><span class="spaces"> </span><span class="istickedoff">,0.0820, 0.6921, 0.7078</span>
|
|
<span class="lineno"> 353 </span><span class="spaces"> </span><span class="istickedoff">,0.0889, 0.6943, 0.7029</span>
|
|
<span class="lineno"> 354 </span><span class="spaces"> </span><span class="istickedoff">,0.0956, 0.6965, 0.6979</span>
|
|
<span class="lineno"> 355 </span><span class="spaces"> </span><span class="istickedoff">,0.1031, 0.6986, 0.6929</span>
|
|
<span class="lineno"> 356 </span><span class="spaces"> </span><span class="istickedoff">,0.1104, 0.7007, 0.6878</span>
|
|
<span class="lineno"> 357 </span><span class="spaces"> </span><span class="istickedoff">,0.1180, 0.7028, 0.6827</span>
|
|
<span class="lineno"> 358 </span><span class="spaces"> </span><span class="istickedoff">,0.1258, 0.7049, 0.6775</span>
|
|
<span class="lineno"> 359 </span><span class="spaces"> </span><span class="istickedoff">,0.1335, 0.7069, 0.6723</span>
|
|
<span class="lineno"> 360 </span><span class="spaces"> </span><span class="istickedoff">,0.1418, 0.7089, 0.6669</span>
|
|
<span class="lineno"> 361 </span><span class="spaces"> </span><span class="istickedoff">,0.1499, 0.7109, 0.6616</span>
|
|
<span class="lineno"> 362 </span><span class="spaces"> </span><span class="istickedoff">,0.1585, 0.7129, 0.6561</span>
|
|
<span class="lineno"> 363 </span><span class="spaces"> </span><span class="istickedoff">,0.1671, 0.7148, 0.6507</span>
|
|
<span class="lineno"> 364 </span><span class="spaces"> </span><span class="istickedoff">,0.1758, 0.7168, 0.6451</span>
|
|
<span class="lineno"> 365 </span><span class="spaces"> </span><span class="istickedoff">,0.1849, 0.7186, 0.6395</span>
|
|
<span class="lineno"> 366 </span><span class="spaces"> </span><span class="istickedoff">,0.1938, 0.7205, 0.6338</span>
|
|
<span class="lineno"> 367 </span><span class="spaces"> </span><span class="istickedoff">,0.2033, 0.7223, 0.6281</span>
|
|
<span class="lineno"> 368 </span><span class="spaces"> </span><span class="istickedoff">,0.2128, 0.7241, 0.6223</span>
|
|
<span class="lineno"> 369 </span><span class="spaces"> </span><span class="istickedoff">,0.2224, 0.7259, 0.6165</span>
|
|
<span class="lineno"> 370 </span><span class="spaces"> </span><span class="istickedoff">,0.2324, 0.7275, 0.6107</span>
|
|
<span class="lineno"> 371 </span><span class="spaces"> </span><span class="istickedoff">,0.2423, 0.7292, 0.6048</span>
|
|
<span class="lineno"> 372 </span><span class="spaces"> </span><span class="istickedoff">,0.2527, 0.7308, 0.5988</span>
|
|
<span class="lineno"> 373 </span><span class="spaces"> </span><span class="istickedoff">,0.2631, 0.7324, 0.5929</span>
|
|
<span class="lineno"> 374 </span><span class="spaces"> </span><span class="istickedoff">,0.2735, 0.7339, 0.5869</span>
|
|
<span class="lineno"> 375 </span><span class="spaces"> </span><span class="istickedoff">,0.2845, 0.7354, 0.5809</span>
|
|
<span class="lineno"> 376 </span><span class="spaces"> </span><span class="istickedoff">,0.2953, 0.7368, 0.5749</span>
|
|
<span class="lineno"> 377 </span><span class="spaces"> </span><span class="istickedoff">,0.3064, 0.7381, 0.5689</span>
|
|
<span class="lineno"> 378 </span><span class="spaces"> </span><span class="istickedoff">,0.3177, 0.7394, 0.5630</span>
|
|
<span class="lineno"> 379 </span><span class="spaces"> </span><span class="istickedoff">,0.3289, 0.7406, 0.5570</span>
|
|
<span class="lineno"> 380 </span><span class="spaces"> </span><span class="istickedoff">,0.3405, 0.7417, 0.5512</span>
|
|
<span class="lineno"> 381 </span><span class="spaces"> </span><span class="istickedoff">,0.3520, 0.7428, 0.5453</span>
|
|
<span class="lineno"> 382 </span><span class="spaces"> </span><span class="istickedoff">,0.3635, 0.7438, 0.5396</span>
|
|
<span class="lineno"> 383 </span><span class="spaces"> </span><span class="istickedoff">,0.3753, 0.7446, 0.5339</span>
|
|
<span class="lineno"> 384 </span><span class="spaces"> </span><span class="istickedoff">,0.3869, 0.7454, 0.5283</span>
|
|
<span class="lineno"> 385 </span><span class="spaces"> </span><span class="istickedoff">,0.3986, 0.7461, 0.5229</span>
|
|
<span class="lineno"> 386 </span><span class="spaces"> </span><span class="istickedoff">,0.4103, 0.7467, 0.5175</span>
|
|
<span class="lineno"> 387 </span><span class="spaces"> </span><span class="istickedoff">,0.4218, 0.7473, 0.5123</span>
|
|
<span class="lineno"> 388 </span><span class="spaces"> </span><span class="istickedoff">,0.4334, 0.7477, 0.5072</span>
|
|
<span class="lineno"> 389 </span><span class="spaces"> </span><span class="istickedoff">,0.4447, 0.7482, 0.5021</span>
|
|
<span class="lineno"> 390 </span><span class="spaces"> </span><span class="istickedoff">,0.4561, 0.7485, 0.4972</span>
|
|
<span class="lineno"> 391 </span><span class="spaces"> </span><span class="istickedoff">,0.4672, 0.7487, 0.4924</span>
|
|
<span class="lineno"> 392 </span><span class="spaces"> </span><span class="istickedoff">,0.4783, 0.7489, 0.4877</span>
|
|
<span class="lineno"> 393 </span><span class="spaces"> </span><span class="istickedoff">,0.4892, 0.7491, 0.4831</span>
|
|
<span class="lineno"> 394 </span><span class="spaces"> </span><span class="istickedoff">,0.5000, 0.7491, 0.4786</span>
|
|
<span class="lineno"> 395 </span><span class="spaces"> </span><span class="istickedoff">,0.5106, 0.7492, 0.4741</span>
|
|
<span class="lineno"> 396 </span><span class="spaces"> </span><span class="istickedoff">,0.5212, 0.7492, 0.4698</span>
|
|
<span class="lineno"> 397 </span><span class="spaces"> </span><span class="istickedoff">,0.5315, 0.7491, 0.4655</span>
|
|
<span class="lineno"> 398 </span><span class="spaces"> </span><span class="istickedoff">,0.5418, 0.7490, 0.4613</span>
|
|
<span class="lineno"> 399 </span><span class="spaces"> </span><span class="istickedoff">,0.5519, 0.7489, 0.4571</span>
|
|
<span class="lineno"> 400 </span><span class="spaces"> </span><span class="istickedoff">,0.5619, 0.7487, 0.4531</span>
|
|
<span class="lineno"> 401 </span><span class="spaces"> </span><span class="istickedoff">,0.5718, 0.7485, 0.4490</span>
|
|
<span class="lineno"> 402 </span><span class="spaces"> </span><span class="istickedoff">,0.5816, 0.7482, 0.4451</span>
|
|
<span class="lineno"> 403 </span><span class="spaces"> </span><span class="istickedoff">,0.5913, 0.7479, 0.4412</span>
|
|
<span class="lineno"> 404 </span><span class="spaces"> </span><span class="istickedoff">,0.6009, 0.7476, 0.4374</span>
|
|
<span class="lineno"> 405 </span><span class="spaces"> </span><span class="istickedoff">,0.6103, 0.7473, 0.4335</span>
|
|
<span class="lineno"> 406 </span><span class="spaces"> </span><span class="istickedoff">,0.6197, 0.7469, 0.4298</span>
|
|
<span class="lineno"> 407 </span><span class="spaces"> </span><span class="istickedoff">,0.6290, 0.7465, 0.4261</span>
|
|
<span class="lineno"> 408 </span><span class="spaces"> </span><span class="istickedoff">,0.6382, 0.7460, 0.4224</span>
|
|
<span class="lineno"> 409 </span><span class="spaces"> </span><span class="istickedoff">,0.6473, 0.7456, 0.4188</span>
|
|
<span class="lineno"> 410 </span><span class="spaces"> </span><span class="istickedoff">,0.6564, 0.7451, 0.4152</span>
|
|
<span class="lineno"> 411 </span><span class="spaces"> </span><span class="istickedoff">,0.6653, 0.7446, 0.4116</span>
|
|
<span class="lineno"> 412 </span><span class="spaces"> </span><span class="istickedoff">,0.6742, 0.7441, 0.4081</span>
|
|
<span class="lineno"> 413 </span><span class="spaces"> </span><span class="istickedoff">,0.6830, 0.7435, 0.4046</span>
|
|
<span class="lineno"> 414 </span><span class="spaces"> </span><span class="istickedoff">,0.6918, 0.7430, 0.4011</span>
|
|
<span class="lineno"> 415 </span><span class="spaces"> </span><span class="istickedoff">,0.7004, 0.7424, 0.3976</span>
|
|
<span class="lineno"> 416 </span><span class="spaces"> </span><span class="istickedoff">,0.7091, 0.7418, 0.3942</span>
|
|
<span class="lineno"> 417 </span><span class="spaces"> </span><span class="istickedoff">,0.7176, 0.7412, 0.3908</span>
|
|
<span class="lineno"> 418 </span><span class="spaces"> </span><span class="istickedoff">,0.7261, 0.7405, 0.3874</span>
|
|
<span class="lineno"> 419 </span><span class="spaces"> </span><span class="istickedoff">,0.7346, 0.7399, 0.3840</span>
|
|
<span class="lineno"> 420 </span><span class="spaces"> </span><span class="istickedoff">,0.7430, 0.7392, 0.3806</span>
|
|
<span class="lineno"> 421 </span><span class="spaces"> </span><span class="istickedoff">,0.7513, 0.7385, 0.3773</span>
|
|
<span class="lineno"> 422 </span><span class="spaces"> </span><span class="istickedoff">,0.7596, 0.7378, 0.3739</span>
|
|
<span class="lineno"> 423 </span><span class="spaces"> </span><span class="istickedoff">,0.7679, 0.7372, 0.3706</span>
|
|
<span class="lineno"> 424 </span><span class="spaces"> </span><span class="istickedoff">,0.7761, 0.7364, 0.3673</span>
|
|
<span class="lineno"> 425 </span><span class="spaces"> </span><span class="istickedoff">,0.7843, 0.7357, 0.3639</span>
|
|
<span class="lineno"> 426 </span><span class="spaces"> </span><span class="istickedoff">,0.7924, 0.7350, 0.3606</span>
|
|
<span class="lineno"> 427 </span><span class="spaces"> </span><span class="istickedoff">,0.8005, 0.7343, 0.3573</span>
|
|
<span class="lineno"> 428 </span><span class="spaces"> </span><span class="istickedoff">,0.8085, 0.7336, 0.3539</span>
|
|
<span class="lineno"> 429 </span><span class="spaces"> </span><span class="istickedoff">,0.8166, 0.7329, 0.3506</span>
|
|
<span class="lineno"> 430 </span><span class="spaces"> </span><span class="istickedoff">,0.8246, 0.7322, 0.3472</span>
|
|
<span class="lineno"> 431 </span><span class="spaces"> </span><span class="istickedoff">,0.8325, 0.7315, 0.3438</span>
|
|
<span class="lineno"> 432 </span><span class="spaces"> </span><span class="istickedoff">,0.8405, 0.7308, 0.3404</span>
|
|
<span class="lineno"> 433 </span><span class="spaces"> </span><span class="istickedoff">,0.8484, 0.7301, 0.3370</span>
|
|
<span class="lineno"> 434 </span><span class="spaces"> </span><span class="istickedoff">,0.8563, 0.7294, 0.3336</span>
|
|
<span class="lineno"> 435 </span><span class="spaces"> </span><span class="istickedoff">,0.8642, 0.7288, 0.3300</span>
|
|
<span class="lineno"> 436 </span><span class="spaces"> </span><span class="istickedoff">,0.8720, 0.7282, 0.3265</span>
|
|
<span class="lineno"> 437 </span><span class="spaces"> </span><span class="istickedoff">,0.8798, 0.7276, 0.3229</span>
|
|
<span class="lineno"> 438 </span><span class="spaces"> </span><span class="istickedoff">,0.8877, 0.7271, 0.3193</span>
|
|
<span class="lineno"> 439 </span><span class="spaces"> </span><span class="istickedoff">,0.8954, 0.7266, 0.3156</span>
|
|
<span class="lineno"> 440 </span><span class="spaces"> </span><span class="istickedoff">,0.9032, 0.7262, 0.3117</span>
|
|
<span class="lineno"> 441 </span><span class="spaces"> </span><span class="istickedoff">,0.9110, 0.7259, 0.3078</span>
|
|
<span class="lineno"> 442 </span><span class="spaces"> </span><span class="istickedoff">,0.9187, 0.7256, 0.3038</span>
|
|
<span class="lineno"> 443 </span><span class="spaces"> </span><span class="istickedoff">,0.9264, 0.7256, 0.2996</span>
|
|
<span class="lineno"> 444 </span><span class="spaces"> </span><span class="istickedoff">,0.9341, 0.7256, 0.2953</span>
|
|
<span class="lineno"> 445 </span><span class="spaces"> </span><span class="istickedoff">,0.9417, 0.7259, 0.2907</span>
|
|
<span class="lineno"> 446 </span><span class="spaces"> </span><span class="istickedoff">,0.9493, 0.7264, 0.2859</span>
|
|
<span class="lineno"> 447 </span><span class="spaces"> </span><span class="istickedoff">,0.9567, 0.7273, 0.2808</span>
|
|
<span class="lineno"> 448 </span><span class="spaces"> </span><span class="istickedoff">,0.9639, 0.7285, 0.2754</span>
|
|
<span class="lineno"> 449 </span><span class="spaces"> </span><span class="istickedoff">,0.9708, 0.7303, 0.2696</span>
|
|
<span class="lineno"> 450 </span><span class="spaces"> </span><span class="istickedoff">,0.9773, 0.7326, 0.2634</span>
|
|
<span class="lineno"> 451 </span><span class="spaces"> </span><span class="istickedoff">,0.9831, 0.7355, 0.2570</span>
|
|
<span class="lineno"> 452 </span><span class="spaces"> </span><span class="istickedoff">,0.9882, 0.7390, 0.2504</span>
|
|
<span class="lineno"> 453 </span><span class="spaces"> </span><span class="istickedoff">,0.9922, 0.7431, 0.2437</span>
|
|
<span class="lineno"> 454 </span><span class="spaces"> </span><span class="istickedoff">,0.9952, 0.7476, 0.2373</span>
|
|
<span class="lineno"> 455 </span><span class="spaces"> </span><span class="istickedoff">,0.9973, 0.7524, 0.2310</span>
|
|
<span class="lineno"> 456 </span><span class="spaces"> </span><span class="istickedoff">,0.9986, 0.7573, 0.2251</span>
|
|
<span class="lineno"> 457 </span><span class="spaces"> </span><span class="istickedoff">,0.9991, 0.7624, 0.2195</span>
|
|
<span class="lineno"> 458 </span><span class="spaces"> </span><span class="istickedoff">,0.9990, 0.7675, 0.2141</span>
|
|
<span class="lineno"> 459 </span><span class="spaces"> </span><span class="istickedoff">,0.9985, 0.7726, 0.2090</span>
|
|
<span class="lineno"> 460 </span><span class="spaces"> </span><span class="istickedoff">,0.9976, 0.7778, 0.2042</span>
|
|
<span class="lineno"> 461 </span><span class="spaces"> </span><span class="istickedoff">,0.9964, 0.7829, 0.1995</span>
|
|
<span class="lineno"> 462 </span><span class="spaces"> </span><span class="istickedoff">,0.9950, 0.7880, 0.1949</span>
|
|
<span class="lineno"> 463 </span><span class="spaces"> </span><span class="istickedoff">,0.9933, 0.7931, 0.1905</span>
|
|
<span class="lineno"> 464 </span><span class="spaces"> </span><span class="istickedoff">,0.9914, 0.7981, 0.1863</span>
|
|
<span class="lineno"> 465 </span><span class="spaces"> </span><span class="istickedoff">,0.9894, 0.8032, 0.1821</span>
|
|
<span class="lineno"> 466 </span><span class="spaces"> </span><span class="istickedoff">,0.9873, 0.8083, 0.1780</span>
|
|
<span class="lineno"> 467 </span><span class="spaces"> </span><span class="istickedoff">,0.9851, 0.8133, 0.1740</span>
|
|
<span class="lineno"> 468 </span><span class="spaces"> </span><span class="istickedoff">,0.9828, 0.8184, 0.1700</span>
|
|
<span class="lineno"> 469 </span><span class="spaces"> </span><span class="istickedoff">,0.9805, 0.8235, 0.1661</span>
|
|
<span class="lineno"> 470 </span><span class="spaces"> </span><span class="istickedoff">,0.9782, 0.8286, 0.1622</span>
|
|
<span class="lineno"> 471 </span><span class="spaces"> </span><span class="istickedoff">,0.9759, 0.8337, 0.1583</span>
|
|
<span class="lineno"> 472 </span><span class="spaces"> </span><span class="istickedoff">,0.9736, 0.8389, 0.1544</span>
|
|
<span class="lineno"> 473 </span><span class="spaces"> </span><span class="istickedoff">,0.9713, 0.8441, 0.1505</span>
|
|
<span class="lineno"> 474 </span><span class="spaces"> </span><span class="istickedoff">,0.9692, 0.8494, 0.1465</span>
|
|
<span class="lineno"> 475 </span><span class="spaces"> </span><span class="istickedoff">,0.9672, 0.8548, 0.1425</span>
|
|
<span class="lineno"> 476 </span><span class="spaces"> </span><span class="istickedoff">,0.9654, 0.8603, 0.1385</span>
|
|
<span class="lineno"> 477 </span><span class="spaces"> </span><span class="istickedoff">,0.9638, 0.8659, 0.1343</span>
|
|
<span class="lineno"> 478 </span><span class="spaces"> </span><span class="istickedoff">,0.9623, 0.8716, 0.1301</span>
|
|
<span class="lineno"> 479 </span><span class="spaces"> </span><span class="istickedoff">,0.9611, 0.8774, 0.1258</span>
|
|
<span class="lineno"> 480 </span><span class="spaces"> </span><span class="istickedoff">,0.9600, 0.8834, 0.1215</span>
|
|
<span class="lineno"> 481 </span><span class="spaces"> </span><span class="istickedoff">,0.9593, 0.8895, 0.1171</span>
|
|
<span class="lineno"> 482 </span><span class="spaces"> </span><span class="istickedoff">,0.9588, 0.8958, 0.1126</span>
|
|
<span class="lineno"> 483 </span><span class="spaces"> </span><span class="istickedoff">,0.9586, 0.9022, 0.1082</span>
|
|
<span class="lineno"> 484 </span><span class="spaces"> </span><span class="istickedoff">,0.9587, 0.9088, 0.1036</span>
|
|
<span class="lineno"> 485 </span><span class="spaces"> </span><span class="istickedoff">,0.9591, 0.9155, 0.0990</span>
|
|
<span class="lineno"> 486 </span><span class="spaces"> </span><span class="istickedoff">,0.9599, 0.9225, 0.0944</span>
|
|
<span class="lineno"> 487 </span><span class="spaces"> </span><span class="istickedoff">,0.9610, 0.9296, 0.0897</span>
|
|
<span class="lineno"> 488 </span><span class="spaces"> </span><span class="istickedoff">,0.9624, 0.9368, 0.0850</span>
|
|
<span class="lineno"> 489 </span><span class="spaces"> </span><span class="istickedoff">,0.9641, 0.9443, 0.0802</span>
|
|
<span class="lineno"> 490 </span><span class="spaces"> </span><span class="istickedoff">,0.9662, 0.9518, 0.0753</span>
|
|
<span class="lineno"> 491 </span><span class="spaces"> </span><span class="istickedoff">,0.9685, 0.9595, 0.0703</span>
|
|
<span class="lineno"> 492 </span><span class="spaces"> </span><span class="istickedoff">,0.9710, 0.9673, 0.0651</span>
|
|
<span class="lineno"> 493 </span><span class="spaces"> </span><span class="istickedoff">,0.9736, 0.9752, 0.0597</span>
|
|
<span class="lineno"> 494 </span><span class="spaces"> </span><span class="istickedoff">,0.9763, 0.9831, 0.0538]</span></span>
|
|
<span class="lineno"> 495 </span>
|
|
<span class="lineno"> 496 </span>--------------------------------------------------------------------------------
|
|
<span class="lineno"> 497 </span>-- Helpers
|
|
<span class="lineno"> 498 </span>
|
|
<span class="lineno"> 499 </span>colors :: Text -> Vector PixelRGB8
|
|
<span class="lineno"> 500 </span><span class="decl"><span class="istickedoff">colors = V.fromList . map (toColor . map (fromIntegral . digitToInt) . T.unpack) . T.chunksOf 6</span>
|
|
<span class="lineno"> 501 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 502 </span><span class="spaces"> </span><span class="istickedoff">toColor [r1,r2,g1,g2,b1,b2] =</span>
|
|
<span class="lineno"> 503 </span><span class="spaces"> </span><span class="istickedoff">PixelRGB8 (r1 `shiftL` 4 + r2) (g1 `shiftL` 4 + g2) (b1 `shiftL` 4+b2)</span>
|
|
<span class="lineno"> 504 </span><span class="spaces"> </span><span class="istickedoff">toColor _ = <span class="nottickedoff">error "Reanimate.ColorMap.colors: Broken data"</span></span></span>
|
|
<span class="lineno"> 505 </span>
|
|
<span class="lineno"> 506 </span>ramp :: Vector PixelRGB8 -> Double -> PixelRGB8
|
|
<span class="lineno"> 507 </span><span class="decl"><span class="istickedoff">ramp v = \t -> v V.! max 0 (min (len-1) $ round $ t * (len'-1))</span>
|
|
<span class="lineno"> 508 </span><span class="spaces"> </span><span class="istickedoff">where</span>
|
|
<span class="lineno"> 509 </span><span class="spaces"> </span><span class="istickedoff">len = V.length v</span>
|
|
<span class="lineno"> 510 </span><span class="spaces"> </span><span class="istickedoff">len' = fromIntegral len</span></span>
|
|
|
|
</pre>
|
|
</body>
|
|
</html>
|