Как показать несколько SVG в одном div? - PullRequest
0 голосов
/ 06 марта 2019

Я новичок в Purescript, поэтому не знаю, как показать несколько SVG в одном div.Я исследовал несколько примеров кода и реализовал эту кодовую базу, но у нее есть проблемы.Что не так с этим кодом?

renderView :: State -> H.ComponentHTML Query
renderView state = let
    {vertices, edges} = state.shape
    {currentId, shapes} = state.shapeCnt
    vert2Ds = map project vertices
  in
    HH.div_
      [
        HH.div [] $
          [ renderButton "rotX++" (IncAngVelocity X)
          , renderButton "rotY++" (IncAngVelocity Y)
          , renderButton "rotZ++" (IncAngVelocity Z)
          , renderButton "Add Cube" (AddCube)
          , renderButton "Remove Cube" (RemoveCube)
          ],

        HH.div_ $ flip map shapes \sid ->
          Tuple (show sid) $
            [ SE.svg
              [ SA.viewBox 0.0 0.0 viewBoxSize viewBoxSize ]
              [ SE.g []
                (drawCube edges vert2Ds)
              ]
            ]
      ]
...