mark-d-holmberg’s gists

mark-d-holmberg / RUN_SIMPLETON.sh

Created November 30, 2011 20:21

The BASH run script for Simpleton Wumpus World Agent

	#!/bin/bash

	agent=SIMPLETON
	port=31656
	trace=1
	SLEEP=10
	steps=150
	seed=1257360045

	./RunProg ./WW_Test -p ${port} -d 0 -D 1 -R 1 -s ${steps} -t 0 -S ${SLEEP} -z {seed} &

mark-d-holmberg / grep_makefile.sh

Created October 4, 2011 19:52

Grepping Makefiles for Executable Names

	#TODO: Match the optional ".x86" extension
	grep -Rin --after-context 1 "all:" $(find -type f -iname "Makefile") \| grep -Rin "\-o\ \b\w\+-\?\w\+-\?\w\+\?\?\b"

mark-d-holmberg / purge.sh

Created September 29, 2011 19:32

How to purge passwords from files

	#to find the offenders
	find -name "*\.php" -print0 \| xargs -0 grep -Rin "password" > results.txt

	# to replace it with garbage
	find . -name "*.php" -print0 \| xargs -0 sed -i -e 's/FINDME/REPLACEWITHME/g'

	# you can change '*.php' to the extension you want.

	# remove the command from .bash_history
	> ~/.bash_history

mark-d-holmberg / tail_recursion.clj

Created September 14, 2011 15:52

Tail Recursion in Clojure

	Mark Holmberg, Dixie State College of Utah
	CS 3520, Programming Languages
	14 Sept. 2011

	(defn foldl [f sofar lst]
	(if (empty? lst) sofar
	(foldl f(f (first lst) sofar) (rest lst))))


	(defn foldr [f sofar lst]

mark-d-holmberg / clojure_quicksort.cjl

Created September 12, 2011 17:03

Clojure Quicksort and More!

	//Mark Holmberg [email protected]
	//CS350, Programming Languages
	//date: Mon Sep 12 09:33:11 MDT 2011
	//Clojure

	//http://en.wikipedia.org/wiki/Quicksort
	((fn [x] (* x x)) 5)

	//calling a function with only one parameter
	#(* % %)

mark-d-holmberg / assert.prolog

Created September 10, 2011 03:20

Asserting in Prolog

	Mark Holmberg, Dixie State College of Utah
	CS 3520, Programming Languages
	9 Sept. 2011
	Some help with the adventure game

	% Lets assert some things
	assert(bag(key)), assert(bag(candle)), assert(bag(sword)), assert(bag(bow)).

	% do we have a candle?
	bag(candle).

mark-d-holmberg / sudoku_pretty.rb

Created September 9, 2011 02:32

How to generate Sudoku boards for the Solver

	# Mark Holmberg, Dixie State College of Utah
	# CS 3520, Programming Languages
	# 8 Sept. 2011
	# http://www.sudoku-solutions.com/
	# Purpose: Generate 'unsolved' sudoku puzzles for the sudoku
	# solver to solve.

	# Step One: Go to the URL above and hit the 'Random' button.

	# Step Two: After the board is formed hit the 'Save' button and open the

mark-d-holmberg / mwgc_tests.txt

Created September 7, 2011 21:13

Man, Wolf, Goat, Cabbage Tests

	Mark Holmberg, Dixie State College of Utah
	CS 3520, Programming Languages
	7 Sept. 2011
	Some help with the Man, the Wolf, the Goat, and the Cabbage.

	Since the solution is given on the site, but not how to invoke a solution
	I searched through the slides to come up with this to actually test it

	length(X,7), solution([w,w,w,w],X).

mark-d-holmberg / mwgc.pl

Created September 7, 2011 21:09

The Man, The Wolf, The Goat, and The Cabbage

	% See the Gist Here
	% https://gist.github.com/1201748

	change(e,w).
	change(w,e).

	move([X,X,Goat,Cabbage],wolf,[Y,Y,Goat,Cabbage]) :-
	change(X,Y).
	move([X,Wolf,X,Cabbage],goat,[Y,Wolf,Y,Cabbage]) :-
	change(X,Y).

mark-d-holmberg / eq2_prolog.txt

Created September 7, 2011 20:27

Eight Queens as a List Help (Prolog)

	Mark Holmberg, Dixie State College of Utah
	CS 3520, Programming Languages
	7 Sept. 2011
	Some help with 8-queens so you don't have to type as much.


	If you want to test your 8-Queens predicate you can NOT write a test predicate
	like Russ said. Although it does work, it only returns true or false NOT the
	list of the proper queen locations. The following is the test case I used.

Mark Holmberg mark-d-holmberg