ChristophP

module Main exposing (main)

import Char
import Html exposing (Html)
import Json.Encode as JE
import Parser exposing (..)
import Set


main : Html Never

ChristophP

module SimpleJson
  ( JValue(..)
  , put
  ) where

import Data.List (intercalate)

-- union type
data JValue
  = JString String

ChristophP

import Data.List.Split
import Text.Read

main :: IO ()
main = do
   contents <- readFile "/home/deedo/Desktop/times.txt"
   let line = getSecondLine $ splitOn "\n" contents
   putStrLn $ prepareOutput $ calcDay <$> line

calcDay :: String -> Int

ChristophP

set nocompatible  " Disable vi-compatibility
set nomodeline " good practice to disable because of security issues
set t_Co=256

" Disable safe write
set backupcopy=yes

" With a map leader it's possible to do extra key combinations
" like <leader>w saves the current file
let mapleader = "\<space>"