diff options
| author | Igor Pashev <pashev.igor@gmail.com> | 2017-08-03 21:26:33 +0300 |
|---|---|---|
| committer | Igor Pashev <pashev.igor@gmail.com> | 2017-08-03 21:32:06 +0300 |
| commit | b1a599a6df4100ca1da6e778d1fdade3efe01451 (patch) | |
| tree | 88e4e16c6f242cb92473d899cdfa0f10c84ddd4e /src/IRE/Application/YOLO.hs | |
| parent | 1c621db4b5b0d78ae6b2f79c71122c6cca2a0815 (diff) | |
| download | ire-master.tar.gz | |
Diffstat (limited to 'src/IRE/Application/YOLO.hs')
| -rw-r--r-- | src/IRE/Application/YOLO.hs | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/src/IRE/Application/YOLO.hs b/src/IRE/Application/YOLO.hs index 1d6ab37..6edace3 100644 --- a/src/IRE/Application/YOLO.hs +++ b/src/IRE/Application/YOLO.hs @@ -1,16 +1,14 @@ -module IRE.Application.YOLO ( - findItems -) where +module IRE.Application.YOLO + ( findItems + ) where import qualified Data.ByteString.Lazy as LBS -import IRE.YOLO (Detector, Item, detect) import qualified IRE.Logging as Log - +import IRE.YOLO (Detector, Item, detect) findItems :: Detector -> LBS.ByteString -> IO [Item] findItems d fc = do r <- detect d 0.3 0.3 (LBS.toStrict fc) Log.debug $ show r return r - |