Diagrammi di Haskell: come posso ingrandire il testo?

Question

Utilizzo gli schemi framework di disegno haskell. Il seguente codice è destinato a produrre un esagono arancione con il testo "(0,0)" sovrapposto su di esso. Sfortunatamente, il testo è minuscolo. Ho cercato di ingrandirlo modificando le dimensioni dello rect, ma senza fortuna.

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

Come suggerisce Hammar, si potrebbe usare scale, in questo modo:

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

È inoltre possibile modificare la dimensione del carattere, come

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