pp :: NodeMap VSL.TVSL -> String
pp m = intercalate ",\n" $ map show $ IM.toList m
pp :: NodeMap VSL.TVSL -> String
pp m = intercalate ",\n" $ map show $ IM.toList m
pp m = intercalate ",\n" $ map show $ IM.toList m