This commit is contained in:
hasufell 2014-10-10 17:48:22 +02:00
джерело 954b104642
коміт 085b06a112
Не вдалося знайти GPG ключ що відповідає даному підпису
Ідентифікатор GPG ключа: 220CD1C5BDEED020
1 змінених файлів з 2 додано та 3 видалено

@ -12,13 +12,12 @@ import Parser.Core
-- an array of float tuples.
meshToArr :: String -- ^ the string to convert
-> [PT] -- ^ the resulting vertice table
meshToArr xs =
meshToArr =
fmap p2 .
fmap (\(Just (x, _)) -> x) .
filter (/= Nothing) .
fmap (runParser parseVertice) .
lines $
xs
lines
-- | Creates a Parser that accepts a single vertice, such as 'v 1.0 2.0'.