--zero

listAngle fm = concat . IM.elems . IM.map (getAngle fm) $ (mapCP0D fm)
listAngle fm = concat . IM.elems . IM.map (getAngle fm) $ (mapCP0D fm)
listAngle fm = concat . IM.elems . IM.map (getAngle fm) $ (mapCP0D fm)