module Wumpus.Basic.SafeFonts
(
timesRoman
, timesItalic
, timesBold
, timesBoldItalic
, helvetica
, helveticaOblique
, helveticaBold
, helveticaBoldOblique
, courier
, courierOblique
, courierBold
, courierBoldOblique
, symbol
) where
import Wumpus.Core
timesRoman :: FontFace
timesRoman = FontFace "Times-Roman" "Times New Roman" SVG_REGULAR
timesItalic :: FontFace
timesItalic = FontFace "Times-Italic" "Times New Roman" SVG_ITALIC
timesBold :: FontFace
timesBold = FontFace "Times-Bold" "Times New Roman" SVG_BOLD
timesBoldItalic :: FontFace
timesBoldItalic =
FontFace "Times-BoldItalic" "Times New Roman" SVG_BOLD_ITALIC
helvetica :: FontFace
helvetica = FontFace "Helvetica" "Helvetica" SVG_REGULAR
helveticaOblique :: FontFace
helveticaOblique = FontFace "Helvetica-Oblique" "Helvetica" SVG_OBLIQUE
helveticaBold :: FontFace
helveticaBold = FontFace "Helvetica-Bold" "Helvetica" SVG_BOLD
helveticaBoldOblique :: FontFace
helveticaBoldOblique =
FontFace "Helvetica-Bold-Oblique" "Helvetica" SVG_BOLD_OBLIQUE
courier :: FontFace
courier = FontFace "Courier" "Courier New" SVG_REGULAR
courierOblique :: FontFace
courierOblique = FontFace "Courier-Oblique" "Courier New" SVG_OBLIQUE
courierBold :: FontFace
courierBold = FontFace "Courier-Bold" "Courier New" SVG_BOLD
courierBoldOblique :: FontFace
courierBoldOblique =
FontFace "Courier-Bold-Oblique" "Courier New" SVG_BOLD_OBLIQUE
symbol :: FontFace
symbol = FontFace "Symbol" "Symbol" SVG_REGULAR