josejuan’s gists

josejuan / Levenshtein.js

Created June 5, 2012 13:36

Levenshtein javascript implementation

	// Levenshtein(String, String) -> Integer
	function Levenshtein(a, b) {
	var n = a.length;
	var m = b.length;

	// matriz de cambios mínimos
	var d = [];

	// si una de las dos está vacía, la distancia
	// es insertar todas las otras

josejuan / LevenshteinSubminimal.js

Created June 5, 2012 13:45

Levenshtein substring minimal distance, javascript implementation

	/*
	LevenshteinSubminimal(String A, String B) -> {k: Integer, t: String}
	A, es la cadena que introduce el usuario
	B, es la cadena candidata a ser alternativa del usuario
	k, es la mínima Levenshtein de A sobre todas las subcadenas de B
	t, es la cadena con menor distancia Levenshtein
	*/
	function LevenshteinSubminimal(A, B) {
	var a = A.length;
	var b = B.length;

josejuan / LevenshteinSubminimalTest.htm

Created June 5, 2012 13:50

Levenshtein subminimal test

	<!DOCTYPE html>
	<head>
	<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
	<title>LevenshteinSubminimal test</title>
	<style>
	div {
	float: left;
	padding: 5px;
	border-right: 1px solid gray;
	}

josejuan / maximize_bits_using_lpi.cs

Created June 11, 2012 14:26

Maximize bits using lpi.

	// Una forma de acceder al solver, es usando el contexto siempre disponible:
	var c = SolverContext.GetContext();

	// Creamos un modelo vacío, podríamos haberlo leído de disco, ...
	var m = c.CreateModel();

	// Enumeramos los bits: 0, 1, 2, ..., n-1
	var b = new Set(0, Math.Ceiling(Math.Log(X) / Math.Log(2)), 1);

	// Las incógnitas son los bits que tomarán los números Y y Z

josejuan / kata_potter.lp

Created June 11, 2012 16:40

Kata Potter

josejuan / combinaciones_n_m.c

Created June 14, 2012 17:35

Combinaciones de N elementos tomados de M en M.

	// Todas las combinaciones de N elementos
	void Combinaciones( int N ) {
	for( int n = 0; n < 1 << N; n++ ) {
	// Usar combinación.
	}
	}

	// Combinaciones de N elementos tomados de M en M
	void Combinaciones( int N, int M ) {
	for( int n = 0; n < 1 << N; n++ ) {

josejuan / 3rcheck.c

Created June 16, 2012 23:00

Check 3 en raya

josejuan / 3rcheck.asm

Created June 16, 2012 23:03

3 en raya check

josejuan / zerostring.c

Created June 16, 2012 23:47

Buscando ceros...

	// Buscando un cero (eg. la longitud de la cadena)
	int strlen(char *s) {
	int l = 0;
	while(*s++) l++;
	return l;
	}

	// Buscando la primera aparición de un caracter dado
	int strpos(char *s, char c) {
	int l = 0;

josejuan / haszero.c

Created June 17, 2012 00:00

haszero

	// http://graphics.stanford.edu/~seander/bithacks.html

	#define haszero(v) (((v) - 0x01010101UL) & ~(v) & 0x80808080UL)

	// en 4 operaciones indica si un byte de entre todos es 0

	// para 64 bits será, lógicamente

	#define haszero(v) (((v) - 0x0101010101010101UL) & ~(v) & 0x8080808080808080UL)

josejuan josejuan