yhsiang

package main

import (
	"bytes"
	"crypto/tls"
	"fmt"
	"io"
	"io/ioutil"
	"log"
	"net/http"

yhsiang

type post = {
  userId: int,
  id: int,
  title: string,
  body: string
};

type posts = list(post);

type state = {

yhsiang

module Calendar exposing (..)

import String
import Html exposing (div, span, node, text, button)
import Html.Attributes exposing (style)
import Html.Events exposing (onClick)

import Array
import Date exposing (Date)
import Date.Extra.Core exposing (daysInMonth, monthToInt, lastOfPrevMonthDate, firstOfNextMonthDate, toFirstOfMonth)

yhsiang

import Html exposing (node, div, span, text, input)
import Html.Attributes exposing (style, placeholder, value)
import Html.Events exposing (onClick)
import Html.App exposing (beginnerProgram)

{-| Representation of an selectable item. -}
type alias Item =
  { label : String
  , value : String
  }

yhsiang

http://influencemapping.org/
http://littlesis.org/
http://www.poderopedia.org/
https://quienmanda.es/
https://www.quienesquien.wiki/
http://ahalo.hu/
http://openoil.net/
http://www.openinterests.eu/
http://siyazana.co.za/
http://www.openduka.org/

yhsiang

closeBooker: function () {
        var self = this;
        clearTimeout(self.timer); //make sure visibility timer is cleared
        //slide booker closed
        self.booker.animate({
            'left': '-100%'
        }, self.transitionSpeed, function () {
            //hide booker and active section in booker
            self.booker.hide()
                .find('div.request-container.active')

yhsiang

(ns pic-parser.core
  (:require [clj-http.client :as client]
            [net.cgrand.enlive-html :as html]
            [clojure.data.json :as json]))

(def target-url "http://public.318.io/search?viewmode=grid")
(def img-base "http://public.318.io/sites/318_public/files/styles/large/public/digicoll/public/010/")

(defn get-body
  "return body content"

yhsiang

(ns axe.core
  (:require [clj-http.client :as client]
            [net.cgrand.enlive-html :as html]
            [clojure.data.json :as json]))

(def axe-lv3-url "http://axe-level-1.herokuapp.com/lv3/")

(def cs (clj-http.cookies/cookie-store))

(defn parse-cookie

yhsiang

(ns axe.core
  (:require [clj-http.client :as client]
            [net.cgrand.enlive-html :as html]
            [clojure.data.json :as json]))
          
(def axe-lv2-url "http://axe-level-1.herokuapp.com/lv2/")

(def town-keys [:town :village :name])

(defn parse-table

yhsiang

(ns axe.core
  (:require [clj-http.client :as client]
            [net.cgrand.enlive-html :as html]
            [clojure.data.json :as json]))

(def axe-url "http://axe-level-1.herokuapp.com/")

(def grades-keys [:國語 :數學 :自然 :社會 :健康教育])

(defn parse-table