Add Read instances

2022-07-22 01:06:35 +01:00
parent d4e5b02874
commit 4c5218c633
44 changed files with 209 additions and 126 deletions
@@ -34,7 +34,7 @@ tlsTimeRadFunPos t rmax intensityF p = TLS
    , _tlsUpdate = IntensityTLS intensityF
    , _tlsTime = t
    }
-  where
+--  where
 --    upF tls 
 --        | _tlsTime tls <= 0 = Nothing
 --        | otherwise         = Just $ tls