Free Pascal Implementation of the Rubikon