function calculate_fee(language) {
		 var vessel_length_text = document.getElementById("vess_length").value;
		 vessel_length_text = vessel_length_text.replace(/,/ig, ".");
		 var fee_type = getCheckedValue(document.forms['member_mooring_fee_form'].elements['fee_type']);
		 
		 var vessel_length = parseFloat(vessel_length_text);
		 
		 if (isNaN(vessel_length)){
		      
			  if (language == "EN") {
		 	  	   document.getElementById("result").innerHTML = "Value error";
			  }
		 	  else {
			  	   document.getElementById("result").innerHTML = "Błędna wartość";
			  }
		 	  
		 } else {
		      
			  var price_per_meter;
			  
			  if (fee_type == 'member') {
			  	   price_per_meter = 20;
			  }
			  else if (fee_type == 'candidate') {
			  	   price_per_meter = 30;
			  } 
			   
			  var result = Math.ceil(vessel_length * price_per_meter) + 30;
			  result = Math.round(result * 100) / 100;
			  
			  if (language == "EN") {
		 	  	   result = result + " PLN";
			  }
			  else {
			  	   result = result + " zł";
			  }
			  
			  document.getElementById("result").innerHTML = result;
		 }
}

function calculate_mooring_fee(language) {
		 var vessel_length_text = document.getElementById("vess_length_2").value;
		 var season = getCheckedValue(document.forms['mooring_fee_form'].elements['season']);
		 var payment = getCheckedValue(document.forms['mooring_fee_form'].elements['payment']);
		 var days_text = document.getElementById("days").value;
		 
		 vessel_length_text = vessel_length_text.replace(/,/ig, ".");
		 
		 var vessel_length = parseFloat(vessel_length_text);
		 var days = parseInt(days_text);
		 
		 if (isNaN(vessel_length) || isNaN(days)){
		      
			  if (language == "EN") {
		 	  	   document.getElementById("result").innerHTML = "Value error";
			  }
		 	  else {
			  	   document.getElementById("result").innerHTML = "Błędna wartość";
			  }
		 	  
		 } else {
		      
			  var result;
			  if (payment == 'daily' && season == 'summer') {
			  	   result = 4 * vessel_length;
			  }
			  else if (payment == 'daily' && season == 'winter') {
			  	   result = 4 * vessel_length - 10;
			  }
			  else if (payment == 'monthly' && season == 'summer') {
			  	   result = 60 * vessel_length;
			  }
			  else if (payment == 'monthly' && season == 'winter') {
			  	   result = 60 * vessel_length - 100;
			  }
			  
			  result = result * days;
			  result = Math.round(result * 100) / 100;
			  
			  if (language == "EN") {
		 	  	   result = result + " PLN";
			  }
			  else {
			  	   result = result + " zł";
			  }
			  
			  document.getElementById("result_2").innerHTML = result;
		 }
}

// Derived from ---> http://www.somacon.com/p143.php
function getCheckedValue(radioObj) {
	if(!radioObj)
		return "";
	var radioLength = radioObj.length;
	if(radioLength == undefined)
		if(radioObj.checked)
			return radioObj.value;
		else
			return "";
	for(var i = 0; i < radioLength; i++) {
		if(radioObj[i].checked) {
			return radioObj[i].value;
		}
	}
	return "";
}