diff --git a/scripts/parallel-metadata.hs b/scripts/parallel-metadata.hs deleted file mode 100644 index eb647e6256206f4c9d53711a4e38629774d72f77..0000000000000000000000000000000000000000 --- a/scripts/parallel-metadata.hs +++ /dev/null @@ -1,15 +0,0 @@ -type Link = (String, String, Int, Int, Int, Int) ---(headWord, uid, tomeEDdA, rankEDda, tomeLGE, rankLGE) -type Source_Meta = (Int, Int, String, Authors, Domains, Domains) ---(T,article,head,author,ARTFL_domain,ENCCRE_domain) - -join :: - -lgeMeta :: -> Article -lgeMeta (headWord, uid, tomeEDdA, rankEDda, tomeLGE, rankLGE) - -Right edda <- (decode HasHeader <$> B.readFile "../EDdA/metadata.csv" :: IO (Either String (Data.Vector.Vector (String, String, Int, Int, Int, Int)))) -Right edda <- (decode HasHeader <$> B.readFile "../EDdA/metadata.csv" :: IO (Either String (Data.Vector.Vector (String, String, Int, Int, Int, Int)))) - -main :: IO () -main =