holdenlee

import Html exposing (Html, Attribute, text, toElement, input, div, button, text, li, text, ul)
import Html.Events exposing (onClick, on, targetValue)
import Html.Attributes exposing (..)
import StartApp.Simple as StartApp
import List exposing (..)
import Html.Attributes exposing (class)

{-| Read more about StartApp and how this works at:

    https://github.com/evancz/start-app

holdenlee

{-# OPTIONS
    -XPatternSynonyms
    -XTemplateHaskell
#-}

module CYK where

import Control.Lens
import Control.Monad
import Control.Monad.Free

holdenlee

import Color exposing (..)
import Graphics.Collage exposing (..)
import Graphics.Element exposing (..)


xc = 100
yc = 100

xw = 3072//4
yw = 2304//4