paulvictor

SSID=SSID_GOES_HERE
pwgen -s 63 > 00wifi.txt
qrencode -o 00wifi.png "WIFI:T:WPA;S:${SSID};P:$(cat 00wifi.txt);;"

paulvictor

#!/usr/bin/env bash
i=0
ratePerSecond=1000000
port=5000
ratePerMS=$(($ratePerSecond/100))
while [ true ]
do
toRead=$((i*$ratePerMS))
b=`head $toRead $1 | tail -$ratePerMS`
i=$((i+1))

paulvictor

Keybase proof

I hereby claim:

• I am paulvictor on github.
• I am paulvictor (https://keybase.io/paulvictor) on keybase.
• I have a public key ASBW9fgmHto1UEB5qdFS4nh4ZFr0hLSpk23aewJgOsrvNgo

To claim this, I am signing this object:

paulvictor

pgLatency :: Array Page -> Array Event -> Int
pgLatency pages events =
  snd <<<
    runState
      (for_
        (pagesAndEventsSortedOnTime
        (either
          \p -> whenM ((\s -> fst s && isUsefulPage p) <$> get) (modify_ (snd >>> _ + p.latency))
          \e -> whenM ((\s -> fst s && isUsefulEvent e) <$> get) (modify_ (fst >>> const true)))
        )

paulvictor

exports.fetchPayload = null
exports.readHostNameFromSTDIN = null;

paulvictor

def func():
  i = 0;
  j = 0;
  for (x in xs)
    i = i+1;
    if (x.foo == "bar")
      j += 1;
    else
      j += 0;
    

paulvictor

var AWS = require("aws-sdk")
var options =
  { endPoint: "https://kinesis.ap-southeast-1.amazonaws.com"
  , accessKeyId: ""
  , secretAccessKey: ""
  , region: "ap-southeast-1"
  }
var request4 = new AWS.Kinesis(options).subscribeToShard(
  { "ConsumerARN": ""
    , "ShardId": "shardId-"

paulvictor

var request4 = new AWS.Request(new AWS.Kinesis(options), 
                               "subscribeToShard", 
                               { "ConsumerARN": "ARN", "ShardId": "shardId-0000000000XY" })
//var request4 = new AWS.Kinesis(options).subscribeToShard(
//  { "ConsumerARN": "ARN"
//    , "ShardId": "shardId-0000000000XY"
//  })
var request4 = new AWS.Kinesis(options).listStreams()

//console.log(JSON.stringify(request4.service))

paulvictor

module MultipleTypes where

import Data.Argonaut.Decode.Combinators ((.?))
import Prelude

import Data.Argonaut.Core (Json, caseJson)
import Data.Argonaut.Core (stringify) as Json
import Data.Argonaut.Decode.Class (decodeJson)
import Data.Argonaut.Encode.Class (encodeJson)
import Data.Either (Either, either)

paulvictor

module Try2 where

import Prelude

import Control.Monad.Rec.Class (forever)
import Data.Tuple (uncurry)
import Data.Tuple.Nested ((/\), type (/\))
import Effect (Effect)
import Effect.Aff (Aff, launchAff)
import Effect.Class (liftEffect)