Diagramy Haskell: Jak zwiększyć rozmiar tekstu?

Question

Używam schematu rysunkowego haskell dla . Poniższy kod służy do utworzenia pomarańczowego sześciokąta z nałożonym na niego tekstem "(0,0)". Niestety tekst jest malutki. Próbowałem zwiększyć rozmiar, modyfikując rozmiar rect, ale bez powodzenia.

import Diagrams.Prelude 
import Diagrams.Backend.SVG.CmdLine 

diagram = mconcat [ text "(0,0)" <> rect 8 1, 
        hexagon 20 # lw 0.02 # fc orange # rotateBy (1/4) ] 

main = defaultMain (pad 1.1 diagram) 

Answer 1

Jak hammar sugeruje, można użyć scale, tak:

(text "(0,0)" <> rect 8 1) # scale 5

Można również zmienić rozmiar czcionki, jak

text "(0,0)" # fontSize 5 ...