	function confirm_model_delete(element) {
	    return confirm('Really delete models?')	    
        }

	function confirm_result_delete(element) {
	    return confirm('Really delete results?')	    
        }

	function countchecked(element,lower,upper) {

	    var cnt=0;
	    for (var i=0;i<document.forms[0].length;i++)
	    {
		current = document.forms[0].elements[i];
		if (current.type == 'checkbox') {
		    if (current.checked) {
			cnt = cnt + 1;
		    }
		}
	    }
	    if (cnt == 0 && cnt < lower) {
		alert('Please make a selection!');
		return false;
	    } 
	    if (cnt != 0 && cnt < lower) {
		alert('Please make more selections!');
		return false;		
	    }
	    if (cnt > upper && upper == 0) {
		alert('Please unselect all checkboxes!');
		return false;
	    } 
	    if (cnt > upper && upper == 1) {
		alert('Please make at most one selection!');
		return false;
	    } 
	    if (cnt > upper && upper > 1) {
		alert('Please make fewer selections!');
		return false;		
	    }
	    return true
	}

        function checknewmodel(element) {
	    var modelname=""
	    /* var sysnames = new Array();  
	    var usernames = new Array();
	    sysnames = document.forms[0].sysnames.value.split("\$");
	    usernames = document.forms[0].usernames.value.split("\$"); */
	    
	    for (var i=0;i<document.forms[0].length;i++)
	    {
		current = document.forms[0].elements[i];
		if (current.name == 'model_name') {
		    if (current.value == '<Model Name>' || current.value == '') {
			alert('Please enter a model name (Step 5.)');
			return false;
		    }
		    if (current.value.indexOf("\$") != -1) {
			alert('Character \$ not permitted in model name (Step 5.)');
			return false;
		    } 
		    /* for (var j=0;j<sysnames.length;j++) {
			if (sysnames[j] == current.value) {
			    alert('Model name already in use by pre-defined model (Step 5.)');
			    return false;
			}
		    } 
		    for (var j=0;j<usernames.length;j++) {
			if (usernames[j] == current.value) {
			    if (!confirm('Model name already in use. Overwrite?')) {
				return false;
			    } 
			}
		    } */
		}
		if (current.name == 'min_mass' || 
		    current.name == 'max_mass' || 
		    current.name == 'mincl') {
		    for (var j=0;j<current.value.length;j++) {
			var ch = current.value.charAt(j);
			if ((ch < '0' || ch > '9') && ch != ' ') {
			    if (current.name == 'mincl') {
				alert('Positive integer required for minimum class size (Step 3.)');
			    } else {
				alert('Positive integer required for mass limits (Step 4.)');
			    }
			    return false;
			}
		    }
		}
	    }
	    return true;
	}

    function checkall() {
	for (var i=0;i<document.forms[0].length;i++)
	{
	    current = document.forms[0].elements[i];
	    if (current.type == 'checkbox') {
		current.checked = true;
	    }
	}
    }

    function uncheckall() {
	for (var i=0;i<document.forms[0].length;i++)
	{
	    current = document.forms[0].elements[i];
	    if (current.type == 'checkbox') {
		current.checked = false;
	    }
	}
    }

    function togglechecked() {
	if (document.forms[0].checktoggle.value == '0') {
	    checkall();
	    document.forms[0].checktoggle.value = '1'
	} else {
	    uncheckall()
	    document.forms[0].checktoggle.value = '0'
	}
    }

    function tohand(elt) {
	elt.style.cursor = 'pointer';
    }

    function toarrow(elt) {
	elt.style.cursor = 'normal';
    }

    function checknoselection(elt,def) {
	if (elt.options[elt.selectedIndex].value == ':') {
	    alert('Selection required. Reset to default.');
	    elt.selectedIndex = 0;
	} 
    }

