l1x

  let rec spiral m =
    match m with
    | [] -> []
    | x::xs -> x @ spiral (List.rev (List.transpose xs))

  [<EntryPoint>]
  let main argv =
    System.Console.WriteLine(sprintf "%A" (spiral [[1;2;3];[8;9;4];[7;6;5]])) // 1 2 3 4 5 6 7 8 9
    System.Console.WriteLine(sprintf "%A" (spiral [[1; 2; 3; 4]; [5; 6; 7; 8]; [9; 10; 11; 12]; [13; 14; 15; 16]])) // 1 2 3 4 8 12 16 15 14 13 9 5 6 7 11 10
    System.Console.WriteLine(sprintf "%A" (spiral [[1;2;3;4;5;6]; [7;8;9;10;11;12];[13;14;15;16;17;18]])) // 1 2 3 4 5 6 12 18 17 16 15 14 13 7 8 9 10 11

l1x

-module(ntp).
-export([get_time/1, get_time/0]).

-define(NTP_PORT,       123).                   % udp
-define(SERVER_TIMEOUT, 5000).                  % ms
-define(EPOCH,          2208988800).            % offset yr 1900 to unix epoch


ntp_servers() ->
  [ "0.europe.pool.ntp.org",

l1x

# with handbrake cli
for i in *.mkv; do
  handbrake --preset-import-file fast.json --ab 192 -i "$i" -o "${i%.mkv}".mp4;
done

# or with ffmpeg
for f in *.avi; do
  ffmpeg -i "$f" -c:v libx264 -c:a aac "${f%.avi}".mp4;
done

l1x

module Main where

transpose :: [[Int]] -> [[Int]]
transpose m =
  case m of 
    []      -> []
    ([]:_)  -> []
    x       -> (map head x) : transpose (map (drop 1) x)
 
spiralPrintShort :: [[Int]] -> [Int]

l1x

-- Show the current time in your time zone.
--
-- Read how it works:
--   https://guide.elm-lang.org/effects/time.html

import Browser
import Html exposing (..)
import Task
import Time exposing (..)

l1x

sudo apt update -y && sudo apt upgrade -y
sudo systemctl enable ssh
sudo systemctl start ssh

l1x

#!/bin/bash
set -ex

ROCKSDB_VERSION="6.7.3"
ZSTD_VERSION="1.4.4"

echo "This script configures CentOS with everything needed to build and run RocksDB"

yum update -y && yum install epel-release -y

l1x

sqlite3 ~/Library/Safari/History.db

sqlite> .tables
history_client_versions  history_items            history_tombstones
history_event_listeners  history_items_to_tags    history_visits
history_events           history_tags             metadata

l1x

Query failed (#20200116_080226_04202_txkag) in Presto: 
Query exceeded per-node user memory limit of 20GB 
[ Allocated: 20.00GB, 
  Delta: 688.14kB, 
  Top Consumers: 
{ OrderByOperator=20.00GB, 
  TableScanOperator=260.90MB, 
  ExchangeOperator=5.71MB } ]

l1x

Installing .NET SDK

brew tap isen-ng/dotnet-sdk-versions
brew cask install dotnet-sdk-2.2.400

Creating Serverless Service

I think it is a good option to have separate dev and prod services in separate folders so we cannot accidentally deploy to prod, that is a problem when relying on environment variables.