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
from numpy import array | |
from string import punctuation | |
from os import listdir | |
from collections import Counter | |
from nltk.corpus import stopwords | |
from keras.preprocessing.text import Tokenizer | |
from keras.models import Sequential | |
from keras.layers import Dense | |
from keras.layers import Dropout |
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
{ dockerTools, riziBackend, stdenv }: | |
dockerTools.buildImage { | |
name = "auth-exe"; | |
contents = [ riziBackend.auth-server ]; | |
runAsRoot = '' | |
#!${stdenv.shell} | |
mkdir -p /data/static | |
''; | |
config = { |
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
navbarBurger :: forall t m. MonadWidget t m | |
=> T.Text | |
-> T.Text | |
-> m () | |
navbarBurger elm dataTarget = do | |
rec | |
let | |
dynAttrs = fmap (\s -> if s then Map.fromList [("class","navbar-burger is-active"), ("data-target",dataTarget)] | |
else Map.fromList [("class","navbar-burger"), ("data-target",dataTarget)]) | |
(ev1,_) <- elDynAttr' elm dynAttrs $ pure () |
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
evaluate :: Program -> Value | |
evaluate [Bind _ _ _ e] = evalE E.empty e | |
evaluate bs = evalE E.empty (Let bs (Var "main")) | |
evalE :: VEnv -> Exp -> Value | |
-- Handle Variable case | |
evalE venv (Var var) = | |
case E.lookup venv var of | |
Just e -> e | |
Nothing -> Nil |
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
let | |
dotnetSDK-version = "2.2.1xx"; | |
fake-cli-version = "5.11.1"; | |
in | |
newPkgs: oldPkgs: let | |
fast = "none"; | |
in { | |
riziDotnetSDK = newPkgs.callPackage (import ./nixdeps/dotnet/sdk/default.nix) {}; | |
riziDotnetPackages = oldPkgs.dotnetPackages.override { |
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
{ system ? builtins.currentSystem | |
}: | |
let | |
reflex-platform = import (import ./nixdeps/reflex-platform) {inherit system;}; | |
haskellLib = pkgs.haskell.lib; | |
inherit (reflex-platform) nixpkgs; | |
inherit (nixpkgs) lib; |
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
building '/nix/store/sxsq3miyy72wzws7528vj5iaxfcy7icg-cabal2nix-2.5.drv'... | |
setupCompilerEnvironmentPhase | |
Build with /nix/store/snpnx6gdggvjpdig04n4q7x2yd1bgjbb-ghc-8.0.2. | |
unpacking sources | |
unpacking source archive /nix/store/m6vik2fj2bvqi85jpc1q6bz1mg4z3whk-cabal2nix-2.5.tar.gz | |
source root is cabal2nix-2.5 | |
/nix/store/j1ly0zzpnzb8y8ry6k4vi4prk8vwq233-set-source-date-epoch-to-latest.sh: line 7: warning: command substitution: ignored null byte in input | |
setting SOURCE_DATE_EPOCH to timestamp 1503748469 of file cabal2nix-2.5/test/doctests.hs | |
patching sources | |
compileBuildDriverPhase |
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
{-# LANGUAGE DataKinds #-} | |
{-# LANGUAGE DeriveGeneric #-} | |
{-# LANGUAGE DeriveAnyClass #-} | |
{-# LANGUAGE StandaloneDeriving #-} | |
{-# LANGUAGE FlexibleContexts #-} | |
{-# LANGUAGE GADTs #-} | |
{-# LANGUAGE KindSignatures #-} | |
{-# LANGUAGE LambdaCase #-} | |
{-# LANGUAGE OverloadedStrings #-} | |
-- {-# LANGUAGE PolyKinds #-} |
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
el :: Text -> m a -> m a | |
[1] [2] [3] | |
el "p" $ text "Welcome, this is Home!" | |
< p > Welcome, This is Home! </p> | |
elAttr :: Text -> Map Text Text -> m a -> m a | |
[A] [B] [C] [D] | |
elAttr "h2" ( "class" =: "main-header" ) $ text "Welcome" | |
< "h2" class = "main-header" > Welcome </h2> |
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
el "ul" $ do | |
el "li" $ | |
elAttr "a" ("href" =: "https://github.com/haskell-infra/hackage-trustees/blob/master/policy.md") $ | |
text "Hackage trustee policy and procedures" | |
<ul> | |
<li> | |
<a href="https://github.com/haskell-infra/hackage-trustees/blob/master/policy.md"> Hackage trustee policy and procedures </a> | |
</li> | |
</ul> |