Index.elm

module Index exposing (..)

import Html exposing (Html)
import ElmResume.Views.ResumeContent exposing (resume)
import ElmResume.ResumeData exposing (..)
import ElmResume.JsonResumeDecoder exposing (..)
import Json.Decode exposing (decodeString)

myData : Result String JsonResume
myData = decodeString 
    jsonResumeDecoder 
    """
{
    "basics": {
      "name": "Richard Hendriks",
      "label": "Programmer",
      "image": "",
      "email": "richard.hendriks@mail.com",
      "phone": "(912) 555-4321",
      "url": "http://richardhendricks.example.com",
      "summary": "Richard hails from Tulsa. He has earned degrees from the University of Oklahoma and Stanford. (Go Sooners and Cardinal!) Before starting Pied Piper, he worked for Hooli as a part time software developer. While his work focuses on applied information theory, mostly optimizing lossless compression schema of both the length-limited and adaptive variants, his non-work interests range widely, everything from quantum computing to chaos theory. He could tell you about it, but THAT would NOT be a “length-limited” conversation!",
      "location": {
        "address": "2712 Broadway St",
        "postalCode": "CA 94115",
        "city": "San Francisco",
        "countryCode": "US",
        "region": "California"
      },
      "profiles": [
        {
          "network": "Twitter",
          "username": "neutralthoughts",
          "url": ""
        },
        {
          "network": "SoundCloud",
          "username": "dandymusicnl",
          "url": "https://soundcloud.example.com/dandymusicnl"
        }
      ]
    },
    "work": [
      {
        "name": "Pied Piper",
        "description": "Awesome compression company",
        "position": "CEO/President",
        "url": "http://piedpiper.example.com",
        "startDate": "2013-12-01",
        "endDate": "2014-12-01",
        "summary": "Pied Piper is a multi-platform technology based on a proprietary universal compression algorithm that has consistently fielded high Weisman Scores™ that are not merely competitive, but approach the theoretical limit of lossless compression.",
        "highlights": [
          "Build an algorithm for artist to detect if their music was violating copy right infringement laws",
          "Successfully won Techcrunch Disrupt",
          "Optimized an algorithm that holds the current world record for Weisman Scores"
        ]
      }
    ],
    "volunteer": [
      {
        "organization": "CoderDojo",
        "position": "Teacher",
        "url": "http://coderdojo.example.com/",
        "startDate": "2012-01-01",
        "endDate": "2013-01-01",
        "summary": "Global movement of free coding clubs for young people.",
        "highlights": [
          "Awarded 'Teacher of the Month'"
        ]
      }
    ],
    "education": [
      {
        "institution": "University of Oklahoma",
        "area": "Information Technology",
        "studyType": "Bachelor",
        "startDate": "2011-06-01",
        "endDate": "2014-01-01",
        "gpa": "4.0",
        "courses": [
          "DB1101 - Basic SQL",
          "CS2011 - Java Introduction"
        ]
      }
    ],
    "awards": [
      {
        "title": "Digital Compression Pioneer Award",
        "date": "2014-11-01",
        "awarder": "Techcrunch",
        "summary": "There is no spoon."
      }
    ],
    "publications": [
      {
        "name": "Video compression for 3d media",
        "publisher": "Hooli",
        "releaseDate": "2014-10-01",
        "url": "http://en.wikipedia.org/wiki/Silicon_Valley_(TV_series)",
        "summary": "Innovative middle-out compression algorithm that changes the way we store data."
      }
    ],
    "skills": [
      {
        "name": "Web Development",
        "level": "Master",
        "keywords": [
          "HTML",
          "CSS",
          "Javascript"
        ]
      },
      {
        "name": "Compression",
        "level": "Master",
        "keywords": [
          "Mpeg",
          "MP4",
          "GIF"
        ]
      }
    ],
    "languages": [
      {
        "language": "English",
        "fluency": "Native speaker"
      }
    ],
    "interests": [
      {
        "name": "Wildlife",
        "keywords": [
          "Ferrets",
          "Unicorns"
        ]
      }
    ],
    "references": [
      {
        "name": "Erlich Bachman",
        "reference": "It is my pleasure to recommend Richard, his performance working as a consultant for Main St. Company proved that he will be a valuable addition to any company."
      }
    ],
    "projects": [
      {
        "name": "Miss Direction",
        "description": "A mapping engine that misguides you",
        "highlights": [ 
          "Won award at AIHacks 2016",
          "Built by all women team of newbie programmers",
          "Using modern technologies such as GoogleMaps, Chrome Extension and Javascript"
        ],
        "keywords": [
          "GoogleMaps", "Chrome Extension", "Javascript"
        ],
        "startDate": "2016-08-24",
        "endDate": "2016-08-24", 
        "url": "missdirection.example.com",
        "roles": [ 
          "Team lead", "Designer"
        ],
        "entity": "Smoogle",
        "type": "application"
      }
    ],
    "meta": {
      "canonical": "https://raw.githubusercontent.com/jsonresume/resume-schema/master/resume.json",
      "version": "v1.0.0",
      "lastModified": "2017-12-24T15:53:00"
    }
  }
    """


-- myData : JsonResume 
-- myData = JsonResume 
--     (Just "Your Name")
--     (Just "You@Email.com")
--     (Just "(234) 567-8901")
--     (Just "What you do")
--     (Just "This is a short description of who you are. Keep it to about 3 sentences and make sure to highlight the key points about you. What makes you stand out as an applicant?")
--     (Just (Location 
--         (Just "123 Some St.")
--         (Just "State 01234")
--         (Just "City")
--         (Just "US")
--         (Just "State  ")))
--     [ Profile (Just "Dribbble") (Just "") (Just "#")
--     , Profile (Just "Twitter") (Just "") (Just "#")
--     , Profile (Just "Facebook") (Just "") (Just "#")
--     , Profile (Just "LinkedIn") (Just "") (Just "#") ]
--     [ EducationData (Just "University of Maryland") (Just "Bachelor of Awesomeness") (Just "EXPECTED SPRING 2015")
--     , EducationData (Just "Lil 'ol College") (Just "Associate of Degrees") (Just "JUNE 2012")] 
--     [ WorkData 
--         (Just "Thatone Corp." )
--         (Just "description")
--         (Just "Position" )
--         (Just "todo-url" )
--         (Just "AUGUST 2012" )
--         (Just "CURRENT")
--         (Just "Here's where you put a description of the position you held. Responsibilities, accomplishments - the same as you would do on a standard paper resume, but this will be online and look cooler." )
--         [] 
--         (Just (Address (Just "CITY") (Just "STATE") (Just "USA")))
--     , WorkData 
--         (Just "Another Organization Ltd. ." )
--         (Just "description")
--         (Just "Previous Position" )
--         (Just "todo-url" )
--         (Just "JUNE 2010" )
--         (Just "JULY 2012" )
--         (Just "You worked at another job! Great! Describe waht you did there, include those responsibilities and accomplishments again." )
--         [] 
--         (Just (Address (Just "GOTHAM CITY") Nothing (Just "USA")))]
    
main : Html msg
main =
    case myData of
        Result.Err message -> Html.text message
        Result.Ok resumeData -> resume resumeData
--  Maybe.withDefault (Html.text "") (resume myData)