This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # なんか入れる. | |
| sudo apt-get -y update | |
| sudo apt-get -y upgrade | |
| sudo apt-get -y install build-essential | |
| sudo apt-get -y install python3-dev | |
| python -V | |
| python3 -V | |
| #pythonと打つとpython3になるようにする。(追記:バグの原因になるのでやらないほうがいいようだ) | |
| #echo alias python=python3 >> ~/.bash_aliases |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| module App where | |
| import Graphics.Element exposing (Element,show) | |
| import Signal | |
| import Mouse | |
| main : Signal Element | |
| main = Signal.map show Mouse.position |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <!DOCTYPE html> | |
| <html lang="en"> | |
| <head> | |
| <meta charset="UTF-8"> | |
| <title>start</title> | |
| <!-- Bootstrap --> | |
| <link href="css/bootstrap.min.css" rel="stylesheet"> | |
| </head> | |
| <body> |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| import Mouse | |
| import Signal(..) | |
| import Text(asText) | |
| import Graphics.Element(Element) | |
| main : Signal Element | |
| main = asText <~ Mouse.position |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| --example : http://www.share-elm.com/sprout/546cc30be4b00800031fee56 | |
| elasticBar (x,y) baseSide extendSide maxValue angle barColor state = | |
| let moveDis = min extendSide (extendSide * (state / maxValue )) | |
| faring bcolor shape = shape|>filled bcolor|> move (x,y)|> rotate (degrees angle) | |
| in [polygon [(0,0),(baseSide,0),(baseSide,extendSide),(0,extendSide)]|>faring gray, | |
| polygon [(0,0),(baseSide,0),(baseSide,moveDis),(0,moveDis)]|>faring barColor ] | |
| bar state = elasticBar (0,0) 10 200 10 270 blue (toFloat state) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| main= eventFlow <| ---(signal) | |
| eventFlow : Signal a -> Signal Element | |
| eventFlow signal = let step a list = [(asText a)] ++ list | |
| in flow down <~ foldp step [] signal |
NewerOlder