Я новичок в 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)
]
]
]