Skip to content

Instantly share code, notes, and snippets.

View frozar's full-sized avatar
🧊
Working from the KUB

ROZAR Fabien frozar

🧊
Working from the KUB
View GitHub Profile
@frozar
frozar / History|-11107d4c|entries.json
Last active September 21, 2022 10:32
add-bubble-pure-function
{"version":1,"resource":"file:///home/frozar/wk/formation_dwwm/sprint-07/joy-voyager-export-laravel-demo/.env","entries":[{"id":"2Nnl","timestamp":1649832029712}]}
@frozar
frozar / state.cljs
Last active March 30, 2020 20:47
state-atom
(ns bubble.state
(:require [bubble.bubble :as bubble]
[reagent.core :as reagent]))
(defn initial-application-state []
{
:bubbles [bubble/root-bubble]
:links []
})
@frozar
frozar / state.cljs
Created March 30, 2020 20:35
add-bubble!-side-effect
(defn add-bubble! [bubble]
(swap! appstate update :bubbles conj bubble))
@frozar
frozar / watermark_image.sh
Created March 28, 2020 14:13
watermark a picture
#! /bin/bash
usage () {
echo "Usage: $0 <logo.svg> <picture.[jpg|png]>"
exit 0
}
check_argument () {
# Check the number of argument
if [ $# != 2 ] ; then
@frozar
frozar / CMakeLists.txt
Last active June 11, 2018 12:10
Point cloud visualisation
cmake_minimum_required(VERSION 2.8 FATAL_ERROR)
project(jeyaram)
find_package(PCL 1.2 REQUIRED)
include_directories(${PCL_INCLUDE_DIRS})
link_directories(${PCL_LIBRARY_DIRS})
add_definitions(${PCL_DEFINITIONS})
@frozar
frozar / ramer_douglas_peucker.f90
Created October 25, 2017 17:19
Fonctionnal example of the ramer-douglas-peucker algorithm in Fortran: recursive vs iterative
module tools
implicit none
public
contains
REAL(kind=8) FUNCTION length2(x)
IMPLICIT NONE
REAL(kind=8),DIMENSION(2) :: x
length2 = dsqrt(DOT_PRODUCT(x,x))