Line Width

«html5canvastutorials version»

{-# LANGUAGE OverloadedStrings #-}
module Main where

import Graphics.Blank

main = blankCanvas 3000 $ \ context -> do
    send context $ do
        moveTo(100,150)
        lineTo(450,50)
        lineWidth 15
        stroke()