/* Prototype JavaScript framework, version 1.6.0.2
 * (c) 2005-2008 Sam Stephenson
 *
 * Prototype is freely distributable under the terms of an MIT-style license.
 * For details, see the Prototype web site: http://www.prototypejs.org/
 *
 *--------------------------------------------------------------------------*/

var Prototype = {
 Version: '1.6.0.2',

 Browser: {
 IE:  !!(window.attachEvent && !window.opera),
 Opera: !!window.opera,
 WebKit: navigator.userAgent.indexOf('AppleWebKit/') > -1,
 Gecko: navigator.userAgent.indexOf('Gecko') > -1 && navigator.userAgent.indexOf('KHTML') == -1,
 MobileSafari: !!navigator.userAgent.match(/Apple.*Mobile.*Safari/)
 },

 BrowserFeatures: {
 XPath: !!document.evaluate,
 ElementExtensions: !!window.HTMLElement,
 SpecificElementExtensions:
  document.createElement('div').__proto__ &&
  document.createElement('div').__proto__ !==
  document.createElement('form').__proto__
 },

 ScriptFragment: '<script[^>]*>([\\S\\s]*?)<\/script>',
 JSONFilter: /^\/\*-secure-([\s\S]*)\*\/\s*$/,

 emptyFunction: function() { },
 K: function(x) { return x }
};

if (Prototype.Browser.MobileSafari)
 Prototype.BrowserFeatures.SpecificElementExtensions = false;


/* Based on Alex Arnell's inheritance implementation. */
var Class = {
 create: function() {
 var parent = null, properties = $A(arguments);
 if (Object.isFunction(properties[0]))
  parent = properties.shift();

 function klass() {
  this.initialize.apply(this, arguments);
 }

 Object.extend(klass, Class.Methods);
 klass.superclass = parent;
 klass.subclasses = [];

 if (parent) {
  var subclass = function() { };
  subclass.prototype = parent.prototype;
  klass.prototype = new subclass;
  parent.subclasses.push(klass);
 }

 for (var i = 0; i < properties.length; i++)
  klass.addMethods(properties[i]);

 if (!klass.prototype.initialize)
  klass.prototype.initialize = Prototype.emptyFunction;

 klass.prototype.constructor = klass;

 return klass;
 }
};

Class.Methods = {
 addMethods: function(source) {
 var ancestor = this.superclass && this.superclass.prototype;
 var properties = Object.keys(source);

 if (!Object.keys({ toString: true }).length)
  properties.push("toString", "valueOf");

 for (var i = 0, length = properties.length; i < length; i++) {
  var property = properties[i], value = source[property];
  if (ancestor && Object.isFunction(value) &&
   value.argumentNames().first() == "$super") {
  var method = value, value = Object.extend((function(m) {
   return function() { return ancestor[m].apply(this, arguments) };
  })(property).wrap(method), {
   valueOf: function() { return method },
   toString: function() { return method.toString() }
  });
  }
  this.prototype[property] = value;
 }

 return this;
 }
};

var Abstract = { };

Object.extend = function(destination, source) {
 for (var property in source)
 destination[property] = source[property];
 return destination;
};

Object.extend(Object, {
 inspect: function(object) {
 try {
  if (Object.isUndefined(object)) return 'undefined';
  if (object === null) return 'null';
  return object.inspect ? object.inspect() : String(object);
 } catch (e) {
  if (e instanceof RangeError) return '...';
  throw e;
 }
 },

 toJSON: function(object) {
 var type = typeof object;
 switch (type) {
  case 'undefined':
  case 'function':
  case 'unknown': return;
  case 'boolean': return object.toString();
 }

 if (object === null) return 'null';
 if (object.toJSON) return object.toJSON();
 if (Object.isElement(object)) return;

 var results = [];
 for (var property in object) {
  var value = Object.toJSON(object[property]);
  if (!Object.isUndefined(value))
  results.push(property.toJSON() + ': ' + value);
 }

 return '{' + results.join(', ') + '}';
 },

 toQueryString: function(object) {
 return $H(object).toQueryString();
 },

 toHTML: function(object) {
 return object && object.toHTML ? object.toHTML() : String.interpret(object);
 },

 keys: function(object) {
 var keys = [];
 for (var property in object)
  keys.push(property);
 return keys;
 },

 values: function(object) {
 var values = [];
 for (var property in object)
  values.push(object[property]);
 return values;
 },

 clone: function(object) {
 return Object.extend({ }, object);
 },

 isElement: function(object) {
 return object && object.nodeType == 1;
 },

 isArray: function(object) {
 return object != null && typeof object == "object" &&
  'splice' in object && 'join' in object;
 },

 isHash: function(object) {
 return object instanceof Hash;
 },

 isFunction: function(object) {
 return typeof object == "function";
 },

 isString: function(object) {
 return typeof object == "string";
 },

 isNumber: function(object) {
 return typeof object == "number";
 },

 isUndefined: function(object) {
 return typeof object == "undefined";
 }
});

Object.extend(Function.prototype, {
 argumentNames: function() {
 var names = this.toString().match(/^[\s\(]*function[^(]*\((.*?)\)/)[1].split(",").invoke("strip");
 return names.length == 1 && !names[0] ? [] : names;
 },

 bind: function() {
 if (arguments.length < 2 && Object.isUndefined(arguments[0])) return this;
 var __method = this, args = $A(arguments), object = args.shift();
 return function() {
  return __method.apply(object, args.concat($A(arguments)));
 }
 },

 bindAsEventListener: function() {
 var __method = this, args = $A(arguments), object = args.shift();
 return function(event) {
  return __method.apply(object, [event || window.event].concat(args));
 }
 },

 curry: function() {
 if (!arguments.length) return this;
 var __method = this, args = $A(arguments);
 return function() {
  return __method.apply(this, args.concat($A(arguments)));
 }
 },

 delay: function() {
 var __method = this, args = $A(arguments), timeout = args.shift() * 1000;
 return window.setTimeout(function() {
  return __method.apply(__method, args);
 }, timeout);
 },

 wrap: function(wrapper) {
 var __method = this;
 return function() {
  return wrapper.apply(this, [__method.bind(this)].concat($A(arguments)));
 }
 },

 methodize: function() {
 if (this._methodized) return this._methodized;
 var __method = this;
 return this._methodized = function() {
  return __method.apply(null, [this].concat($A(arguments)));
 };
 }
});

Function.prototype.defer = Function.prototype.delay.curry(0.01);

Date.prototype.toJSON = function() {
 return '"' + this.getUTCFullYear() + '-' +
 (this.getUTCMonth() + 1).toPaddedString(2) + '-' +
 this.getUTCDate().toPaddedString(2) + 'T' +
 this.getUTCHours().toPaddedString(2) + ':' +
 this.getUTCMinutes().toPaddedString(2) + ':' +
 this.getUTCSeconds().toPaddedString(2) + 'Z"';
};

var Try = {
 these: function() {
 var returnValue;

 for (var i = 0, length = arguments.length; i < length; i++) {
  var lambda = arguments[i];
  try {
  returnValue = lambda();
  break;
  } catch (e) { }
 }

 return returnValue;
 }
};

RegExp.prototype.match = RegExp.prototype.test;

RegExp.escape = function(str) {
 return String(str).replace(/([.*+?^=!:${}()|[\]\/\\])/g, '\\$1');
};

/*--------------------------------------------------------------------------*/

var PeriodicalExecuter = Class.create({
 initialize: function(callback, frequency) {
 this.callback = callback;
 this.frequency = frequency;
 this.currentlyExecuting = false;

 this.registerCallback();
 },

 registerCallback: function() {
 this.timer = setInterval(this.onTimerEvent.bind(this), this.frequency * 1000);
 },

 execute: function() {
 this.callback(this);
 },

 stop: function() {
 if (!this.timer) return;
 clearInterval(this.timer);
 this.timer = null;
 },

 onTimerEvent: function() {
 if (!this.currentlyExecuting) {
  try {
  this.currentlyExecuting = true;
  this.execute();
  } finally {
  this.currentlyExecuting = false;
  }
 }
 }
});
Object.extend(String, {
 interpret: function(value) {
 return value == null ? '' : String(value);
 },
 specialChar: {
 '\b': '\\b',
 '\t': '\\t',
 '\n': '\\n',
 '\f': '\\f',
 '\r': '\\r',
 '\\': '\\\\'
 }
});

Object.extend(String.prototype, {
 gsub: function(pattern, replacement) {
 var result = '', source = this, match;
 replacement = arguments.callee.prepareReplacement(replacement);

 while (source.length > 0) {
  if (match = source.match(pattern)) {
  result += source.slice(0, match.index);
  result += String.interpret(replacement(match));
  source = source.slice(match.index + match[0].length);
  } else {
  result += source, source = '';
  }
 }
 return result;
 },

 sub: function(pattern, replacement, count) {
 replacement = this.gsub.prepareReplacement(replacement);
 count = Object.isUndefined(count) ? 1 : count;

 return this.gsub(pattern, function(match) {
  if (--count < 0) return match[0];
  return replacement(match);
 });
 },

 scan: function(pattern, iterator) {
 this.gsub(pattern, iterator);
 return String(this);
 },

 truncate: function(length, truncation) {
 length = length || 30;
 truncation = Object.isUndefined(truncation) ? '...' : truncation;
 return this.length > length ?
  this.slice(0, length - truncation.length) + truncation : String(this);
 },

 strip: function() {
 return this.replace(/^\s+/, '').replace(/\s+$/, '');
 },

 stripTags: function() {
 return this.replace(/<\/?[^>]+>/gi, '');
 },

 stripScripts: function() {
 return this.replace(new RegExp(Prototype.ScriptFragment, 'img'), '');
 },

 extractScripts: function() {
 var matchAll = new RegExp(Prototype.ScriptFragment, 'img');
 var matchOne = new RegExp(Prototype.ScriptFragment, 'im');
 return (this.match(matchAll) || []).map(function(scriptTag) {
  return (scriptTag.match(matchOne) || ['', ''])[1];
 });
 },

 evalScripts: function() {
 return this.extractScripts().map(function(script) { return eval(script) });
 },

 escapeHTML: function() {
 var self = arguments.callee;
 self.text.data = this;
 return self.div.innerHTML;
 },

 unescapeHTML: function() {
 var div = new Element('div');
 div.innerHTML = this.stripTags();
 return div.childNodes[0] ? (div.childNodes.length > 1 ?
  $A(div.childNodes).inject('', function(memo, node) { return memo+node.nodeValue }) :
  div.childNodes[0].nodeValue) : '';
 },

 toQueryParams: function(separator) {
 var match = this.strip().match(/([^?#]*)(#.*)?$/);
 if (!match) return { };

 return match[1].split(separator || '&').inject({ }, function(hash, pair) {
  if ((pair = pair.split('='))[0]) {
  var key = decodeURIComponent(pair.shift());
  var value = pair.length > 1 ? pair.join('=') : pair[0];
  if (value != undefined) value = decodeURIComponent(value);

  if (key in hash) {
   if (!Object.isArray(hash[key])) hash[key] = [hash[key]];
   hash[key].push(value);
  }
  else hash[key] = value;
  }
  return hash;
 });
 },

 toArray: function() {
 return this.split('');
 },

 succ: function() {
 return this.slice(0, this.length - 1) +
  String.fromCharCode(this.charCodeAt(this.length - 1) + 1);
 },

 times: function(count) {
 return count < 1 ? '' : new Array(count + 1).join(this);
 },

 camelize: function() {
 var parts = this.split('-'), len = parts.length;
 if (len == 1) return parts[0];

 var camelized = this.charAt(0) == '-'
  ? parts[0].charAt(0).toUpperCase() + parts[0].substring(1)
  : parts[0];

 for (var i = 1; i < len; i++)
  camelized += parts[i].charAt(0).toUpperCase() + parts[i].substring(1);

 return camelized;
 },

 capitalize: function() {
 return this.charAt(0).toUpperCase() + this.substring(1).toLowerCase();
 },

 underscore: function() {
 return this.gsub(/::/, '/').gsub(/([A-Z]+)([A-Z][a-z])/,'#{1}_#{2}').gsub(/([a-z\d])([A-Z])/,'#{1}_#{2}').gsub(/-/,'_').toLowerCase();
 },

 dasherize: function() {
 return this.gsub(/_/,'-');
 },

 inspect: function(useDoubleQuotes) {
 var escapedString = this.gsub(/[\x00-\x1f\\]/, function(match) {
  var character = String.specialChar[match[0]];
  return character ? character : '\\u00' + match[0].charCodeAt().toPaddedString(2, 16);
 });
 if (useDoubleQuotes) return '"' + escapedString.replace(/"/g, '\\"') + '"';
 return "'" + escapedString.replace(/'/g, '\\\'') + "'";
 },

 toJSON: function() {
 return this.inspect(true);
 },

 unfilterJSON: function(filter) {
 return this.sub(filter || Prototype.JSONFilter, '#{1}');
 },

 isJSON: function() {
 var str = this;
 if (str.blank()) return false;
 str = this.replace(/\\./g, '@').replace(/"[^"\\\n\r]*"/g, '');
 return (/^[,:{}\[\]0-9.\-+Eaeflnr-u \n\r\t]*$/).test(str);
 },

 evalJSON: function(sanitize) {
 var json = this.unfilterJSON();
 try {
  if (!sanitize || json.isJSON()) return eval('(' + json + ')');
 } catch (e) { }
 throw new SyntaxError('Badly formed JSON string: ' + this.inspect());
 },

 include: function(pattern) {
 return this.indexOf(pattern) > -1;
 },

 startsWith: function(pattern) {
 return this.indexOf(pattern) === 0;
 },

 endsWith: function(pattern) {
 var d = this.length - pattern.length;
 return d >= 0 && this.lastIndexOf(pattern) === d;
 },

 empty: function() {
 return this == '';
 },

 blank: function() {
 return /^\s*$/.test(this);
 },

 interpolate: function(object, pattern) {
 return new Template(this, pattern).evaluate(object);
 }
});

if (Prototype.Browser.WebKit || Prototype.Browser.IE) Object.extend(String.prototype, {
 escapeHTML: function() {
 return this.replace(/&/g,'&amp;').replace(/</g,'&lt;').replace(/>/g,'&gt;');
 },
 unescapeHTML: function() {
 return this.replace(/&amp;/g,'&').replace(/&lt;/g,'<').replace(/&gt;/g,'>');
 }
});

String.prototype.gsub.prepareReplacement = function(replacement) {
 if (Object.isFunction(replacement)) return replacement;
 var template = new Template(replacement);
 return function(match) { return template.evaluate(match) };
};

String.prototype.parseQuery = String.prototype.toQueryParams;

Object.extend(String.prototype.escapeHTML, {
 div: document.createElement('div'),
 text: document.createTextNode('')
});

with (String.prototype.escapeHTML) div.appendChild(text);

var Template = Class.create({
 initialize: function(template, pattern) {
 this.template = template.toString();
 this.pattern = pattern || Template.Pattern;
 },

 evaluate: function(object) {
 if (Object.isFunction(object.toTemplateReplacements))
  object = object.toTemplateReplacements();

 return this.template.gsub(this.pattern, function(match) {
  if (object == null) return '';

  var before = match[1] || '';
  if (before == '\\') return match[2];

  var ctx = object, expr = match[3];
  var pattern = /^([^.[]+|\[((?:.*?[^\\])?)\])(\.|\[|$)/;
  match = pattern.exec(expr);
  if (match == null) return before;

  while (match != null) {
  var comp = match[1].startsWith('[') ? match[2].gsub('\\\\]', ']') : match[1];
  ctx = ctx[comp];
  if (null == ctx || '' == match[3]) break;
  expr = expr.substring('[' == match[3] ? match[1].length : match[0].length);
  match = pattern.exec(expr);
  }

  return before + String.interpret(ctx);
 });
 }
});
Template.Pattern = /(^|.|\r|\n)(#\{(.*?)\})/;

var $break = { };

var Enumerable = {
 each: function(iterator, context) {
 var index = 0;
 iterator = iterator.bind(context);
 try {
  this._each(function(value) {
  iterator(value, index++);
  });
 } catch (e) {
  if (e != $break) throw e;
 }
 return this;
 },

 eachSlice: function(number, iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var index = -number, slices = [], array = this.toArray();
 while ((index += number) < array.length)
  slices.push(array.slice(index, index+number));
 return slices.collect(iterator, context);
 },

 all: function(iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var result = true;
 this.each(function(value, index) {
  result = result && !!iterator(value, index);
  if (!result) throw $break;
 });
 return result;
 },

 any: function(iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var result = false;
 this.each(function(value, index) {
  if (result = !!iterator(value, index))
  throw $break;
 });
 return result;
 },

 collect: function(iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var results = [];
 this.each(function(value, index) {
  results.push(iterator(value, index));
 });
 return results;
 },

 detect: function(iterator, context) {
 iterator = iterator.bind(context);
 var result;
 this.each(function(value, index) {
  if (iterator(value, index)) {
  result = value;
  throw $break;
  }
 });
 return result;
 },

 findAll: function(iterator, context) {
 iterator = iterator.bind(context);
 var results = [];
 this.each(function(value, index) {
  if (iterator(value, index))
  results.push(value);
 });
 return results;
 },

 grep: function(filter, iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var results = [];

 if (Object.isString(filter))
  filter = new RegExp(filter);

 this.each(function(value, index) {
  if (filter.match(value))
  results.push(iterator(value, index));
 });
 return results;
 },

 include: function(object) {
 if (Object.isFunction(this.indexOf))
  if (this.indexOf(object) != -1) return true;

 var found = false;
 this.each(function(value) {
  if (value == object) {
  found = true;
  throw $break;
  }
 });
 return found;
 },

 inGroupsOf: function(number, fillWith) {
 fillWith = Object.isUndefined(fillWith) ? null : fillWith;
 return this.eachSlice(number, function(slice) {
  while(slice.length < number) slice.push(fillWith);
  return slice;
 });
 },

 inject: function(memo, iterator, context) {
 iterator = iterator.bind(context);
 this.each(function(value, index) {
  memo = iterator(memo, value, index);
 });
 return memo;
 },

 invoke: function(method) {
 var args = $A(arguments).slice(1);
 return this.map(function(value) {
  return value[method].apply(value, args);
 });
 },

 max: function(iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var result;
 this.each(function(value, index) {
  value = iterator(value, index);
  if (result == null || value >= result)
  result = value;
 });
 return result;
 },

 min: function(iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var result;
 this.each(function(value, index) {
  value = iterator(value, index);
  if (result == null || value < result)
  result = value;
 });
 return result;
 },

 partition: function(iterator, context) {
 iterator = iterator ? iterator.bind(context) : Prototype.K;
 var trues = [], falses = [];
 this.each(function(value, index) {
  (iterator(value, index) ?
  trues : falses).push(value);
 });
 return [trues, falses];
 },

 pluck: function(property) {
 var results = [];
 this.each(function(value) {
  results.push(value[property]);
 });
 return results;
 },

 reject: function(iterator, context) {
 iterator = iterator.bind(context);
 var results = [];
 this.each(function(value, index) {
  if (!iterator(value, index))
  results.push(value);
 });
 return results;
 },

 sortBy: function(iterator, context) {
 iterator = iterator.bind(context);
 return this.map(function(value, index) {
  return {value: value, criteria: iterator(value, index)};
 }).sort(function(left, right) {
  var a = left.criteria, b = right.criteria;
  return a < b ? -1 : a > b ? 1 : 0;
 }).pluck('value');
 },

 toArray: function() {
 return this.map();
 },

 zip: function() {
 var iterator = Prototype.K, args = $A(arguments);
 if (Object.isFunction(args.last()))
  iterator = args.pop();

 var collections = [this].concat(args).map($A);
 return this.map(function(value, index) {
  return iterator(collections.pluck(index));
 });
 },

 size: function() {
 return this.toArray().length;
 },

 inspect: function() {
 return '#<Enumerable:' + this.toArray().inspect() + '>';
 }
};

Object.extend(Enumerable, {
 map:  Enumerable.collect,
 find: Enumerable.detect,
 select: Enumerable.findAll,
 filter: Enumerable.findAll,
 member: Enumerable.include,
 entries: Enumerable.toArray,
 every: Enumerable.all,
 some: Enumerable.any
});
function $A(iterable) {
 if (!iterable) return [];
 if (iterable.toArray) return iterable.toArray();
 var length = iterable.length || 0, results = new Array(length);
 while (length--) results[length] = iterable[length];
 return results;
}

if (Prototype.Browser.WebKit) {
 $A = function(iterable) {
 if (!iterable) return [];
 if (!(Object.isFunction(iterable) && iterable == '[object NodeList]') &&
  iterable.toArray) return iterable.toArray();
 var length = iterable.length || 0, results = new Array(length);
 while (length--) results[length] = iterable[length];
 return results;
 };
}

Array.from = $A;

Object.extend(Array.prototype, Enumerable);

if (!Array.prototype._reverse) Array.prototype._reverse = Array.prototype.reverse;

Object.extend(Array.prototype, {
 _each: function(iterator) {
 for (var i = 0, length = this.length; i < length; i++)
  iterator(this[i]);
 },

 clear: function() {
 this.length = 0;
 return this;
 },

 first: function() {
 return this[0];
 },

 last: function() {
 return this[this.length - 1];
 },

 compact: function() {
 return this.select(function(value) {
  return value != null;
 });
 },

 flatten: function() {
 return this.inject([], function(array, value) {
  return array.concat(Object.isArray(value) ?
  value.flatten() : [value]);
 });
 },

 without: function() {
 var values = $A(arguments);
 return this.select(function(value) {
  return !values.include(value);
 });
 },

 reverse: function(inline) {
 return (inline !== false ? this : this.toArray())._reverse();
 },

 reduce: function() {
 return this.length > 1 ? this : this[0];
 },

 uniq: function(sorted) {
 return this.inject([], function(array, value, index) {
  if (0 == index || (sorted ? array.last() != value : !array.include(value)))
  array.push(value);
  return array;
 });
 },

 intersect: function(array) {
 return this.uniq().findAll(function(item) {
  return array.detect(function(value) { return item === value });
 });
 },

 clone: function() {
 return [].concat(this);
 },

 size: function() {
 return this.length;
 },

 inspect: function() {
 return '[' + this.map(Object.inspect).join(', ') + ']';
 },

 toJSON: function() {
 var results = [];
 this.each(function(object) {
  var value = Object.toJSON(object);
  if (!Object.isUndefined(value)) results.push(value);
 });
 return '[' + results.join(', ') + ']';
 }
});

// use native browser JS 1.6 implementation if available
if (Object.isFunction(Array.prototype.forEach))
 Array.prototype._each = Array.prototype.forEach;

if (!Array.prototype.indexOf) Array.prototype.indexOf = function(item, i) {
 i || (i = 0);
 var length = this.length;
 if (i < 0) i = length + i;
 for (; i < length; i++)
 if (this[i] === item) return i;
 return -1;
};

if (!Array.prototype.lastIndexOf) Array.prototype.lastIndexOf = function(item, i) {
 i = isNaN(i) ? this.length : (i < 0 ? this.length + i : i) + 1;
 var n = this.slice(0, i).reverse().indexOf(item);
 return (n < 0) ? n : i - n - 1;
};

Array.prototype.toArray = Array.prototype.clone;

function $w(string) {
 if (!Object.isString(string)) return [];
 string = string.strip();
 return string ? string.split(/\s+/) : [];
}

if (Prototype.Browser.Opera){
 Array.prototype.concat = function() {
 var array = [];
 for (var i = 0, length = this.length; i < length; i++) array.push(this[i]);
 for (var i = 0, length = arguments.length; i < length; i++) {
  if (Object.isArray(arguments[i])) {
  for (var j = 0, arrayLength = arguments[i].length; j < arrayLength; j++)
   array.push(arguments[i][j]);
  } else {
  array.push(arguments[i]);
  }
 }
 return array;
 };
}
Object.extend(Number.prototype, {
 toColorPart: function() {
 return this.toPaddedString(2, 16);
 },

 succ: function() {
 return this + 1;
 },

 times: function(iterator) {
 $R(0, this, true).each(iterator);
 return this;
 },

 toPaddedString: function(length, radix) {
 var string = this.toString(radix || 10);
 return '0'.times(length - string.length) + string;
 },

 toJSON: function() {
 return isFinite(this) ? this.toString() : 'null';
 }
});

$w('abs round ceil floor').each(function(method){
 Number.prototype[method] = Math[method].methodize();
});
function $H(object) {
 return new Hash(object);
};

var Hash = Class.create(Enumerable, (function() {

 function toQueryPair(key, value) {
 if (Object.isUndefined(value)) return key;
 return key + '=' + encodeURIComponent(String.interpret(value));
 }

 return {
 initialize: function(object) {
  this._object = Object.isHash(object) ? object.toObject() : Object.clone(object);
 },

 _each: function(iterator) {
  for (var key in this._object) {
  var value = this._object[key], pair = [key, value];
  pair.key = key;
  pair.value = value;
  iterator(pair);
  }
 },

 set: function(key, value) {
  return this._object[key] = value;
 },

 get: function(key) {
  return this._object[key];
 },

 unset: function(key) {
  var value = this._object[key];
  delete this._object[key];
  return value;
 },

 toObject: function() {
  return Object.clone(this._object);
 },

 keys: function() {
  return this.pluck('key');
 },

 values: function() {
  return this.pluck('value');
 },

 index: function(value) {
  var match = this.detect(function(pair) {
  return pair.value === value;
  });
  return match && match.key;
 },

 merge: function(object) {
  return this.clone().update(object);
 },

 update: function(object) {
  return new Hash(object).inject(this, function(result, pair) {
  result.set(pair.key, pair.value);
  return result;
  });
 },

 toQueryString: function() {
  return this.map(function(pair) {
  var key = encodeURIComponent(pair.key), values = pair.value;

  if (values && typeof values == 'object') {
   if (Object.isArray(values))
   return values.map(toQueryPair.curry(key)).join('&');
  }
  return toQueryPair(key, values);
  }).join('&');
 },

 inspect: function() {
  return '#<Hash:{' + this.map(function(pair) {
  return pair.map(Object.inspect).join(': ');
  }).join(', ') + '}>';
 },

 toJSON: function() {
  return Object.toJSON(this.toObject());
 },

 clone: function() {
  return new Hash(this);
 }
 }
})());

Hash.prototype.toTemplateReplacements = Hash.prototype.toObject;
Hash.from = $H;
var ObjectRange = Class.create(Enumerable, {
 initialize: function(start, end, exclusive) {
 this.start = start;
 this.end = end;
 this.exclusive = exclusive;
 },

 _each: function(iterator) {
 var value = this.start;
 while (this.include(value)) {
  iterator(value);
  value = value.succ();
 }
 },

 include: function(value) {
 if (value < this.start)
  return false;
 if (this.exclusive)
  return value < this.end;
 return value <= this.end;
 }
});

var $R = function(start, end, exclusive) {
 return new ObjectRange(start, end, exclusive);
};

var Ajax = {
 getTransport: function() {
 return Try.these(
  function() {return new XMLHttpRequest()},
  function() {return new ActiveXObject('Msxml2.XMLHTTP')},
  function() {return new ActiveXObject('Microsoft.XMLHTTP')}
 ) || false;
 },

 activeRequestCount: 0
};

Ajax.Responders = {
 responders: [],

 _each: function(iterator) {
 this.responders._each(iterator);
 },

 register: function(responder) {
 if (!this.include(responder))
  this.responders.push(responder);
 },

 unregister: function(responder) {
 this.responders = this.responders.without(responder);
 },

 dispatch: function(callback, request, transport, json) {
 this.each(function(responder) {
  if (Object.isFunction(responder[callback])) {
  try {
   responder[callback].apply(responder, [request, transport, json]);
  } catch (e) { }
  }
 });
 }
};

Object.extend(Ajax.Responders, Enumerable);

Ajax.Responders.register({
 onCreate: function() { Ajax.activeRequestCount++ },
 onComplete: function() { Ajax.activeRequestCount-- }
});

Ajax.Base = Class.create({
 initialize: function(options) {
 this.options = {
  method:  'post',
  asynchronous: true,
  contentType: 'application/x-www-form-urlencoded',
  encoding:  'UTF-8',
  parameters: '',
  evalJSON:  true,
  evalJS:  true
 };
 Object.extend(this.options, options || { });

 this.options.method = this.options.method.toLowerCase();

 if (Object.isString(this.options.parameters))
  this.options.parameters = this.options.parameters.toQueryParams();
 else if (Object.isHash(this.options.parameters))
  this.options.parameters = this.options.parameters.toObject();
 }
});

Ajax.Request = Class.create(Ajax.Base, {
 _complete: false,

 initialize: function($super, url, options) {
 $super(options);
 this.transport = Ajax.getTransport();
 this.request(url);
 },

 request: function(url) {
 this.url = url;
 this.method = this.options.method;
 var params = Object.clone(this.options.parameters);

 if (!['get', 'post'].include(this.method)) {
  // simulate other verbs over post
  params['_method'] = this.method;
  this.method = 'post';
 }

 this.parameters = params;

 if (params = Object.toQueryString(params)) {
  // when GET, append parameters to URL
  if (this.method == 'get')
  this.url += (this.url.include('?') ? '&' : '?') + params;
  else if (/Konqueror|Safari|KHTML/.test(navigator.userAgent))
  params += '&_=';
 }

 try {
  var response = new Ajax.Response(this);
  if (this.options.onCreate) this.options.onCreate(response);
  Ajax.Responders.dispatch('onCreate', this, response);

  this.transport.open(this.method.toUpperCase(), this.url,
  this.options.asynchronous);

  if (this.options.asynchronous) this.respondToReadyState.bind(this).defer(1);

  this.transport.onreadystatechange = this.onStateChange.bind(this);
  this.setRequestHeaders();

  this.body = this.method == 'post' ? (this.options.postBody || params) : null;
  this.transport.send(this.body);

  /* Force Firefox to handle ready state 4 for synchronous requests */
  if (!this.options.asynchronous && this.transport.overrideMimeType)
  this.onStateChange();

 }
 catch (e) {
  this.dispatchException(e);
 }
 },

 onStateChange: function() {
 var readyState = this.transport.readyState;
 if (readyState > 1 && !((readyState == 4) && this._complete))
  this.respondToReadyState(this.transport.readyState);
 },

 setRequestHeaders: function() {
 var headers = {
  'X-Requested-With': 'XMLHttpRequest',
  'X-Prototype-Version': Prototype.Version,
  'Accept': 'text/javascript, text/html, application/xml, text/xml, */*'
 };

 if (this.method == 'post') {
  headers['Content-type'] = this.options.contentType +
  (this.options.encoding ? '; charset=' + this.options.encoding : '');

  /* Force "Connection: close" for older Mozilla browsers to work
  * around a bug where XMLHttpRequest sends an incorrect
  * Content-length header. See Mozilla Bugzilla #246651.
  */
  if (this.transport.overrideMimeType &&
   (navigator.userAgent.match(/Gecko\/(\d{4})/) || [0,2005])[1] < 2005)
   headers['Connection'] = 'close';
 }

 // user-defined headers
 if (typeof this.options.requestHeaders == 'object') {
  var extras = this.options.requestHeaders;

  if (Object.isFunction(extras.push))
  for (var i = 0, length = extras.length; i < length; i += 2)
   headers[extras[i]] = extras[i+1];
  else
  $H(extras).each(function(pair) { headers[pair.key] = pair.value });
 }

 for (var name in headers)
  this.transport.setRequestHeader(name, headers[name]);
 },

 success: function() {
 var status = this.getStatus();
 return !status || (status >= 200 && status < 300);
 },

 getStatus: function() {
 try {
  return this.transport.status || 0;
 } catch (e) { return 0 }
 },

 respondToReadyState: function(readyState) {
 var state = Ajax.Request.Events[readyState], response = new Ajax.Response(this);

 if (state == 'Complete') {
  try {
  this._complete = true;
  (this.options['on' + response.status]
   || this.options['on' + (this.success() ? 'Success' : 'Failure')]
   || Prototype.emptyFunction)(response, response.headerJSON);
  } catch (e) {
  this.dispatchException(e);
  }

  var contentType = response.getHeader('Content-type');
  if (this.options.evalJS == 'force'
   || (this.options.evalJS && this.isSameOrigin() && contentType
   && contentType.match(/^\s*(text|application)\/(x-)?(java|ecma)script(;.*)?\s*$/i)))
  this.evalResponse();
 }

 try {
  (this.options['on' + state] || Prototype.emptyFunction)(response, response.headerJSON);
  Ajax.Responders.dispatch('on' + state, this, response, response.headerJSON);
 } catch (e) {
  this.dispatchException(e);
 }

 if (state == 'Complete') {
  // avoid memory leak in MSIE: clean up
  this.transport.onreadystatechange = Prototype.emptyFunction;
 }
 },

 isSameOrigin: function() {
 var m = this.url.match(/^\s*https?:\/\/[^\/]*/);
 return !m || (m[0] == '#{protocol}//#{domain}#{port}'.interpolate({
  protocol: location.protocol,
  domain: document.domain,
  port: location.port ? ':' + location.port : ''
 }));
 },

 getHeader: function(name) {
 try {
  return this.transport.getResponseHeader(name) || null;
 } catch (e) { return null }
 },

 evalResponse: function() {
 try {
  return eval((this.transport.responseText || '').unfilterJSON());
 } catch (e) {
  this.dispatchException(e);
 }
 },

 dispatchException: function(exception) {
 (this.options.onException || Prototype.emptyFunction)(this, exception);
 Ajax.Responders.dispatch('onException', this, exception);
 }
});

Ajax.Request.Events =
 ['Uninitialized', 'Loading', 'Loaded', 'Interactive', 'Complete'];

Ajax.Response = Class.create({
 initialize: function(request){
 this.request = request;
 var transport = this.transport = request.transport,
  readyState = this.readyState = transport.readyState;

 if((readyState > 2 && !Prototype.Browser.IE) || readyState == 4) {
  this.status  = this.getStatus();
  this.statusText = this.getStatusText();
  this.responseText = String.interpret(transport.responseText);
  this.headerJSON = this._getHeaderJSON();
 }

 if(readyState == 4) {
  var xml = transport.responseXML;
  this.responseXML = Object.isUndefined(xml) ? null : xml;
  this.responseJSON = this._getResponseJSON();
 }
 },

 status:  0,
 statusText: '',

 getStatus: Ajax.Request.prototype.getStatus,

 getStatusText: function() {
 try {
  return this.transport.statusText || '';
 } catch (e) { return '' }
 },

 getHeader: Ajax.Request.prototype.getHeader,

 getAllHeaders: function() {
 try {
  return this.getAllResponseHeaders();
 } catch (e) { return null }
 },

 getResponseHeader: function(name) {
 return this.transport.getResponseHeader(name);
 },

 getAllResponseHeaders: function() {
 return this.transport.getAllResponseHeaders();
 },

 _getHeaderJSON: function() {
 var json = this.getHeader('X-JSON');
 if (!json) return null;
 json = decodeURIComponent(escape(json));
 try {
  return json.evalJSON(this.request.options.sanitizeJSON ||
  !this.request.isSameOrigin());
 } catch (e) {
  this.request.dispatchException(e);
 }
 },

 _getResponseJSON: function() {
 var options = this.request.options;
 if (!options.evalJSON || (options.evalJSON != 'force' &&
  !(this.getHeader('Content-type') || '').include('application/json')) ||
  this.responseText.blank())
   return null;
 try {
  return this.responseText.evalJSON(options.sanitizeJSON ||
  !this.request.isSameOrigin());
 } catch (e) {
  this.request.dispatchException(e);
 }
 }
});

Ajax.Updater = Class.create(Ajax.Request, {
 initialize: function($super, container, url, options) {
 this.container = {
  success: (container.success || container),
  failure: (container.failure || (container.success ? null : container))
 };

 options = Object.clone(options);
 var onComplete = options.onComplete;
 options.onComplete = (function(response, json) {
  this.updateContent(response.responseText);
  if (Object.isFunction(onComplete)) onComplete(response, json);
 }).bind(this);

 $super(url, options);
 },

 updateContent: function(responseText) {
 var receiver = this.container[this.success() ? 'success' : 'failure'],
  options = this.options;

 if (!options.evalScripts) responseText = responseText.stripScripts();

 if (receiver = $(receiver)) {
  if (options.insertion) {
  if (Object.isString(options.insertion)) {
   var insertion = { }; insertion[options.insertion] = responseText;
   receiver.insert(insertion);
  }
  else options.insertion(receiver, responseText);
  }
  else receiver.update(responseText);
 }
 }
});

Ajax.PeriodicalUpdater = Class.create(Ajax.Base, {
 initialize: function($super, container, url, options) {
 $super(options);
 this.onComplete = this.options.onComplete;

 this.frequency = (this.options.frequency || 2);
 this.decay = (this.options.decay || 1);

 this.updater = { };
 this.container = container;
 this.url = url;

 this.start();
 },

 start: function() {
 this.options.onComplete = this.updateComplete.bind(this);
 this.onTimerEvent();
 },

 stop: function() {
 this.updater.options.onComplete = undefined;
 clearTimeout(this.timer);
 (this.onComplete || Prototype.emptyFunction).apply(this, arguments);
 },

 updateComplete: function(response) {
 if (this.options.decay) {
  this.decay = (response.responseText == this.lastText ?
  this.decay * this.options.decay : 1);

  this.lastText = response.responseText;
 }
 this.timer = this.onTimerEvent.bind(this).delay(this.decay * this.frequency);
 },

 onTimerEvent: function() {
 this.updater = new Ajax.Updater(this.container, this.url, this.options);
 }
});
function $(element) {
 if (arguments.length > 1) {
 for (var i = 0, elements = [], length = arguments.length; i < length; i++)
  elements.push($(arguments[i]));
 return elements;
 }
 if (Object.isString(element))
 element = document.getElementById(element);
 return Element.extend(element);
}

if (Prototype.BrowserFeatures.XPath) {
 document._getElementsByXPath = function(expression, parentElement) {
 var results = [];
 var query = document.evaluate(expression, $(parentElement) || document,
  null, XPathResult.ORDERED_NODE_SNAPSHOT_TYPE, null);
 for (var i = 0, length = query.snapshotLength; i < length; i++)
  results.push(Element.extend(query.snapshotItem(i)));
 return results;
 };
}

/*--------------------------------------------------------------------------*/

if (!window.Node) var Node = { };

if (!Node.ELEMENT_NODE) {
 // DOM level 2 ECMAScript Language Binding
 Object.extend(Node, {
 ELEMENT_NODE: 1,
 ATTRIBUTE_NODE: 2,
 TEXT_NODE: 3,
 CDATA_SECTION_NODE: 4,
 ENTITY_REFERENCE_NODE: 5,
 ENTITY_NODE: 6,
 PROCESSING_INSTRUCTION_NODE: 7,
 COMMENT_NODE: 8,
 DOCUMENT_NODE: 9,
 DOCUMENT_TYPE_NODE: 10,
 DOCUMENT_FRAGMENT_NODE: 11,
 NOTATION_NODE: 12
 });
}

(function() {
 var element = this.Element;
 this.Element = function(tagName, attributes) {
 attributes = attributes || { };
 tagName = tagName.toLowerCase();
 var cache = Element.cache;
 if (Prototype.Browser.IE && attributes.name) {
  tagName = '<' + tagName + ' name="' + attributes.name + '">';
  delete attributes.name;
  return Element.writeAttribute(document.createElement(tagName), attributes);
 }
 if (!cache[tagName]) cache[tagName] = Element.extend(document.createElement(tagName));
 return Element.writeAttribute(cache[tagName].cloneNode(false), attributes);
 };
 Object.extend(this.Element, element || { });
}).call(window);

Element.cache = { };

Element.Methods = {
 visible: function(element) {
 return $(element).style.display != 'none';
 },

 toggle: function(element) {
 element = $(element);
 Element[Element.visible(element) ? 'hide' : 'show'](element);
 return element;
 },

 hide: function(element) {
 $(element).style.display = 'none';
 return element;
 },

 show: function(element) {
 $(element).style.display = '';
 return element;
 },

 remove: function(element) {
 element = $(element);
 element.parentNode.removeChild(element);
 return element;
 },

 update: function(element, content) {
 element = $(element);
 if (content && content.toElement) content = content.toElement();
 if (Object.isElement(content)) return element.update().insert(content);
 content = Object.toHTML(content);
 element.innerHTML = content.stripScripts();
 content.evalScripts.bind(content).defer();
 return element;
 },

 replace: function(element, content) {
 element = $(element);
 if (content && content.toElement) content = content.toElement();
 else if (!Object.isElement(content)) {
  content = Object.toHTML(content);
  var range = element.ownerDocument.createRange();
  range.selectNode(element);
  content.evalScripts.bind(content).defer();
  content = range.createContextualFragment(content.stripScripts());
 }
 element.parentNode.replaceChild(content, element);
 return element;
 },

 insert: function(element, insertions) {
 element = $(element);

 if (Object.isString(insertions) || Object.isNumber(insertions) ||
  Object.isElement(insertions) || (insertions && (insertions.toElement || insertions.toHTML)))
   insertions = {bottom:insertions};

 var content, insert, tagName, childNodes;

 for (var position in insertions) {
  content = insertions[position];
  position = position.toLowerCase();
  insert = Element._insertionTranslations[position];

  if (content && content.toElement) content = content.toElement();
  if (Object.isElement(content)) {
  insert(element, content);
  continue;
  }

  content = Object.toHTML(content);

  tagName = ((position == 'before' || position == 'after')
  ? element.parentNode : element).tagName.toUpperCase();

  childNodes = Element._getContentFromAnonymousElement(tagName, content.stripScripts());

  if (position == 'top' || position == 'after') childNodes.reverse();
  childNodes.each(insert.curry(element));

  content.evalScripts.bind(content).defer();
 }

 return element;
 },

 wrap: function(element, wrapper, attributes) {
 element = $(element);
 if (Object.isElement(wrapper))
  $(wrapper).writeAttribute(attributes || { });
 else if (Object.isString(wrapper)) wrapper = new Element(wrapper, attributes);
 else wrapper = new Element('div', wrapper);
 if (element.parentNode)
  element.parentNode.replaceChild(wrapper, element);
 wrapper.appendChild(element);
 return wrapper;
 },

 inspect: function(element) {
 element = $(element);
 var result = '<' + element.tagName.toLowerCase();
 $H({'id': 'id', 'className': 'class'}).each(function(pair) {
  var property = pair.first(), attribute = pair.last();
  var value = (element[property] || '').toString();
  if (value) result += ' ' + attribute + '=' + value.inspect(true);
 });
 return result + '>';
 },

 recursivelyCollect: function(element, property) {
 element = $(element);
 var elements = [];
 while (element = element[property])
  if (element.nodeType == 1)
  elements.push(Element.extend(element));
 return elements;
 },

 ancestors: function(element) {
 return $(element).recursivelyCollect('parentNode');
 },

 descendants: function(element) {
 return $(element).select("*");
 },

 firstDescendant: function(element) {
 element = $(element).firstChild;
 while (element && element.nodeType != 1) element = element.nextSibling;
 return $(element);
 },

 immediateDescendants: function(element) {
 if (!(element = $(element).firstChild)) return [];
 while (element && element.nodeType != 1) element = element.nextSibling;
 if (element) return [element].concat($(element).nextSiblings());
 return [];
 },

 previousSiblings: function(element) {
 return $(element).recursivelyCollect('previousSibling');
 },

 nextSiblings: function(element) {
 return $(element).recursivelyCollect('nextSibling');
 },

 siblings: function(element) {
 element = $(element);
 return element.previousSiblings().reverse().concat(element.nextSiblings());
 },

 match: function(element, selector) {
 if (Object.isString(selector))
  selector = new Selector(selector);
 return selector.match($(element));
 },

 up: function(element, expression, index) {
 element = $(element);
 if (arguments.length == 1) return $(element.parentNode);
 var ancestors = element.ancestors();
 return Object.isNumber(expression) ? ancestors[expression] :
  Selector.findElement(ancestors, expression, index);
 },

 down: function(element, expression, index) {
 element = $(element);
 if (arguments.length == 1) return element.firstDescendant();
 return Object.isNumber(expression) ? element.descendants()[expression] :
  element.select(expression)[index || 0];
 },

 previous: function(element, expression, index) {
 element = $(element);
 if (arguments.length == 1) return $(Selector.handlers.previousElementSibling(element));
 var previousSiblings = element.previousSiblings();
 return Object.isNumber(expression) ? previousSiblings[expression] :
  Selector.findElement(previousSiblings, expression, index);
 },

 next: function(element, expression, index) {
 element = $(element);
 if (arguments.length == 1) return $(Selector.handlers.nextElementSibling(element));
 var nextSiblings = element.nextSiblings();
 return Object.isNumber(expression) ? nextSiblings[expression] :
  Selector.findElement(nextSiblings, expression, index);
 },

 select: function() {
 var args = $A(arguments), element = $(args.shift());
 return Selector.findChildElements(element, args);
 },

 adjacent: function() {
 var args = $A(arguments), element = $(args.shift());
 return Selector.findChildElements(element.parentNode, args).without(element);
 },

 identify: function(element) {
 element = $(element);
 var id = element.readAttribute('id'), self = arguments.callee;
 if (id) return id;
 do { id = 'anonymous_element_' + self.counter++ } while ($(id));
 element.writeAttribute('id', id);
 return id;
 },

 readAttribute: function(element, name) {
 element = $(element);
 if (Prototype.Browser.IE) {
  var t = Element._attributeTranslations.read;
  if (t.values[name]) return t.values[name](element, name);
  if (t.names[name]) name = t.names[name];
  if (name.include(':')) {
  return (!element.attributes || !element.attributes[name]) ? null :
   element.attributes[name].value;
  }
 }
 return element.getAttribute(name);
 },

 writeAttribute: function(element, name, value) {
 element = $(element);
 var attributes = { }, t = Element._attributeTranslations.write;

 if (typeof name == 'object') attributes = name;
 else attributes[name] = Object.isUndefined(value) ? true : value;

 for (var attr in attributes) {
  name = t.names[attr] || attr;
  value = attributes[attr];
  if (t.values[attr]) name = t.values[attr](element, value);
  if (value === false || value === null)
  element.removeAttribute(name);
  else if (value === true)
  element.setAttribute(name, name);
  else element.setAttribute(name, value);
 }
 return element;
 },

 getHeight: function(element) {
 return $(element).getDimensions().height;
 },

 getWidth: function(element) {
 return $(element).getDimensions().width;
 },

 classNames: function(element) {
 return new Element.ClassNames(element);
 },

 hasClassName: function(element, className) {
 if (!(element = $(element))) return;
 var elementClassName = element.className;
 return (elementClassName.length > 0 && (elementClassName == className ||
  new RegExp("(^|\\s)" + className + "(\\s|$)").test(elementClassName)));
 },

 addClassName: function(element, className) {
 if (!(element = $(element))) return;
 if (!element.hasClassName(className))
  element.className += (element.className ? ' ' : '') + className;
 return element;
 },

 removeClassName: function(element, className) {
 if (!(element = $(element))) return;
 element.className = element.className.replace(
  new RegExp("(^|\\s+)" + className + "(\\s+|$)"), ' ').strip();
 return element;
 },

 toggleClassName: function(element, className) {
 if (!(element = $(element))) return;
 return element[element.hasClassName(className) ?
  'removeClassName' : 'addClassName'](className);
 },

 // removes whitespace-only text node children
 cleanWhitespace: function(element) {
 element = $(element);
 var node = element.firstChild;
 while (node) {
  var nextNode = node.nextSibling;
  if (node.nodeType == 3 && !/\S/.test(node.nodeValue))
  element.removeChild(node);
  node = nextNode;
 }
 return element;
 },

 empty: function(element) {
 return $(element).innerHTML.blank();
 },

 descendantOf: function(element, ancestor) {
 element = $(element), ancestor = $(ancestor);
 var originalAncestor = ancestor;

 if (element.compareDocumentPosition)
  return (element.compareDocumentPosition(ancestor) & 8) === 8;

 if (element.sourceIndex && !Prototype.Browser.Opera) {
  var e = element.sourceIndex, a = ancestor.sourceIndex,
  nextAncestor = ancestor.nextSibling;
  if (!nextAncestor) {
  do { ancestor = ancestor.parentNode; }
  while (!(nextAncestor = ancestor.nextSibling) && ancestor.parentNode);
  }
  if (nextAncestor && nextAncestor.sourceIndex)
  return (e > a && e < nextAncestor.sourceIndex);
 }

 while (element = element.parentNode)
  if (element == originalAncestor) return true;
 return false;
 },

 scrollTo: function(element) {
 element = $(element);
 var pos = element.cumulativeOffset();
 window.scrollTo(pos[0], pos[1]);
 return element;
 },

 getStyle: function(element, style) {
 element = $(element);
 style = style == 'float' ? 'cssFloat' : style.camelize();
 var value = element.style[style];
 if (!value) {
  var css = document.defaultView.getComputedStyle(element, null);
  value = css ? css[style] : null;
 }
 if (style == 'opacity') return value ? parseFloat(value) : 1.0;
 return value == 'auto' ? null : value;
 },

 getOpacity: function(element) {
 return $(element).getStyle('opacity');
 },

 setStyle: function(element, styles) {
 element = $(element);
 var elementStyle = element.style, match;
 if (Object.isString(styles)) {
  element.style.cssText += ';' + styles;
  return styles.include('opacity') ?
  element.setOpacity(styles.match(/opacity:\s*(\d?\.?\d*)/)[1]) : element;
 }
 for (var property in styles)
  if (property == 'opacity') element.setOpacity(styles[property]);
  else
  elementStyle[(property == 'float' || property == 'cssFloat') ?
   (Object.isUndefined(elementStyle.styleFloat) ? 'cssFloat' : 'styleFloat') :
   property] = styles[property];

 return element;
 },

 setOpacity: function(element, value) {
 element = $(element);
 element.style.opacity = (value == 1 || value === '') ? '' :
  (value < 0.00001) ? 0 : value;
 return element;
 },

 getDimensions: function(element) {
 element = $(element);
 var display = $(element).getStyle('display');
 if (display != 'none' && display != null) // Safari bug
  return {width: element.offsetWidth, height: element.offsetHeight};

 // All *Width and *Height properties give 0 on elements with display none,
 // so enable the element temporarily
 var els = element.style;
 var originalVisibility = els.visibility;
 var originalPosition = els.position;
 var originalDisplay = els.display;
 els.visibility = 'hidden';
 els.position = 'absolute';
 els.display = 'block';
 var originalWidth = element.clientWidth;
 var originalHeight = element.clientHeight;
 els.display = originalDisplay;
 els.position = originalPosition;
 els.visibility = originalVisibility;
 return {width: originalWidth, height: originalHeight};
 },

 makePositioned: function(element) {
 element = $(element);
 var pos = Element.getStyle(element, 'position');
 if (pos == 'static' || !pos) {
  element._madePositioned = true;
  element.style.position = 'relative';
  // Opera returns the offset relative to the positioning context, when an
  // element is position relative but top and left have not been defined
  if (window.opera) {
  element.style.top = 0;
  element.style.left = 0;
  }
 }
 return element;
 },

 undoPositioned: function(element) {
 element = $(element);
 if (element._madePositioned) {
  element._madePositioned = undefined;
  element.style.position =
  element.style.top =
  element.style.left =
  element.style.bottom =
  element.style.right = '';
 }
 return element;
 },

 makeClipping: function(element) {
 element = $(element);
 if (element._overflow) return element;
 element._overflow = Element.getStyle(element, 'overflow') || 'auto';
 if (element._overflow !== 'hidden')
  element.style.overflow = 'hidden';
 return element;
 },

 undoClipping: function(element) {
 element = $(element);
 if (!element._overflow) return element;
 element.style.overflow = element._overflow == 'auto' ? '' : element._overflow;
 element._overflow = null;
 return element;
 },

 cumulativeOffset: function(element) {
 var valueT = 0, valueL = 0;
 do {
  valueT += element.offsetTop || 0;
  valueL += element.offsetLeft || 0;
  element = element.offsetParent;
 } while (element);
 return Element._returnOffset(valueL, valueT);
 },

 positionedOffset: function(element) {
 var valueT = 0, valueL = 0;
 do {
  valueT += element.offsetTop || 0;
  valueL += element.offsetLeft || 0;
  element = element.offsetParent;
  if (element) {
  if (element.tagName == 'BODY') break;
  var p = Element.getStyle(element, 'position');
  if (p !== 'static') break;
  }
 } while (element);
 return Element._returnOffset(valueL, valueT);
 },

 absolutize: function(element) {
 element = $(element);
 if (element.getStyle('position') == 'absolute') return;
 // Position.prepare(); // To be done manually by Scripty when it needs it.

 var offsets = element.positionedOffset();
 var top  = offsets[1];
 var left = offsets[0];
 var width = element.clientWidth;
 var height = element.clientHeight;

 element._originalLeft = left - parseFloat(element.style.left || 0);
 element._originalTop = top - parseFloat(element.style.top || 0);
 element._originalWidth = element.style.width;
 element._originalHeight = element.style.height;

 element.style.position = 'absolute';
 element.style.top = top + 'px';
 element.style.left = left + 'px';
 element.style.width = width + 'px';
 element.style.height = height + 'px';
 return element;
 },

 relativize: function(element) {
 element = $(element);
 if (element.getStyle('position') == 'relative') return;
 // Position.prepare(); // To be done manually by Scripty when it needs it.

 element.style.position = 'relative';
 var top = parseFloat(element.style.top || 0) - (element._originalTop || 0);
 var left = parseFloat(element.style.left || 0) - (element._originalLeft || 0);

 element.style.top = top + 'px';
 element.style.left = left + 'px';
 element.style.height = element._originalHeight;
 element.style.width = element._originalWidth;
 return element;
 },

 cumulativeScrollOffset: function(element) {
 var valueT = 0, valueL = 0;
 do {
  valueT += element.scrollTop || 0;
  valueL += element.scrollLeft || 0;
  element = element.parentNode;
 } while (element);
 return Element._returnOffset(valueL, valueT);
 },

 getOffsetParent: function(element) {
 if (element.offsetParent) return $(element.offsetParent);
 if (element == document.body) return $(element);

 while ((element = element.parentNode) && element != document.body)
  if (Element.getStyle(element, 'position') != 'static')
  return $(element);

 return $(document.body);
 },

 viewportOffset: function(forElement) {
 var valueT = 0, valueL = 0;

 var element = forElement;
 do {
  valueT += element.offsetTop || 0;
  valueL += element.offsetLeft || 0;

  // Safari fix
  if (element.offsetParent == document.body &&
  Element.getStyle(element, 'position') == 'absolute') break;

 } while (element = element.offsetParent);

 element = forElement;
 do {
  if (!Prototype.Browser.Opera || element.tagName == 'BODY') {
  valueT -= element.scrollTop || 0;
  valueL -= element.scrollLeft || 0;
  }
 } while (element = element.parentNode);

 return Element._returnOffset(valueL, valueT);
 },

 clonePosition: function(element, source) {
 var options = Object.extend({
  setLeft: true,
  setTop:  true,
  setWidth: true,
  setHeight: true,
  offsetTop: 0,
  offsetLeft: 0
 }, arguments[2] || { });

 // find page position of source
 source = $(source);
 var p = source.viewportOffset();

 // find coordinate system to use
 element = $(element);
 var delta = [0, 0];
 var parent = null;
 // delta [0,0] will do fine with position: fixed elements,
 // position:absolute needs offsetParent deltas
 if (Element.getStyle(element, 'position') == 'absolute') {
  parent = element.getOffsetParent();
  delta = parent.viewportOffset();
 }

 // correct by body offsets (fixes Safari)
 if (parent == document.body) {
  delta[0] -= document.body.offsetLeft;
  delta[1] -= document.body.offsetTop;
 }

 // set position
 if (options.setLeft) element.style.left = (p[0] - delta[0] + options.offsetLeft) + 'px';
 if (options.setTop) element.style.top = (p[1] - delta[1] + options.offsetTop) + 'px';
 if (options.setWidth) element.style.width = source.offsetWidth + 'px';
 if (options.setHeight) element.style.height = source.offsetHeight + 'px';
 return element;
 }
};

Element.Methods.identify.counter = 1;

Object.extend(Element.Methods, {
 getElementsBySelector: Element.Methods.select,
 childElements: Element.Methods.immediateDescendants
});

Element._attributeTranslations = {
 write: {
 names: {
  className: 'class',
  htmlFor: 'for'
 },
 values: { }
 }
};

if (Prototype.Browser.Opera) {
 Element.Methods.getStyle = Element.Methods.getStyle.wrap(
 function(proceed, element, style) {
  switch (style) {
  case 'left': case 'top': case 'right': case 'bottom':
   if (proceed(element, 'position') === 'static') return null;
  case 'height': case 'width':
   // returns '0px' for hidden elements; we want it to return null
   if (!Element.visible(element)) return null;

   // returns the border-box dimensions rather than the content-box
   // dimensions, so we subtract padding and borders from the value
   var dim = parseInt(proceed(element, style), 10);

   if (dim !== element['offset' + style.capitalize()])
   return dim + 'px';

   var properties;
   if (style === 'height') {
   properties = ['border-top-width', 'padding-top',
    'padding-bottom', 'border-bottom-width'];
   }
   else {
   properties = ['border-left-width', 'padding-left',
    'padding-right', 'border-right-width'];
   }
   return properties.inject(dim, function(memo, property) {
   var val = proceed(element, property);
   return val === null ? memo : memo - parseInt(val, 10);
   }) + 'px';
  default: return proceed(element, style);
  }
 }
 );

 Element.Methods.readAttribute = Element.Methods.readAttribute.wrap(
 function(proceed, element, attribute) {
  if (attribute === 'title') return element.title;
  return proceed(element, attribute);
 }
 );
}

else if (Prototype.Browser.IE) {
 // IE doesn't report offsets correctly for static elements, so we change them
 // to "relative" to get the values, then change them back.
 Element.Methods.getOffsetParent = Element.Methods.getOffsetParent.wrap(
 function(proceed, element) {
  element = $(element);
  var position = element.getStyle('position');
  if (position !== 'static') return proceed(element);
  element.setStyle({ position: 'relative' });
  var value = proceed(element);
  element.setStyle({ position: position });
  return value;
 }
 );

 $w('positionedOffset viewportOffset').each(function(method) {
 Element.Methods[method] = Element.Methods[method].wrap(
  function(proceed, element) {
  element = $(element);
  var position = element.getStyle('position');
  if (position !== 'static') return proceed(element);
  // Trigger hasLayout on the offset parent so that IE6 reports
  // accurate offsetTop and offsetLeft values for position: fixed.
  var offsetParent = element.getOffsetParent();
  if (offsetParent && offsetParent.getStyle('position') === 'fixed')
   offsetParent.setStyle({ zoom: 1 });
  element.setStyle({ position: 'relative' });
  var value = proceed(element);
  element.setStyle({ position: position });
  return value;
  }
 );
 });

 Element.Methods.getStyle = function(element, style) {
 element = $(element);
 style = (style == 'float' || style == 'cssFloat') ? 'styleFloat' : style.camelize();
 var value = element.style[style];
 if (!value && element.currentStyle) value = element.currentStyle[style];

 if (style == 'opacity') {
  if (value = (element.getStyle('filter') || '').match(/alpha\(opacity=(.*)\)/))
  if (value[1]) return parseFloat(value[1]) / 100;
  return 1.0;
 }

 if (value == 'auto') {
  if ((style == 'width' || style == 'height') && (element.getStyle('display') != 'none'))
  return element['offset' + style.capitalize()] + 'px';
  return null;
 }
 return value;
 };

 Element.Methods.setOpacity = function(element, value) {
 function stripAlpha(filter){
  return filter.replace(/alpha\([^\)]*\)/gi,'');
 }
 element = $(element);
 var currentStyle = element.currentStyle;
 if ((currentStyle && !currentStyle.hasLayout) ||
  (!currentStyle && element.style.zoom == 'normal'))
  element.style.zoom = 1;

 var filter = element.getStyle('filter'), style = element.style;
 if (value == 1 || value === '') {
  (filter = stripAlpha(filter)) ?
  style.filter = filter : style.removeAttribute('filter');
  return element;
 } else if (value < 0.00001) value = 0;
 style.filter = stripAlpha(filter) +
  'alpha(opacity=' + (value * 100) + ')';
 return element;
 };

 Element._attributeTranslations = {
 read: {
  names: {
  'class': 'className',
  'for': 'htmlFor'
  },
  values: {
  _getAttr: function(element, attribute) {
   return element.getAttribute(attribute, 2);
  },
  _getAttrNode: function(element, attribute) {
   var node = element.getAttributeNode(attribute);
   return node ? node.value : "";
  },
  _getEv: function(element, attribute) {
   attribute = element.getAttribute(attribute);
   return attribute ? attribute.toString().slice(23, -2) : null;
  },
  _flag: function(element, attribute) {
   return $(element).hasAttribute(attribute) ? attribute : null;
  },
  style: function(element) {
   return element.style.cssText.toLowerCase();
  },
  title: function(element) {
   return element.title;
  }
  }
 }
 };

 Element._attributeTranslations.write = {
 names: Object.extend({
  cellpadding: 'cellPadding',
  cellspacing: 'cellSpacing'
 }, Element._attributeTranslations.read.names),
 values: {
  checked: function(element, value) {
  element.checked = !!value;
  },

  style: function(element, value) {
  element.style.cssText = value ? value : '';
  }
 }
 };

 Element._attributeTranslations.has = {};

 $w('colSpan rowSpan vAlign dateTime accessKey tabIndex ' +
  'encType maxLength readOnly longDesc').each(function(attr) {
 Element._attributeTranslations.write.names[attr.toLowerCase()] = attr;
 Element._attributeTranslations.has[attr.toLowerCase()] = attr;
 });

 (function(v) {
 Object.extend(v, {
  href:  v._getAttr,
  src:   v._getAttr,
  type:  v._getAttr,
  action:  v._getAttrNode,
  disabled: v._flag,
  checked:  v._flag,
  readonly: v._flag,
  multiple: v._flag,
  onload:  v._getEv,
  onunload: v._getEv,
  onclick:  v._getEv,
  ondblclick: v._getEv,
  onmousedown: v._getEv,
  onmouseup: v._getEv,
  onmouseover: v._getEv,
  onmousemove: v._getEv,
  onmouseout: v._getEv,
  onfocus:  v._getEv,
  onblur:  v._getEv,
  onkeypress: v._getEv,
  onkeydown: v._getEv,
  onkeyup:  v._getEv,
  onsubmit: v._getEv,
  onreset:  v._getEv,
  onselect: v._getEv,
  onchange: v._getEv
 });
 })(Element._attributeTranslations.read.values);
}

else if (Prototype.Browser.Gecko && /rv:1\.8\.0/.test(navigator.userAgent)) {
 Element.Methods.setOpacity = function(element, value) {
 element = $(element);
 element.style.opacity = (value == 1) ? 0.999999 :
  (value === '') ? '' : (value < 0.00001) ? 0 : value;
 return element;
 };
}

else if (Prototype.Browser.WebKit) {
 Element.Methods.setOpacity = function(element, value) {
 element = $(element);
 element.style.opacity = (value == 1 || value === '') ? '' :
  (value < 0.00001) ? 0 : value;

 if (value == 1)
  if(element.tagName == 'IMG' && element.width) {
  element.width++; element.width--;
  } else try {
  var n = document.createTextNode(' ');
  element.appendChild(n);
  element.removeChild(n);
  } catch (e) { }

 return element;
 };

 // Safari returns margins on body which is incorrect if the child is absolutely
 // positioned. For performance reasons, redefine Element#cumulativeOffset for
 // KHTML/WebKit only.
 Element.Methods.cumulativeOffset = function(element) {
 var valueT = 0, valueL = 0;
 do {
  valueT += element.offsetTop || 0;
  valueL += element.offsetLeft || 0;
  if (element.offsetParent == document.body)
  if (Element.getStyle(element, 'position') == 'absolute') break;

  element = element.offsetParent;
 } while (element);

 return Element._returnOffset(valueL, valueT);
 };
}

if (Prototype.Browser.IE || Prototype.Browser.Opera) {
 // IE and Opera are missing .innerHTML support for TABLE-related and SELECT elements
 Element.Methods.update = function(element, content) {
 element = $(element);

 if (content && content.toElement) content = content.toElement();
 if (Object.isElement(content)) return element.update().insert(content);

 content = Object.toHTML(content);
 var tagName = element.tagName.toUpperCase();

 if (tagName in Element._insertionTranslations.tags) {
  $A(element.childNodes).each(function(node) { element.removeChild(node) });
  Element._getContentFromAnonymousElement(tagName, content.stripScripts())
  .each(function(node) { element.appendChild(node) });
 }
 else element.innerHTML = content.stripScripts();

 content.evalScripts.bind(content).defer();
 return element;
 };
}

if ('outerHTML' in document.createElement('div')) {
 Element.Methods.replace = function(element, content) {
 element = $(element);

 if (content && content.toElement) content = content.toElement();
 if (Object.isElement(content)) {
  element.parentNode.replaceChild(content, element);
  return element;
 }

 content = Object.toHTML(content);
 var parent = element.parentNode, tagName = parent.tagName.toUpperCase();

 if (Element._insertionTranslations.tags[tagName]) {
  var nextSibling = element.next();
  var fragments = Element._getContentFromAnonymousElement(tagName, content.stripScripts());
  parent.removeChild(element);
  if (nextSibling)
  fragments.each(function(node) { parent.insertBefore(node, nextSibling) });
  else
  fragments.each(function(node) { parent.appendChild(node) });
 }
 else element.outerHTML = content.stripScripts();

 content.evalScripts.bind(content).defer();
 return element;
 };
}

Element._returnOffset = function(l, t) {
 var result = [l, t];
 result.left = l;
 result.top = t;
 return result;
};

Element._getContentFromAnonymousElement = function(tagName, html) {
 var div = new Element('div'), t = Element._insertionTranslations.tags[tagName];
 if (t) {
 div.innerHTML = t[0] + html + t[1];
 t[2].times(function() { div = div.firstChild });
 } else div.innerHTML = html;
 return $A(div.childNodes);
};

Element._insertionTranslations = {
 before: function(element, node) {
 element.parentNode.insertBefore(node, element);
 },
 top: function(element, node) {
 element.insertBefore(node, element.firstChild);
 },
 bottom: function(element, node) {
 element.appendChild(node);
 },
 after: function(element, node) {
 element.parentNode.insertBefore(node, element.nextSibling);
 },
 tags: {
 TABLE: ['<table>',    '</table>',     1],
 TBODY: ['<table><tbody>',   '</tbody></table>',   2],
 TR:  ['<table><tbody><tr>',  '</tr></tbody></table>',  3],
 TD:  ['<table><tbody><tr><td>', '</td></tr></tbody></table>', 4],
 SELECT: ['<select>',    '</select>',     1]
 }
};

(function() {
 Object.extend(this.tags, {
 THEAD: this.tags.TBODY,
 TFOOT: this.tags.TBODY,
 TH: this.tags.TD
 });
}).call(Element._insertionTranslations);

Element.Methods.Simulated = {
 hasAttribute: function(element, attribute) {
 attribute = Element._attributeTranslations.has[attribute] || attribute;
 var node = $(element).getAttributeNode(attribute);
 return node && node.specified;
 }
};

Element.Methods.ByTag = { };

Object.extend(Element, Element.Methods);

if (!Prototype.BrowserFeatures.ElementExtensions &&
 document.createElement('div').__proto__) {
 window.HTMLElement = { };
 window.HTMLElement.prototype = document.createElement('div').__proto__;
 Prototype.BrowserFeatures.ElementExtensions = true;
}

Element.extend = (function() {
 if (Prototype.BrowserFeatures.SpecificElementExtensions)
 return Prototype.K;

 var Methods = { }, ByTag = Element.Methods.ByTag;

 var extend = Object.extend(function(element) {
 if (!element || element._extendedByPrototype ||
  element.nodeType != 1 || element == window) return element;

 var methods = Object.clone(Methods),
  tagName = element.tagName, property, value;

 // extend methods for specific tags
 if (ByTag[tagName]) Object.extend(methods, ByTag[tagName]);

 for (property in methods) {
  value = methods[property];
  if (Object.isFunction(value) && !(property in element))
  element[property] = value.methodize();
 }

 element._extendedByPrototype = Prototype.emptyFunction;
 return element;

 }, {
 refresh: function() {
  // extend methods for all tags (Safari doesn't need this)
  if (!Prototype.BrowserFeatures.ElementExtensions) {
  Object.extend(Methods, Element.Methods);
  Object.extend(Methods, Element.Methods.Simulated);
  }
 }
 });

 extend.refresh();
 return extend;
})();

Element.hasAttribute = function(element, attribute) {
 if (element.hasAttribute) return element.hasAttribute(attribute);
 return Element.Methods.Simulated.hasAttribute(element, attribute);
};

Element.addMethods = function(methods) {
 var F = Prototype.BrowserFeatures, T = Element.Methods.ByTag;

 if (!methods) {
 Object.extend(Form, Form.Methods);
 Object.extend(Form.Element, Form.Element.Methods);
 Object.extend(Element.Methods.ByTag, {
  "FORM":  Object.clone(Form.Methods),
  "INPUT": Object.clone(Form.Element.Methods),
  "SELECT": Object.clone(Form.Element.Methods),
  "TEXTAREA": Object.clone(Form.Element.Methods)
 });
 }

 if (arguments.length == 2) {
 var tagName = methods;
 methods = arguments[1];
 }

 if (!tagName) Object.extend(Element.Methods, methods || { });
 else {
 if (Object.isArray(tagName)) tagName.each(extend);
 else extend(tagName);
 }

 function extend(tagName) {
 tagName = tagName.toUpperCase();
 if (!Element.Methods.ByTag[tagName])
  Element.Methods.ByTag[tagName] = { };
 Object.extend(Element.Methods.ByTag[tagName], methods);
 }

 function copy(methods, destination, onlyIfAbsent) {
 onlyIfAbsent = onlyIfAbsent || false;
 for (var property in methods) {
  var value = methods[property];
  if (!Object.isFunction(value)) continue;
  if (!onlyIfAbsent || !(property in destination))
  destination[property] = value.methodize();
 }
 }

 function findDOMClass(tagName) {
 var klass;
 var trans = {
  "OPTGROUP": "OptGroup", "TEXTAREA": "TextArea", "P": "Paragraph",
  "FIELDSET": "FieldSet", "UL": "UList", "OL": "OList", "DL": "DList",
  "DIR": "Directory", "H1": "Heading", "H2": "Heading", "H3": "Heading",
  "H4": "Heading", "H5": "Heading", "H6": "Heading", "Q": "Quote",
  "INS": "Mod", "DEL": "Mod", "A": "Anchor", "IMG": "Image", "CAPTION":
  "TableCaption", "COL": "TableCol", "COLGROUP": "TableCol", "THEAD":
  "TableSection", "TFOOT": "TableSection", "TBODY": "TableSection", "TR":
  "TableRow", "TH": "TableCell", "TD": "TableCell", "FRAMESET":
  "FrameSet", "IFRAME": "IFrame"
 };
 if (trans[tagName]) klass = 'HTML' + trans[tagName] + 'Element';
 if (window[klass]) return window[klass];
 klass = 'HTML' + tagName + 'Element';
 if (window[klass]) return window[klass];
 klass = 'HTML' + tagName.capitalize() + 'Element';
 if (window[klass]) return window[klass];

 window[klass] = { };
 window[klass].prototype = document.createElement(tagName).__proto__;
 return window[klass];
 }

 if (F.ElementExtensions) {
 copy(Element.Methods, HTMLElement.prototype);
 copy(Element.Methods.Simulated, HTMLElement.prototype, true);
 }

 if (F.SpecificElementExtensions) {
 for (var tag in Element.Methods.ByTag) {
  var klass = findDOMClass(tag);
  if (Object.isUndefined(klass)) continue;
  copy(T[tag], klass.prototype);
 }
 }

 Object.extend(Element, Element.Methods);
 delete Element.ByTag;

 if (Element.extend.refresh) Element.extend.refresh();
 Element.cache = { };
};

document.viewport = {
 getDimensions: function() {
 var dimensions = { };
 var B = Prototype.Browser;
 $w('width height').each(function(d) {
  var D = d.capitalize();
  dimensions[d] = (B.WebKit && !document.evaluate) ? self['inner' + D] :
  (B.Opera) ? document.body['client' + D] : document.documentElement['client' + D];
 });
 return dimensions;
 },

 getWidth: function() {
 return this.getDimensions().width;
 },

 getHeight: function() {
 return this.getDimensions().height;
 },

 getScrollOffsets: function() {
 return Element._returnOffset(
  window.pageXOffset || document.documentElement.scrollLeft || document.body.scrollLeft,
  window.pageYOffset || document.documentElement.scrollTop || document.body.scrollTop);
 }
};
/* Portions of the Selector class are derived from Jack Slocum’s DomQuery,
 * part of YUI-Ext version 0.40, distributed under the terms of an MIT-style
 * license. Please see http://www.yui-ext.com/ for more information. */

var Selector = Class.create({
 initialize: function(expression) {
 this.expression = expression.strip();
 this.compileMatcher();
 },

 shouldUseXPath: function() {
 if (!Prototype.BrowserFeatures.XPath) return false;

 var e = this.expression;

 // Safari 3 chokes on :*-of-type and :empty
 if (Prototype.Browser.WebKit &&
  (e.include("-of-type") || e.include(":empty")))
  return false;

 // XPath can't do namespaced attributes, nor can it read
 // the "checked" property from DOM nodes
 if ((/(\[[\w-]*?:|:checked)/).test(this.expression))
  return false;

 return true;
 },

 compileMatcher: function() {
 if (this.shouldUseXPath())
  return this.compileXPathMatcher();

 var e = this.expression, ps = Selector.patterns, h = Selector.handlers,
  c = Selector.criteria, le, p, m;

 if (Selector._cache[e]) {
  this.matcher = Selector._cache[e];
  return;
 }

 this.matcher = ["this.matcher = function(root) {",
     "var r = root, h = Selector.handlers, c = false, n;"];

 while (e && le != e && (/\S/).test(e)) {
  le = e;
  for (var i in ps) {
  p = ps[i];
  if (m = e.match(p)) {
   this.matcher.push(Object.isFunction(c[i]) ? c[i](m) :
 	  new Template(c[i]).evaluate(m));
   e = e.replace(m[0], '');
   break;
  }
  }
 }

 this.matcher.push("return h.unique(n);\n}");
 eval(this.matcher.join('\n'));
 Selector._cache[this.expression] = this.matcher;
 },

 compileXPathMatcher: function() {
 var e = this.expression, ps = Selector.patterns,
  x = Selector.xpath, le, m;

 if (Selector._cache[e]) {
  this.xpath = Selector._cache[e]; return;
 }

 this.matcher = ['.//*'];
 while (e && le != e && (/\S/).test(e)) {
  le = e;
  for (var i in ps) {
  if (m = e.match(ps[i])) {
   this.matcher.push(Object.isFunction(x[i]) ? x[i](m) :
   new Template(x[i]).evaluate(m));
   e = e.replace(m[0], '');
   break;
  }
  }
 }

 this.xpath = this.matcher.join('');
 Selector._cache[this.expression] = this.xpath;
 },

 findElements: function(root) {
 root = root || document;
 if (this.xpath) return document._getElementsByXPath(this.xpath, root);
 return this.matcher(root);
 },

 match: function(element) {
 this.tokens = [];

 var e = this.expression, ps = Selector.patterns, as = Selector.assertions;
 var le, p, m;

 while (e && le !== e && (/\S/).test(e)) {
  le = e;
  for (var i in ps) {
  p = ps[i];
  if (m = e.match(p)) {
   // use the Selector.assertions methods unless the selector
   // is too complex.
   if (as[i]) {
   this.tokens.push([i, Object.clone(m)]);
   e = e.replace(m[0], '');
   } else {
   // reluctantly do a document-wide search
   // and look for a match in the array
   return this.findElements(document).include(element);
   }
  }
  }
 }

 var match = true, name, matches;
 for (var i = 0, token; token = this.tokens[i]; i++) {
  name = token[0], matches = token[1];
  if (!Selector.assertions[name](element, matches)) {
  match = false; break;
  }
 }

 return match;
 },

 toString: function() {
 return this.expression;
 },

 inspect: function() {
 return "#<Selector:" + this.expression.inspect() + ">";
 }
});

Object.extend(Selector, {
 _cache: { },

 xpath: {
 descendant: "//*",
 child:  "/*",
 adjacent:  "/following-sibling::*[1]",
 laterSibling: '/following-sibling::*',
 tagName:  function(m) {
  if (m[1] == '*') return '';
  return "[local-name()='" + m[1].toLowerCase() +
    "' or local-name()='" + m[1].toUpperCase() + "']";
 },
 className: "[contains(concat(' ', @class, ' '), ' #{1} ')]",
 id:   "[@id='#{1}']",
 attrPresence: function(m) {
  m[1] = m[1].toLowerCase();
  return new Template("[@#{1}]").evaluate(m);
 },
 attr: function(m) {
  m[1] = m[1].toLowerCase();
  m[3] = m[5] || m[6];
  return new Template(Selector.xpath.operators[m[2]]).evaluate(m);
 },
 pseudo: function(m) {
  var h = Selector.xpath.pseudos[m[1]];
  if (!h) return '';
  if (Object.isFunction(h)) return h(m);
  return new Template(Selector.xpath.pseudos[m[1]]).evaluate(m);
 },
 operators: {
  '=': "[@#{1}='#{3}']",
  '!=': "[@#{1}!='#{3}']",
  '^=': "[starts-with(@#{1}, '#{3}')]",
  '$=': "[substring(@#{1}, (string-length(@#{1}) - string-length('#{3}') + 1))='#{3}']",
  '*=': "[contains(@#{1}, '#{3}')]",
  '~=': "[contains(concat(' ', @#{1}, ' '), ' #{3} ')]",
  '|=': "[contains(concat('-', @#{1}, '-'), '-#{3}-')]"
 },
 pseudos: {
  'first-child': '[not(preceding-sibling::*)]',
  'last-child': '[not(following-sibling::*)]',
  'only-child': '[not(preceding-sibling::* or following-sibling::*)]',
  'empty':  "[count(*) = 0 and (count(text()) = 0 or translate(text(), ' \t\r\n', '') = '')]",
  'checked':  "[@checked]",
  'disabled': "[@disabled]",
  'enabled':  "[not(@disabled)]",
  'not': function(m) {
  var e = m[6], p = Selector.patterns,
   x = Selector.xpath, le, v;

  var exclusion = [];
  while (e && le != e && (/\S/).test(e)) {
   le = e;
   for (var i in p) {
   if (m = e.match(p[i])) {
    v = Object.isFunction(x[i]) ? x[i](m) : new Template(x[i]).evaluate(m);
    exclusion.push("(" + v.substring(1, v.length - 1) + ")");
    e = e.replace(m[0], '');
    break;
   }
   }
  }
  return "[not(" + exclusion.join(" and ") + ")]";
  },
  'nth-child':  function(m) {
  return Selector.xpath.pseudos.nth("(count(./preceding-sibling::*) + 1) ", m);
  },
  'nth-last-child': function(m) {
  return Selector.xpath.pseudos.nth("(count(./following-sibling::*) + 1) ", m);
  },
  'nth-of-type': function(m) {
  return Selector.xpath.pseudos.nth("position() ", m);
  },
  'nth-last-of-type': function(m) {
  return Selector.xpath.pseudos.nth("(last() + 1 - position()) ", m);
  },
  'first-of-type': function(m) {
  m[6] = "1"; return Selector.xpath.pseudos['nth-of-type'](m);
  },
  'last-of-type': function(m) {
  m[6] = "1"; return Selector.xpath.pseudos['nth-last-of-type'](m);
  },
  'only-of-type': function(m) {
  var p = Selector.xpath.pseudos; return p['first-of-type'](m) + p['last-of-type'](m);
  },
  nth: function(fragment, m) {
  var mm, formula = m[6], predicate;
  if (formula == 'even') formula = '2n+0';
  if (formula == 'odd') formula = '2n+1';
  if (mm = formula.match(/^(\d+)$/)) // digit only
   return '[' + fragment + "= " + mm[1] + ']';
  if (mm = formula.match(/^(-?\d*)?n(([+-])(\d+))?/)) { // an+b
   if (mm[1] == "-") mm[1] = -1;
   var a = mm[1] ? Number(mm[1]) : 1;
   var b = mm[2] ? Number(mm[2]) : 0;
   predicate = "[((#{fragment} - #{b}) mod #{a} = 0) and " +
   "((#{fragment} - #{b}) div #{a} >= 0)]";
   return new Template(predicate).evaluate({
   fragment: fragment, a: a, b: b });
  }
  }
 }
 },

 criteria: {
 tagName:  'n = h.tagName(n, r, "#{1}", c);  c = false;',
 className: 'n = h.className(n, r, "#{1}", c); c = false;',
 id:   'n = h.id(n, r, "#{1}", c);   c = false;',
 attrPresence: 'n = h.attrPresence(n, r, "#{1}", c); c = false;',
 attr: function(m) {
  m[3] = (m[5] || m[6]);
  return new Template('n = h.attr(n, r, "#{1}", "#{3}", "#{2}", c); c = false;').evaluate(m);
 },
 pseudo: function(m) {
  if (m[6]) m[6] = m[6].replace(/"/g, '\\"');
  return new Template('n = h.pseudo(n, "#{1}", "#{6}", r, c); c = false;').evaluate(m);
 },
 descendant: 'c = "descendant";',
 child:  'c = "child";',
 adjacent:  'c = "adjacent";',
 laterSibling: 'c = "laterSibling";'
 },

 patterns: {
 // combinators must be listed first
 // (and descendant needs to be last combinator)
 laterSibling: /^\s*~\s*/,
 child:  /^\s*>\s*/,
 adjacent:  /^\s*\+\s*/,
 descendant: /^\s/,

 // selectors follow
 tagName:  /^\s*(\*|[\w\-]+)(\b|$)?/,
 id:   /^#([\w\-\*]+)(\b|$)/,
 className: /^\.([\w\-\*]+)(\b|$)/,
 pseudo:
/^:((first|last|nth|nth-last|only)(-child|-of-type)|empty|checked|(en|dis)abled|not)(\((.*?)\))?(\b|$|(?=\s|[:+~>]))/,
 attrPresence: /^\[([\w]+)\]/,
 attr:   /\[((?:[\w-]*:)?[\w-]+)\s*(?:([!^$*~|]?=)\s*((['"])([^\4]*?)\4|([^'"][^\]]*?)))?\]/
 },

 // for Selector.match and Element#match
 assertions: {
 tagName: function(element, matches) {
  return matches[1].toUpperCase() == element.tagName.toUpperCase();
 },

 className: function(element, matches) {
  return Element.hasClassName(element, matches[1]);
 },

 id: function(element, matches) {
  return element.id === matches[1];
 },

 attrPresence: function(element, matches) {
  return Element.hasAttribute(element, matches[1]);
 },

 attr: function(element, matches) {
  var nodeValue = Element.readAttribute(element, matches[1]);
  return nodeValue && Selector.operators[matches[2]](nodeValue, matches[5] || matches[6]);
 }
 },

 handlers: {
 // UTILITY FUNCTIONS
 // joins two collections
 concat: function(a, b) {
  for (var i = 0, node; node = b[i]; i++)
  a.push(node);
  return a;
 },

 // marks an array of nodes for counting
 mark: function(nodes) {
  var _true = Prototype.emptyFunction;
  for (var i = 0, node; node = nodes[i]; i++)
  node._countedByPrototype = _true;
  return nodes;
 },

 unmark: function(nodes) {
  for (var i = 0, node; node = nodes[i]; i++)
  node._countedByPrototype = undefined;
  return nodes;
 },

 // mark each child node with its position (for nth calls)
 // "ofType" flag indicates whether we're indexing for nth-of-type
 // rather than nth-child
 index: function(parentNode, reverse, ofType) {
  parentNode._countedByPrototype = Prototype.emptyFunction;
  if (reverse) {
  for (var nodes = parentNode.childNodes, i = nodes.length - 1, j = 1; i >= 0; i--) {
   var node = nodes[i];
   if (node.nodeType == 1 && (!ofType || node._countedByPrototype)) node.nodeIndex = j++;
  }
  } else {
  for (var i = 0, j = 1, nodes = parentNode.childNodes; node = nodes[i]; i++)
   if (node.nodeType == 1 && (!ofType || node._countedByPrototype)) node.nodeIndex = j++;
  }
 },

 // filters out duplicates and extends all nodes
 unique: function(nodes) {
  if (nodes.length == 0) return nodes;
  var results = [], n;
  for (var i = 0, l = nodes.length; i < l; i++)
  if (!(n = nodes[i])._countedByPrototype) {
   n._countedByPrototype = Prototype.emptyFunction;
   results.push(Element.extend(n));
  }
  return Selector.handlers.unmark(results);
 },

 // COMBINATOR FUNCTIONS
 descendant: function(nodes) {
  var h = Selector.handlers;
  for (var i = 0, results = [], node; node = nodes[i]; i++)
  h.concat(results, node.getElementsByTagName('*'));
  return results;
 },

 child: function(nodes) {
  var h = Selector.handlers;
  for (var i = 0, results = [], node; node = nodes[i]; i++) {
  for (var j = 0, child; child = node.childNodes[j]; j++)
   if (child.nodeType == 1 && child.tagName != '!') results.push(child);
  }
  return results;
 },

 adjacent: function(nodes) {
  for (var i = 0, results = [], node; node = nodes[i]; i++) {
  var next = this.nextElementSibling(node);
  if (next) results.push(next);
  }
  return results;
 },

 laterSibling: function(nodes) {
  var h = Selector.handlers;
  for (var i = 0, results = [], node; node = nodes[i]; i++)
  h.concat(results, Element.nextSiblings(node));
  return results;
 },

 nextElementSibling: function(node) {
  while (node = node.nextSibling)
	  if (node.nodeType == 1) return node;
  return null;
 },

 previousElementSibling: function(node) {
  while (node = node.previousSibling)
  if (node.nodeType == 1) return node;
  return null;
 },

 // TOKEN FUNCTIONS
 tagName: function(nodes, root, tagName, combinator) {
  var uTagName = tagName.toUpperCase();
  var results = [], h = Selector.handlers;
  if (nodes) {
  if (combinator) {
   // fastlane for ordinary descendant combinators
   if (combinator == "descendant") {
   for (var i = 0, node; node = nodes[i]; i++)
    h.concat(results, node.getElementsByTagName(tagName));
   return results;
   } else nodes = this[combinator](nodes);
   if (tagName == "*") return nodes;
  }
  for (var i = 0, node; node = nodes[i]; i++)
   if (node.tagName.toUpperCase() === uTagName) results.push(node);
  return results;
  } else return root.getElementsByTagName(tagName);
 },

 id: function(nodes, root, id, combinator) {
  var targetNode = $(id), h = Selector.handlers;
  if (!targetNode) return [];
  if (!nodes && root == document) return [targetNode];
  if (nodes) {
  if (combinator) {
   if (combinator == 'child') {
   for (var i = 0, node; node = nodes[i]; i++)
    if (targetNode.parentNode == node) return [targetNode];
   } else if (combinator == 'descendant') {
   for (var i = 0, node; node = nodes[i]; i++)
    if (Element.descendantOf(targetNode, node)) return [targetNode];
   } else if (combinator == 'adjacent') {
   for (var i = 0, node; node = nodes[i]; i++)
    if (Selector.handlers.previousElementSibling(targetNode) == node)
    return [targetNode];
   } else nodes = h[combinator](nodes);
  }
  for (var i = 0, node; node = nodes[i]; i++)
   if (node == targetNode) return [targetNode];
  return [];
  }
  return (targetNode && Element.descendantOf(targetNode, root)) ? [targetNode] : [];
 },

 className: function(nodes, root, className, combinator) {
  if (nodes && combinator) nodes = this[combinator](nodes);
  return Selector.handlers.byClassName(nodes, root, className);
 },

 byClassName: function(nodes, root, className) {
  if (!nodes) nodes = Selector.handlers.descendant([root]);
  var needle = ' ' + className + ' ';
  for (var i = 0, results = [], node, nodeClassName; node = nodes[i]; i++) {
  nodeClassName = node.className;
  if (nodeClassName.length == 0) continue;
  if (nodeClassName == className || (' ' + nodeClassName + ' ').include(needle))
   results.push(node);
  }
  return results;
 },

 attrPresence: function(nodes, root, attr, combinator) {
  if (!nodes) nodes = root.getElementsByTagName("*");
  if (nodes && combinator) nodes = this[combinator](nodes);
  var results = [];
  for (var i = 0, node; node = nodes[i]; i++)
  if (Element.hasAttribute(node, attr)) results.push(node);
  return results;
 },

 attr: function(nodes, root, attr, value, operator, combinator) {
  if (!nodes) nodes = root.getElementsByTagName("*");
  if (nodes && combinator) nodes = this[combinator](nodes);
  var handler = Selector.operators[operator], results = [];
  for (var i = 0, node; node = nodes[i]; i++) {
  var nodeValue = Element.readAttribute(node, attr);
  if (nodeValue === null) continue;
  if (handler(nodeValue, value)) results.push(node);
  }
  return results;
 },

 pseudo: function(nodes, name, value, root, combinator) {
  if (nodes && combinator) nodes = this[combinator](nodes);
  if (!nodes) nodes = root.getElementsByTagName("*");
  return Selector.pseudos[name](nodes, value, root);
 }
 },

 pseudos: {
 'first-child': function(nodes, value, root) {
  for (var i = 0, results = [], node; node = nodes[i]; i++) {
  if (Selector.handlers.previousElementSibling(node)) continue;
   results.push(node);
  }
  return results;
 },
 'last-child': function(nodes, value, root) {
  for (var i = 0, results = [], node; node = nodes[i]; i++) {
  if (Selector.handlers.nextElementSibling(node)) continue;
   results.push(node);
  }
  return results;
 },
 'only-child': function(nodes, value, root) {
  var h = Selector.handlers;
  for (var i = 0, results = [], node; node = nodes[i]; i++)
  if (!h.previousElementSibling(node) && !h.nextElementSibling(node))
   results.push(node);
  return results;
 },
 'nth-child':  function(nodes, formula, root) {
  return Selector.pseudos.nth(nodes, formula, root);
 },
 'nth-last-child': function(nodes, formula, root) {
  return Selector.pseudos.nth(nodes, formula, root, true);
 },
 'nth-of-type':  function(nodes, formula, root) {
   return Selector.pseudos.nth(nodes, formula, root, false, true);
  },
  'nth-last-of-type': function(nodes, formula, root) {
   return Selector.pseudos.nth(nodes, formula, root, true, true);
  },
  'first-of-type':  function(nodes, formula, root) {
   return Selector.pseudos.nth(nodes, "1", root, false, true);
  },
  'last-of-type':   function(nodes, formula, root) {
   return Selector.pseudos.nth(nodes, "1", root, true, true);
  },
  'only-of-type':   function(nodes, formula, root) {
   var p = Selector.pseudos;
   return p['last-of-type'](p['first-of-type'](nodes, formula, root), formula, root);
  },

  // handles the an+b logic
  getIndices: function(a, b, total) {
   if (a == 0) return b > 0 ? [b] : [];
   return $R(1, total).inject([], function(memo, i) {
    if (0 == (i - b) % a && (i - b) / a >= 0) memo.push(i);
    return memo;
   });
  },

  // handles nth(-last)-child, nth(-last)-of-type, and (first|last)-of-type
  nth: function(nodes, formula, root, reverse, ofType) {
   if (nodes.length == 0) return [];
   if (formula == 'even') formula = '2n+0';
   if (formula == 'odd') formula = '2n+1';
   var h = Selector.handlers, results = [], indexed = [], m;
   h.mark(nodes);
   for (var i = 0, node; node = nodes[i]; i++) {
    if (!node.parentNode._countedByPrototype) {
     h.index(node.parentNode, reverse, ofType);
     indexed.push(node.parentNode);
    }
   }
   if (formula.match(/^\d+$/)) { // just a number
    formula = Number(formula);
    for (var i = 0, node; node = nodes[i]; i++)
     if (node.nodeIndex == formula) results.push(node);
   } else if (m = formula.match(/^(-?\d*)?n(([+-])(\d+))?/)) { // an+b
    if (m[1] == "-") m[1] = -1;
    var a = m[1] ? Number(m[1]) : 1;
    var b = m[2] ? Number(m[2]) : 0;
    var indices = Selector.pseudos.getIndices(a, b, nodes.length);
    for (var i = 0, node, l = indices.length; node = nodes[i]; i++) {
     for (var j = 0; j < l; j++)
      if (node.nodeIndex == indices[j]) results.push(node);
    }
   }
   h.unmark(nodes);
   h.unmark(indexed);
   return results;
  },

  'empty': function(nodes, value, root) {
   for (var i = 0, results = [], node; node = nodes[i]; i++) {
    // IE treats comments as element nodes
    if (node.tagName == '!' || (node.firstChild && !node.innerHTML.match(/^\s*$/))) continue;
    results.push(node);
   }
   return results;
  },

  'not': function(nodes, selector, root) {
   var h = Selector.handlers, selectorType, m;
   var exclusions = new Selector(selector).findElements(root);
   h.mark(exclusions);
   for (var i = 0, results = [], node; node = nodes[i]; i++)
    if (!node._countedByPrototype) results.push(node);
   h.unmark(exclusions);
   return results;
  },

  'enabled': function(nodes, value, root) {
   for (var i = 0, results = [], node; node = nodes[i]; i++)
    if (!node.disabled) results.push(node);
   return results;
  },

  'disabled': function(nodes, value, root) {
   for (var i = 0, results = [], node; node = nodes[i]; i++)
    if (node.disabled) results.push(node);
   return results;
  },

  'checked': function(nodes, value, root) {
   for (var i = 0, results = [], node; node = nodes[i]; i++)
    if (node.checked) results.push(node);
   return results;
  }
 },

 operators: {
  '=': function(nv, v) { return nv == v; },
  '!=': function(nv, v) { return nv != v; },
  '^=': function(nv, v) { return nv.startsWith(v); },
  '$=': function(nv, v) { return nv.endsWith(v); },
  '*=': function(nv, v) { return nv.include(v); },
  '~=': function(nv, v) { return (' ' + nv + ' ').include(' ' + v + ' '); },
  '|=': function(nv, v) { return ('-' + nv.toUpperCase() + '-').include('-' + v.toUpperCase() + '-'); }
 },

 split: function(expression) {
  var expressions = [];
  expression.scan(/(([\w#:.~>+()\s-]+|\*|\[.*?\])+)\s*(,|$)/, function(m) {
   expressions.push(m[1].strip());
  });
  return expressions;
 },

 matchElements: function(elements, expression) {
  var matches = $$(expression), h = Selector.handlers;
  h.mark(matches);
  for (var i = 0, results = [], element; element = elements[i]; i++)
   if (element._countedByPrototype) results.push(element);
  h.unmark(matches);
  return results;
 },

 findElement: function(elements, expression, index) {
  if (Object.isNumber(expression)) {
   index = expression; expression = false;
  }
  return Selector.matchElements(elements, expression || '*')[index || 0];
 },

 findChildElements: function(element, expressions) {
  expressions = Selector.split(expressions.join(','));
  var results = [], h = Selector.handlers;
  for (var i = 0, l = expressions.length, selector; i < l; i++) {
   selector = new Selector(expressions[i].strip());
   h.concat(results, selector.findElements(element));
  }
  return (l > 1) ? h.unique(results) : results;
 }
});

if (Prototype.Browser.IE) {
 Object.extend(Selector.handlers, {
  // IE returns comment nodes on getElementsByTagName("*").
  // Filter them out.
  concat: function(a, b) {
   for (var i = 0, node; node = b[i]; i++)
    if (node.tagName !== "!") a.push(node);
   return a;
  },

  // IE improperly serializes _countedByPrototype in (inner|outer)HTML.
  unmark: function(nodes) {
   for (var i = 0, node; node = nodes[i]; i++)
    node.removeAttribute('_countedByPrototype');
   return nodes;
  }
 });
}

function $$() {
 return Selector.findChildElements(document, $A(arguments));
}
var Form = {
 reset: function(form) {
  $(form).reset();
  return form;
 },

 serializeElements: function(elements, options) {
  if (typeof options != 'object') options = { hash: !!options };
  else if (Object.isUndefined(options.hash)) options.hash = true;
  var key, value, submitted = false, submit = options.submit;

  var data = elements.inject({ }, function(result, element) {
   if (!element.disabled && element.name) {
    key = element.name; value = $(element).getValue();
    if (value != null && (element.type != 'submit' || (!submitted &&
      submit !== false && (!submit || key == submit) && (submitted = true)))) {
     if (key in result) {
      // a key is already present; construct an array of values
      if (!Object.isArray(result[key])) result[key] = [result[key]];
      result[key].push(value);
     }
     else result[key] = value;
    }
   }
   return result;
  });

  return options.hash ? data : Object.toQueryString(data);
 }
};

Form.Methods = {
 serialize: function(form, options) {
  return Form.serializeElements(Form.getElements(form), options);
 },

 getElements: function(form) {
  return $A($(form).getElementsByTagName('*')).inject([],
   function(elements, child) {
    if (Form.Element.Serializers[child.tagName.toLowerCase()])
     elements.push(Element.extend(child));
    return elements;
   }
  );
 },

 getInputs: function(form, typeName, name) {
  form = $(form);
  var inputs = form.getElementsByTagName('input');

  if (!typeName && !name) return $A(inputs).map(Element.extend);

  for (var i = 0, matchingInputs = [], length = inputs.length; i < length; i++) {
   var input = inputs[i];
   if ((typeName && input.type != typeName) || (name && input.name != name))
    continue;
   matchingInputs.push(Element.extend(input));
  }

  return matchingInputs;
 },

 disable: function(form) {
  form = $(form);
  Form.getElements(form).invoke('disable');
  return form;
 },

 enable: function(form) {
  form = $(form);
  Form.getElements(form).invoke('enable');
  return form;
 },

 findFirstElement: function(form) {
  var elements = $(form).getElements().findAll(function(element) {
   return 'hidden' != element.type && !element.disabled;
  });
  var firstByIndex = elements.findAll(function(element) {
   return element.hasAttribute('tabIndex') && element.tabIndex >= 0;
  }).sortBy(function(element) { return element.tabIndex }).first();

  return firstByIndex ? firstByIndex : elements.find(function(element) {
   return ['input', 'select', 'textarea'].include(element.tagName.toLowerCase());
  });
 },

 focusFirstElement: function(form) {
  form = $(form);
  form.findFirstElement().activate();
  return form;
 },

 request: function(form, options) {
  form = $(form), options = Object.clone(options || { });

  var params = options.parameters, action = form.readAttribute('action') || '';
  if (action.blank()) action = window.location.href;
  options.parameters = form.serialize(true);

  if (params) {
   if (Object.isString(params)) params = params.toQueryParams();
   Object.extend(options.parameters, params);
  }

  if (form.hasAttribute('method') && !options.method)
   options.method = form.method;

  return new Ajax.Request(action, options);
 }
};

/*--------------------------------------------------------------------------*/

Form.Element = {
 focus: function(element) {
  $(element).focus();
  return element;
 },

 select: function(element) {
  $(element).select();
  return element;
 }
};

Form.Element.Methods = {
 serialize: function(element) {
  element = $(element);
  if (!element.disabled && element.name) {
   var value = element.getValue();
   if (value != undefined) {
    var pair = { };
    pair[element.name] = value;
    return Object.toQueryString(pair);
   }
  }
  return '';
 },

 getValue: function(element) {
  element = $(element);
  var method = element.tagName.toLowerCase();
  return Form.Element.Serializers[method](element);
 },

 setValue: function(element, value) {
  element = $(element);
  var method = element.tagName.toLowerCase();
  Form.Element.Serializers[method](element, value);
  return element;
 },

 clear: function(element) {
  $(element).value = '';
  return element;
 },

 present: function(element) {
  return $(element).value != '';
 },

 activate: function(element) {
  element = $(element);
  try {
   element.focus();
   if (element.select && (element.tagName.toLowerCase() != 'input' ||
     !['button', 'reset', 'submit'].include(element.type)))
    element.select();
  } catch (e) { }
  return element;
 },

 disable: function(element) {
  element = $(element);
  element.blur();
  element.disabled = true;
  return element;
 },

 enable: function(element) {
  element = $(element);
  element.disabled = false;
  return element;
 }
};

/*--------------------------------------------------------------------------*/

var Field = Form.Element;
var $F = Form.Element.Methods.getValue;

/*--------------------------------------------------------------------------*/

Form.Element.Serializers = {
 input: function(element, value) {
  switch (element.type.toLowerCase()) {
   case 'checkbox':
   case 'radio':
    return Form.Element.Serializers.inputSelector(element, value);
   default:
    return Form.Element.Serializers.textarea(element, value);
  }
 },

 inputSelector: function(element, value) {
  if (Object.isUndefined(value)) return element.checked ? element.value : null;
  else element.checked = !!value;
 },

 textarea: function(element, value) {
  if (Object.isUndefined(value)) return element.value;
  else element.value = value;
 },

 select: function(element, index) {
  if (Object.isUndefined(index))
   return this[element.type == 'select-one' ?
    'selectOne' : 'selectMany'](element);
  else {
   var opt, value, single = !Object.isArray(index);
   for (var i = 0, length = element.length; i < length; i++) {
    opt = element.options[i];
    value = this.optionValue(opt);
    if (single) {
     if (value == index) {
      opt.selected = true;
      return;
     }
    }
    else opt.selected = index.include(value);
   }
  }
 },

 selectOne: function(element) {
  var index = element.selectedIndex;
  return index >= 0 ? this.optionValue(element.options[index]) : null;
 },

 selectMany: function(element) {
  var values, length = element.length;
  if (!length) return null;

  for (var i = 0, values = []; i < length; i++) {
   var opt = element.options[i];
   if (opt.selected) values.push(this.optionValue(opt));
  }
  return values;
 },

 optionValue: function(opt) {
  // extend element because hasAttribute may not be native
  return Element.extend(opt).hasAttribute('value') ? opt.value : opt.text;
 }
};

/*--------------------------------------------------------------------------*/

Abstract.TimedObserver = Class.create(PeriodicalExecuter, {
 initialize: function($super, element, frequency, callback) {
  $super(callback, frequency);
  this.element  = $(element);
  this.lastValue = this.getValue();
 },

 execute: function() {
  var value = this.getValue();
  if (Object.isString(this.lastValue) && Object.isString(value) ?
    this.lastValue != value : String(this.lastValue) != String(value)) {
   this.callback(this.element, value);
   this.lastValue = value;
  }
 }
});

Form.Element.Observer = Class.create(Abstract.TimedObserver, {
 getValue: function() {
  return Form.Element.getValue(this.element);
 }
});

Form.Observer = Class.create(Abstract.TimedObserver, {
 getValue: function() {
  return Form.serialize(this.element);
 }
});

/*--------------------------------------------------------------------------*/

Abstract.EventObserver = Class.create({
 initialize: function(element, callback) {
  this.element = $(element);
  this.callback = callback;

  this.lastValue = this.getValue();
  if (this.element.tagName.toLowerCase() == 'form')
   this.registerFormCallbacks();
  else
   this.registerCallback(this.element);
 },

 onElementEvent: function() {
  var value = this.getValue();
  if (this.lastValue != value) {
   this.callback(this.element, value);
   this.lastValue = value;
  }
 },

 registerFormCallbacks: function() {
  Form.getElements(this.element).each(this.registerCallback, this);
 },

 registerCallback: function(element) {
  if (element.type) {
   switch (element.type.toLowerCase()) {
    case 'checkbox':
    case 'radio':
     Event.observe(element, 'click', this.onElementEvent.bind(this));
     break;
    default:
     Event.observe(element, 'change', this.onElementEvent.bind(this));
     break;
   }
  }
 }
});

Form.Element.EventObserver = Class.create(Abstract.EventObserver, {
 getValue: function() {
  return Form.Element.getValue(this.element);
 }
});

Form.EventObserver = Class.create(Abstract.EventObserver, {
 getValue: function() {
  return Form.serialize(this.element);
 }
});
if (!window.Event) var Event = { };

Object.extend(Event, {
 KEY_BACKSPACE: 8,
 KEY_TAB:    9,
 KEY_RETURN:  13,
 KEY_ESC:   27,
 KEY_LEFT:   37,
 KEY_UP:    38,
 KEY_RIGHT:  39,
 KEY_DOWN:   40,
 KEY_DELETE:  46,
 KEY_HOME:   36,
 KEY_END:   35,
 KEY_PAGEUP:  33,
 KEY_PAGEDOWN: 34,
 KEY_INSERT:  45,

 cache: { },

 relatedTarget: function(event) {
  var element;
  switch(event.type) {
   case 'mouseover': element = event.fromElement; break;
   case 'mouseout': element = event.toElement;  break;
   default: return null;
  }
  return Element.extend(element);
 }
});

Event.Methods = (function() {
 var isButton;

 if (Prototype.Browser.IE) {
  var buttonMap = { 0: 1, 1: 4, 2: 2 };
  isButton = function(event, code) {
   return event.button == buttonMap[code];
  };

 } else if (Prototype.Browser.WebKit) {
  isButton = function(event, code) {
   switch (code) {
    case 0: return event.which == 1 && !event.metaKey;
    case 1: return event.which == 1 && event.metaKey;
    default: return false;
   }
  };

 } else {
  isButton = function(event, code) {
   return event.which ? (event.which === code + 1) : (event.button === code);
  };
 }

 return {
  isLeftClick:  function(event) { return isButton(event, 0) },
  isMiddleClick: function(event) { return isButton(event, 1) },
  isRightClick: function(event) { return isButton(event, 2) },

  element: function(event) {
   var node = Event.extend(event).target;
   return Element.extend(node.nodeType == Node.TEXT_NODE ? node.parentNode : node);
  },

  findElement: function(event, expression) {
   var element = Event.element(event);
   if (!expression) return element;
   var elements = [element].concat(element.ancestors());
   return Selector.findElement(elements, expression, 0);
  },

  pointer: function(event) {
   return {
    x: event.pageX || (event.clientX +
     (document.documentElement.scrollLeft || document.body.scrollLeft)),
    y: event.pageY || (event.clientY +
     (document.documentElement.scrollTop || document.body.scrollTop))
   };
  },

  pointerX: function(event) { return Event.pointer(event).x },
  pointerY: function(event) { return Event.pointer(event).y },

  stop: function(event) {
   Event.extend(event);
   event.preventDefault();
   event.stopPropagation();
   event.stopped = true;
  }
 };
})();

Event.extend = (function() {
 var methods = Object.keys(Event.Methods).inject({ }, function(m, name) {
  m[name] = Event.Methods[name].methodize();
  return m;
 });

 if (Prototype.Browser.IE) {
  Object.extend(methods, {
   stopPropagation: function() { this.cancelBubble = true },
   preventDefault: function() { this.returnValue = false },
   inspect: function() { return "[object Event]" }
  });

  return function(event) {
   if (!event) return false;
   if (event._extendedByPrototype) return event;

   event._extendedByPrototype = Prototype.emptyFunction;
   var pointer = Event.pointer(event);
   Object.extend(event, {
    target: event.srcElement,
    relatedTarget: Event.relatedTarget(event),
    pageX: pointer.x,
    pageY: pointer.y
   });
   return Object.extend(event, methods);
  };

 } else {
  Event.prototype = Event.prototype || document.createEvent("HTMLEvents").__proto__;
  Object.extend(Event.prototype, methods);
  return Prototype.K;
 }
})();

Object.extend(Event, (function() {
 var cache = Event.cache;

 function getEventID(element) {
  if (element._prototypeEventID) return element._prototypeEventID[0];
  arguments.callee.id = arguments.callee.id || 1;
  return element._prototypeEventID = [++arguments.callee.id];
 }

 function getDOMEventName(eventName) {
  if (eventName && eventName.include(':')) return "dataavailable";
  return eventName;
 }

 function getCacheForID(id) {
  return cache[id] = cache[id] || { };
 }

 function getWrappersForEventName(id, eventName) {
  var c = getCacheForID(id);
  return c[eventName] = c[eventName] || [];
 }

 function createWrapper(element, eventName, handler) {
  var id = getEventID(element);
  var c = getWrappersForEventName(id, eventName);
  if (c.pluck("handler").include(handler)) return false;

  var wrapper = function(event) {
   if (!Event || !Event.extend ||
    (event.eventName && event.eventName != eventName))
     return false;

   Event.extend(event);
   handler.call(element, event);
  };

  wrapper.handler = handler;
  c.push(wrapper);
  return wrapper;
 }

 function findWrapper(id, eventName, handler) {
  var c = getWrappersForEventName(id, eventName);
  return c.find(function(wrapper) { return wrapper.handler == handler });
 }

 function destroyWrapper(id, eventName, handler) {
  var c = getCacheForID(id);
  if (!c[eventName]) return false;
  c[eventName] = c[eventName].without(findWrapper(id, eventName, handler));
 }

 function destroyCache() {
  for (var id in cache)
      for (var eventName in cache[id])
        cache[id][eventName] = null;
  }

  if (window.attachEvent) {
    window.attachEvent("onunload", destroyCache);
  }

  return {
    observe: function(element, eventName, handler) {
      element = $(element);
      var name = getDOMEventName(eventName);

      var wrapper = createWrapper(element, eventName, handler);
      if (!wrapper) return element;

      if (element.addEventListener) {
        element.addEventListener(name, wrapper, false);
      } else {
        element.attachEvent("on" + name, wrapper);
      }

      return element;
    },

    stopObserving: function(element, eventName, handler) {
      element = $(element);
      var id = getEventID(element), name = getDOMEventName(eventName);

      if (!handler && eventName) {
        getWrappersForEventName(id, eventName).each(function(wrapper) {
          element.stopObserving(eventName, wrapper.handler);
        });
        return element;

      } else if (!eventName) {
        Object.keys(getCacheForID(id)).each(function(eventName) {
          element.stopObserving(eventName);
        });
        return element;
      }

      var wrapper = findWrapper(id, eventName, handler);
      if (!wrapper) return element;

      if (element.removeEventListener) {
        element.removeEventListener(name, wrapper, false);
      } else {
        element.detachEvent("on" + name, wrapper);
      }

      destroyWrapper(id, eventName, handler);

      return element;
    },

    fire: function(element, eventName, memo) {
      element = $(element);
      if (element == document && document.createEvent && !element.dispatchEvent)
        element = document.documentElement;

      var event;
      if (document.createEvent) {
        event = document.createEvent("HTMLEvents");
        event.initEvent("dataavailable", true, true);
      } else {
        event = document.createEventObject();
        event.eventType = "ondataavailable";
      }

      event.eventName = eventName;
      event.memo = memo || { };

      if (document.createEvent) {
        element.dispatchEvent(event);
      } else {
        element.fireEvent(event.eventType, event);
      }

      return Event.extend(event);
    }
  };
})());

Object.extend(Event, Event.Methods);

Element.addMethods({
  fire:          Event.fire,
  observe:       Event.observe,
  stopObserving: Event.stopObserving
});

Object.extend(document, {
  fire:          Element.Methods.fire.methodize(),
  observe:       Element.Methods.observe.methodize(),
  stopObserving: Element.Methods.stopObserving.methodize(),
  loaded:        false
});

(function() {
  /* Support for the DOMContentLoaded event is based on work by Dan Webb,
     Matthias Miller, Dean Edwards and John Resig. */

  var timer;

  function fireContentLoadedEvent() {
    if (document.loaded) return;
    if (timer) window.clearInterval(timer);
    document.fire("dom:loaded");
    document.loaded = true;
  }

  if (document.addEventListener) {
    if (Prototype.Browser.WebKit) {
      timer = window.setInterval(function() {
        if (/loaded|complete/.test(document.readyState))
          fireContentLoadedEvent();
      }, 0);

      Event.observe(window, "load", fireContentLoadedEvent);

    } else {
      document.addEventListener("DOMContentLoaded",
        fireContentLoadedEvent, false);
    }

  } else {
    document.write("<script id=__onDOMContentLoaded defer src=//:><\/script>");
    $("__onDOMContentLoaded").onreadystatechange = function() {
      if (this.readyState == "complete") {
        this.onreadystatechange = null;
        fireContentLoadedEvent();
      }
    };
  }
})();
/*------------------------------- DEPRECATED -------------------------------*/

Hash.toQueryString = Object.toQueryString;

var Toggle = { display: Element.toggle };

Element.Methods.childOf = Element.Methods.descendantOf;

var Insertion = {
  Before: function(element, content) {
    return Element.insert(element, {before:content});
  },

  Top: function(element, content) {
    return Element.insert(element, {top:content});
  },

  Bottom: function(element, content) {
    return Element.insert(element, {bottom:content});
  },

  After: function(element, content) {
    return Element.insert(element, {after:content});
  }
};

var $continue = new Error('"throw $continue" is deprecated, use "return" instead');

// This should be moved to script.aculo.us; notice the deprecated methods
// further below, that map to the newer Element methods.
var Position = {
  // set to true if needed, warning: firefox performance problems
  // NOT neeeded for page scrolling, only if draggable contained in
  // scrollable elements
  includeScrollOffsets: false,

  // must be called before calling withinIncludingScrolloffset, every time the
  // page is scrolled
  prepare: function() {
    this.deltaX =  window.pageXOffset
                || document.documentElement.scrollLeft
                || document.body.scrollLeft
                || 0;
    this.deltaY =  window.pageYOffset
                || document.documentElement.scrollTop
                || document.body.scrollTop
                || 0;
  },

  // caches x/y coordinate pair to use with overlap
  within: function(element, x, y) {
    if (this.includeScrollOffsets)
      return this.withinIncludingScrolloffsets(element, x, y);
    this.xcomp = x;
    this.ycomp = y;
    this.offset = Element.cumulativeOffset(element);

    return (y >= this.offset[1] &&
            y <  this.offset[1] + element.offsetHeight &&
            x >= this.offset[0] &&
            x <  this.offset[0] + element.offsetWidth);
  },

  withinIncludingScrolloffsets: function(element, x, y) {
    var offsetcache = Element.cumulativeScrollOffset(element);

    this.xcomp = x + offsetcache[0] - this.deltaX;
    this.ycomp = y + offsetcache[1] - this.deltaY;
    this.offset = Element.cumulativeOffset(element);

    return (this.ycomp >= this.offset[1] &&
            this.ycomp <  this.offset[1] + element.offsetHeight &&
            this.xcomp >= this.offset[0] &&
            this.xcomp <  this.offset[0] + element.offsetWidth);
  },

  // within must be called directly before
  overlap: function(mode, element) {
    if (!mode) return 0;
    if (mode == 'vertical')
      return ((this.offset[1] + element.offsetHeight) - this.ycomp) /
        element.offsetHeight;
    if (mode == 'horizontal')
      return ((this.offset[0] + element.offsetWidth) - this.xcomp) /
        element.offsetWidth;
  },

  // Deprecation layer -- use newer Element methods now (1.5.2).

  cumulativeOffset: Element.Methods.cumulativeOffset,

  positionedOffset: Element.Methods.positionedOffset,

  absolutize: function(element) {
    Position.prepare();
    return Element.absolutize(element);
  },

  relativize: function(element) {
    Position.prepare();
    return Element.relativize(element);
  },

  realOffset: Element.Methods.cumulativeScrollOffset,

  offsetParent: Element.Methods.getOffsetParent,

  page: Element.Methods.viewportOffset,

  clone: function(source, target, options) {
    options = options || { };
    return Element.clonePosition(target, source, options);
  }
};

/*--------------------------------------------------------------------------*/

if (!document.getElementsByClassName) document.getElementsByClassName = function(instanceMethods){
  function iter(name) {
    return name.blank() ? null : "[contains(concat(' ', @class, ' '), ' " + name + " ')]";
  }

  instanceMethods.getElementsByClassName = Prototype.BrowserFeatures.XPath ?
  function(element, className) {
    className = className.toString().strip();
    var cond = /\s/.test(className) ? $w(className).map(iter).join('') : iter(className);
    return cond ? document._getElementsByXPath('.//*' + cond, element) : [];
  } : function(element, className) {
    className = className.toString().strip();
    var elements = [], classNames = (/\s/.test(className) ? $w(className) : null);
    if (!classNames && !className) return elements;

    var nodes = $(element).getElementsByTagName('*');
    className = ' ' + className + ' ';

    for (var i = 0, child, cn; child = nodes[i]; i++) {
      if (child.className && (cn = ' ' + child.className + ' ') && (cn.include(className) ||
          (classNames && classNames.all(function(name) {
            return !name.toString().blank() && cn.include(' ' + name + ' ');
          }))))
        elements.push(Element.extend(child));
    }
    return elements;
  };

  return function(className, parentElement) {
    return $(parentElement || document.body).getElementsByClassName(className);
  };
}(Element.Methods);

/*--------------------------------------------------------------------------*/

Element.ClassNames = Class.create();
Element.ClassNames.prototype = {
  initialize: function(element) {
    this.element = $(element);
  },

  _each: function(iterator) {
    this.element.className.split(/\s+/).select(function(name) {
      return name.length > 0;
    })._each(iterator);
  },

  set: function(className) {
    this.element.className = className;
  },

  add: function(classNameToAdd) {
    if (this.include(classNameToAdd)) return;
    this.set($A(this).concat(classNameToAdd).join(' '));
  },

  remove: function(classNameToRemove) {
    if (!this.include(classNameToRemove)) return;
    this.set($A(this).without(classNameToRemove).join(' '));
  },

  toString: function() {
    return $A(this).join(' ');
  }
};

Object.extend(Element.ClassNames.prototype, Enumerable);

/*--------------------------------------------------------------------------*/

Element.addMethods();