module Wumpus.Extra.SafeFonts
(
timesRoman10
, timesRoman12
, timesRoman18
, timesRoman24
, timesRoman36
, timesRoman48
, timesItalic10
, timesItalic12
, timesItalic18
, timesItalic24
, timesItalic36
, timesItalic48
, timesBold10
, timesBold12
, timesBold18
, timesBold24
, timesBold36
, timesBold48
, timesBoldItalic10
, timesBoldItalic12
, timesBoldItalic18
, timesBoldItalic24
, timesBoldItalic36
, timesBoldItalic48
, helvetica10
, helvetica12
, helvetica18
, helvetica24
, helvetica36
, helvetica48
, helveticaOblique10
, helveticaOblique12
, helveticaOblique18
, helveticaOblique24
, helveticaOblique36
, helveticaOblique48
, helveticaBold10
, helveticaBold12
, helveticaBold18
, helveticaBold24
, helveticaBold36
, helveticaBold48
, helveticaBoldOblique10
, helveticaBoldOblique12
, helveticaBoldOblique18
, helveticaBoldOblique24
, helveticaBoldOblique36
, helveticaBoldOblique48
, courier10
, courier12
, courier18
, courier24
, courier36
, courier48
, courierOblique10
, courierOblique12
, courierOblique18
, courierOblique24
, courierOblique36
, courierOblique48
, courierBold10
, courierBold12
, courierBold18
, courierBold24
, courierBold36
, courierBold48
, courierBoldOblique10
, courierBoldOblique12
, courierBoldOblique18
, courierBoldOblique24
, courierBoldOblique36
, courierBoldOblique48
, symbol10
, symbol12
, symbol18
, symbol24
, symbol36
, symbol48
) where
import Wumpus.Core
mkTimesRoman :: Int -> FontAttr
mkTimesRoman = FontAttr "Times-Roman" "Times New Roman" SVG_REGULAR
timesRoman10 :: FontAttr
timesRoman10 = mkTimesRoman 10
timesRoman12 :: FontAttr
timesRoman12 = mkTimesRoman 12
timesRoman18 :: FontAttr
timesRoman18 = mkTimesRoman 18
timesRoman24 :: FontAttr
timesRoman24 = mkTimesRoman 24
timesRoman36 :: FontAttr
timesRoman36 = mkTimesRoman 36
timesRoman48 :: FontAttr
timesRoman48 = mkTimesRoman 48
mkTimesItalic :: Int -> FontAttr
mkTimesItalic = FontAttr "Times-Italic" "Times New Roman" SVG_ITALIC
timesItalic10 :: FontAttr
timesItalic10 = mkTimesItalic 10
timesItalic12 :: FontAttr
timesItalic12 = mkTimesItalic 12
timesItalic18 :: FontAttr
timesItalic18 = mkTimesItalic 18
timesItalic24 :: FontAttr
timesItalic24 = mkTimesItalic 24
timesItalic36 :: FontAttr
timesItalic36 = mkTimesItalic 36
timesItalic48 :: FontAttr
timesItalic48 = mkTimesItalic 48
mkTimesBold :: Int -> FontAttr
mkTimesBold = FontAttr "Times-Bold" "Times New Roman" SVG_BOLD
timesBold10 :: FontAttr
timesBold10 = mkTimesBold 10
timesBold12 :: FontAttr
timesBold12 = mkTimesBold 12
timesBold18 :: FontAttr
timesBold18 = mkTimesBold 18
timesBold24 :: FontAttr
timesBold24 = mkTimesBold 24
timesBold36 :: FontAttr
timesBold36 = mkTimesBold 36
timesBold48 :: FontAttr
timesBold48 = mkTimesBold 48
mkTimesBoldItalic :: Int -> FontAttr
mkTimesBoldItalic =
FontAttr "Times-BoldItalic" "Times New Roman" SVG_BOLD_ITALIC
timesBoldItalic10 :: FontAttr
timesBoldItalic10 = mkTimesBoldItalic 10
timesBoldItalic12 :: FontAttr
timesBoldItalic12 = mkTimesBoldItalic 12
timesBoldItalic18 :: FontAttr
timesBoldItalic18 = mkTimesBoldItalic 18
timesBoldItalic24 :: FontAttr
timesBoldItalic24 = mkTimesBoldItalic 24
timesBoldItalic36 :: FontAttr
timesBoldItalic36 = mkTimesBoldItalic 36
timesBoldItalic48 :: FontAttr
timesBoldItalic48 = mkTimesBoldItalic 48
mkHelvetica :: Int -> FontAttr
mkHelvetica = FontAttr "Helvetica" "Helvetica" SVG_REGULAR
helvetica10 :: FontAttr
helvetica10 = mkHelvetica 10
helvetica12 :: FontAttr
helvetica12 = mkHelvetica 12
helvetica18 :: FontAttr
helvetica18 = mkHelvetica 18
helvetica24 :: FontAttr
helvetica24 = mkHelvetica 24
helvetica36 :: FontAttr
helvetica36 = mkHelvetica 36
helvetica48 :: FontAttr
helvetica48 = mkHelvetica 48
mkHelveticaOblique :: Int -> FontAttr
mkHelveticaOblique = FontAttr "Helvetica-Oblique" "Helvetica" SVG_OBLIQUE
helveticaOblique10 :: FontAttr
helveticaOblique10 = mkHelveticaOblique 10
helveticaOblique12 :: FontAttr
helveticaOblique12 = mkHelveticaOblique 12
helveticaOblique18 :: FontAttr
helveticaOblique18 = mkHelveticaOblique 18
helveticaOblique24 :: FontAttr
helveticaOblique24 = mkHelveticaOblique 24
helveticaOblique36 :: FontAttr
helveticaOblique36 = mkHelveticaOblique 36
helveticaOblique48 :: FontAttr
helveticaOblique48 = mkHelveticaOblique 48
mkHelveticaBold :: Int -> FontAttr
mkHelveticaBold = FontAttr "Helvetica-Bold" "Helvetica" SVG_BOLD
helveticaBold10 :: FontAttr
helveticaBold10 = mkHelveticaBold 10
helveticaBold12 :: FontAttr
helveticaBold12 = mkHelveticaBold 12
helveticaBold18 :: FontAttr
helveticaBold18 = mkHelveticaBold 18
helveticaBold24 :: FontAttr
helveticaBold24 = mkHelveticaBold 24
helveticaBold36 :: FontAttr
helveticaBold36 = mkHelveticaBold 36
helveticaBold48 :: FontAttr
helveticaBold48 = mkHelveticaBold 48
mkHelveticaBoldOblique :: Int -> FontAttr
mkHelveticaBoldOblique =
FontAttr "Helvetica-Bold-Oblique" "Helvetica" SVG_BOLD_OBLIQUE
helveticaBoldOblique10 :: FontAttr
helveticaBoldOblique10 = mkHelveticaBoldOblique 10
helveticaBoldOblique12 :: FontAttr
helveticaBoldOblique12 = mkHelveticaBoldOblique 12
helveticaBoldOblique18 :: FontAttr
helveticaBoldOblique18 = mkHelveticaBoldOblique 18
helveticaBoldOblique24 :: FontAttr
helveticaBoldOblique24 = mkHelveticaBoldOblique 24
helveticaBoldOblique36 :: FontAttr
helveticaBoldOblique36 = mkHelveticaBoldOblique 36
helveticaBoldOblique48 :: FontAttr
helveticaBoldOblique48 = mkHelveticaBoldOblique 48
mkCourier :: Int -> FontAttr
mkCourier = FontAttr "Courier" "Courier New" SVG_REGULAR
courier10 :: FontAttr
courier10 = mkCourier 10
courier12 :: FontAttr
courier12 = mkCourier 12
courier18 :: FontAttr
courier18 = mkCourier 18
courier24 :: FontAttr
courier24 = mkCourier 24
courier36 :: FontAttr
courier36 = mkCourier 36
courier48 :: FontAttr
courier48 = mkCourier 48
mkCourierOblique :: Int -> FontAttr
mkCourierOblique = FontAttr "Courier-Oblique" "Courier New" SVG_OBLIQUE
courierOblique10 :: FontAttr
courierOblique10 = mkCourierOblique 10
courierOblique12 :: FontAttr
courierOblique12 = mkCourierOblique 12
courierOblique18 :: FontAttr
courierOblique18 = mkCourierOblique 18
courierOblique24 :: FontAttr
courierOblique24 = mkCourierOblique 24
courierOblique36 :: FontAttr
courierOblique36 = mkCourierOblique 36
courierOblique48 :: FontAttr
courierOblique48 = mkCourierOblique 48
mkCourierBold :: Int -> FontAttr
mkCourierBold = FontAttr "Courier-Bold" "Courier New" SVG_BOLD
courierBold10 :: FontAttr
courierBold10 = mkCourierBold 10
courierBold12 :: FontAttr
courierBold12 = mkCourierBold 12
courierBold18 :: FontAttr
courierBold18 = mkCourierBold 18
courierBold24 :: FontAttr
courierBold24 = mkCourierBold 24
courierBold36 :: FontAttr
courierBold36 = mkCourierBold 36
courierBold48 :: FontAttr
courierBold48 = mkCourierBold 48
mkCourierBoldOblique :: Int -> FontAttr
mkCourierBoldOblique =
FontAttr "Courier-Bold-Oblique" "Courier New" SVG_BOLD_OBLIQUE
courierBoldOblique10 :: FontAttr
courierBoldOblique10 = mkCourierBoldOblique 10
courierBoldOblique12 :: FontAttr
courierBoldOblique12 = mkCourierBoldOblique 12
courierBoldOblique18 :: FontAttr
courierBoldOblique18 = mkCourierBoldOblique 18
courierBoldOblique24 :: FontAttr
courierBoldOblique24 = mkCourierBoldOblique 24
courierBoldOblique36 :: FontAttr
courierBoldOblique36 = mkCourierBoldOblique 36
courierBoldOblique48 :: FontAttr
courierBoldOblique48 = mkCourierBoldOblique 48
mkSymbol :: Int -> FontAttr
mkSymbol = FontAttr "Symbol" "Symbol" SVG_REGULAR
symbol10 :: FontAttr
symbol10 = mkSymbol 10
symbol12 :: FontAttr
symbol12 = mkSymbol 12
symbol18 :: FontAttr
symbol18 = mkSymbol 18
symbol24 :: FontAttr
symbol24 = mkSymbol 24
symbol36 :: FontAttr
symbol36 = mkSymbol 36
symbol48 :: FontAttr
symbol48 = mkSymbol 48