Shares";
results += " ";
for (i=son; i<=treasury; i++) {
if (i==treasury) multiplier = whole;
else multiplier = new Rational(1, nheirs[i]);
if (isZero(has(i))) results += "| 0";
else if (isOne(has(i))) results += "ALL";
else results += " | " + toString(multiply(has(i), multiplier)) + "";
}
if (school>0) results += "" + schoolNames[school] + "";
else results += " ";
var rev;
if (allowRuddToSpouses==true) rev = "Full";
else if (allowRudd==true) rev = "Yes";
else rev = "No";
results += "" + rev + "";
if (isZero(has(bequest))) results += "0";
else if (isOne(has(bequest))) results += "ALL";
else results += "" + toString(has(bequest)) + "";
results += "";
return results;
}
function getTabulatedPageFooter() {
return "";
}
function runTests(c1, c2) {
var results = getTabulatedPageHeader();
var saveMode = RESULTS;
for (var i=0; i<4; i++) {
if (document.forms['PreferencesForm'].elements['ReportingMode'][i].checked==true) {
saveMode = i;
break;
}
}
var currentSchool = 0;
for (var i=0; i<6; i++) {
if (document.forms['PreferencesForm'].elements['School'][i].checked==true) {
currentSchool = i;
break;
}
}
document.forms['PreferencesForm'].elements['ReportingMode'][3].click();
for (var c=c1; c<=c2; c++) {
initialize();
var carray = getTestCase(c);
for (var i=1; i 26) school = carray[26]-0;
else school = currentSchool;
if (carray.length > 25) {
if (carray[25]>1) allowRuddToSpouses = true;
else allowRuddToSpouses = false;
if (carray[25]>0) allowRudd = true;
else allowRudd = false;
}
else {
allowRuddToSpouses = (document.forms['PreferencesForm'].elements['allowRuddToSpousesBox'].checked == true);
allowRudd = (document.forms['PreferencesForm'].elements['allowRuddBox'].checked == true);
}
bequestShare = toRational(document.forms['PreferencesForm'].elements['bequestField'].value);
if (isGt(bequestShare, third)) bequestShare = third;
getHeirList();
calculateShares();
//sum = whole, so make sure any -ve share marks left are voided
for (var i=son; i<=treasury; i++) {
if (nheirs[i] > 0 && isNegative(has(i))) gets(i, none);
}
results += getTabulatedRow(c);
if ((c>c1) && (cIrth Results***** START *****";
results += "<" + "table border=\"1\"><" + "tr><" + "td><" + "b>THE HEIRS<" + "/td><" + "/tr><" + "/table>";
results += getHeirList() + "";
results += "<" + "table border=\"1\"><" + "tr><" + "td><" + "b>ESTATE DISTRIBUTION<" + "/td><" + "/tr><" + "/table>";
var multiplier;
var i, num;
for (i=son; i 1) {
multiplier = new Rational(1, nheirs[i]);
results += "" + heirsCategory[i] + " get " +
toString(multiply(has(i), multiplier)) + " each";
}
else if (num > 0)
results += "" + heirCategory[i] + " gets " +
toString(has(i)) + "
";
}
results += "" + heirCategory[treasury] + " gets " +
toString(has(treasury)) + "
";
results += "Bequest to non-heirs is " + toString(has(bequest)) + "";
results += "<" + "table border=\"1\"><" + "tr><" + "td><" + "b>Preferences<" + "/td><" + "/tr><" + "/table>";
results += "Preferred juristic school: " + schoolNames[school] + "";
results += "Reversion " + ((allowRudd==true)? "is" : "is not") + " allowed.";
results += "Reversion to spouses " + ((allowRuddToSpouses==true)? "is" : "is not") + " allowed.";
results += "Bequest to non-heirs: " + toString(bequestShare) + "";
if (debugText != null && debugText != "") {
results += "<" + "table border=\"1\"><" + "tr><" + "td><" + "b>Details<" + "/td><" + "/tr><" + "/table>" + debugText;
}
results += "***** END *****";
if (resultsWindow) {
resultsWindow.close();
resultsWindow = null;
}
resultsWindow = open("blank-IGNORE.html","IrthResults");
resultsWindow.document.open();
resultsWindow.document.write(results);
resultsWindow.document.close();
if (typeof resultsWindow.focus != "undefined") resultsWindow.focus();
}
function displayShares() {
clearShares();
displaySharesNS();
document.forms['IrthForm'].elements['DetailsButton'].disabled=false;
if (isModern || isIE) {
var multiplier;
var i;
for (i=son; i 1) {
multiplier = new Rational(1, nheirs[i]);
put('get'+i, toString(multiply(has(i), multiplier)));
}
else if ((nheirs[i]-0) > 0) {
put('get'+i, toString(has(i)));
}
}
put('get'+bequest, toString(has(bequest)));
put('get'+treasury, toString(has(treasury)));
}
window.focus();
}
function calculate() {
debugText = "";
detail("*** Initializing ***");
initialize();
detail("*** Collecting Input ***");
collectInput(); //populates nheirs[] from num input array
if (correctInput()) {
detail("*** Calculating ***");
if (assertTrue(calculateShares(), "Error during share calculation"))
{
setStatus("Calculation done");
}
else {
setStatus("Calculation incomplete");
}
detail("*** Displaying Results ***");
displayShares();
}
else
alert("Error occured during input validation. Please correct and re-try.");
}
function clearHeirs() {
debug("===>clearHeirs()");
var j;
for (j=son; jclearShares()");
var i;
for (i=bequest; i<=treasury; i++) {
put('get'+i, "");
}
}
}
function clearBequest() {
document.forms['PreferencesForm'].elements['bequestField'].value = "";
}
function clearPreferences() {
document.forms['PreferencesForm'].elements['ReportingMode'][0].click();
document.forms['PreferencesForm'].elements['School'][0].click();
if (document.forms['PreferencesForm'].elements['allowRuddBox'].checked==false)
document.forms['PreferencesForm'].elements['allowRuddBox'].click();
if (document.forms['PreferencesForm'].elements['allowRuddToSpousesBox'].checked==true)
document.forms['PreferencesForm'].elements['allowRuddToSpousesBox'].click();
}
function clearForm() {
debug("===>clearForm()");
clearHeirs();
clearShares();
document.forms['IrthForm'].elements['TestCaseSelector'].selectedIndex=0;
if (isModern || isIE) put('caseNum', "");
else document.forms['IrthForm'].elements['caseNum'].value="";
document.forms['IrthForm'].elements['DetailsButton'].disabled=true;
if (resultsWindow) {
resultsWindow.close();
resultsWindow = null;
}
}
function populateForm(harray) {
debug("===>populateForm(...)");
var i;
for (i=son; i=lastCase())
document.forms['IrthForm'].elements['NextTestButton'].disabled=true;
else {
document.forms['IrthForm'].elements['PreviousTestButton'].disabled=false;
document.forms['IrthForm'].elements['NextTestButton'].disabled=false;
}
if (isModern || isIE) {
if (testCase>=0 && testCase<=lastCase())
put('caseNum', "Case " + (testCase-0+1) + " of " + (lastCase()-0+1));
else
put('caseNum', "");
}
else
{
if (testCase>=0 && testCase<=lastCase())
document.forms['IrthForm'].elements['caseNum'].value = "Case " + (testCase-0+1) + " of " + (lastCase()-0+1);
else
document.forms['IrthForm'].elements['caseNum'].value = "";
}
}
function populateFromCase(caseNumber) {
var harray = getTestCase(caseNumber);
var currentSchool = 0;
for (var i=0; i<6; i++) {
if (document.forms['PreferencesForm'].elements['School'][i].checked==true) {
currentSchool = i;
break;
}
}
if (harray.length > 26) school = harray[26]-0;
else school = currentSchool;
if (harray.length > 25) {
if (harray[25]>1) allowRuddToSpouses = true;
else allowRuddToSpouses = false;
if (harray[25]>0) allowRudd = true;
else allowRudd = false;
}
else {
allowRuddToSpouses = (document.forms['PreferencesForm'].elements['allowRuddToSpousesBox'].checked == true);
allowRudd = (document.forms['PreferencesForm'].elements['allowRuddBox'].checked == true);
}
bequestShare = toRational(document.forms['PreferencesForm'].elements['bequestField'].value);
if (isGt(bequestShare, third)) bequestShare = third;
harray[treasury] = 0;
harray[bequest] = 0;
populateForm(harray);
for (var i=0; ipopulateFromCase #" + caseNumber + ":" + getHeirList());
getHeirRange();
updateTestButtons();
}
function generateRandomHeirs() {
var harray = new Array(26);
harray[0] = 0; //always
var i;
for (i=son; i0) && (harray[wife]>0)) {
if (harray[husband]>=harray[wife]) {
harray[husband] = 1;
harray[wife] = 0;
}
else harray[husband] = 0;
}
if (harray[wife] > 4) harray[wife] = 4;
if (harray[husband] > 1) harray[husband] = 1;
harray[treasury] = 0;
return harray;
}
function populateRandomly() {
var harray = generateRandomHeirs();
populateForm(harray);
nheirs = harray;
debug("===>populateRandomly: " + getHeirList());
getHeirRange();
}
function calculateTestCase(caseNumber) {
initialize();
clearForm();
populateFromCase(caseNumber);
debug("===>calculateTestCase(" + caseNumber + ")");
if (assertTrue(calculateShares(), "Error during share calculation")) {
//sum = whole, so make sure any -ve share marks left are voided
for (var i=son; i<=treasury; i++) {
if (nheirs[i] > 0 && isNegative(has(i)))
deprive(i, "Because estate is now fully subscribed after applying all the rules");
}
displayShares();
testCase = caseNumber;
updateTestButtons();
}
}
function previousTest() {
if (testCase>0) calculateTestCase(testCase-1);
}
function nextTest() {
if (testCaseRandom test: " + getHeirList());
if (assertTrue(calculateShares(), "Error during share calculation"))
displayShares();
}
function showTestCase(tc)
{
debug("Test case #" + tc);
var tc1 = tc * 1;
if ((tc1>=0) && (tc1<=lastCase())) {
calculateTestCase(tc1);
}
else if (tc1==-2) {
calculateTestCase(getRandomTestCase());
}
else if (tc1==-3) {
randomTest();
}
else if (tc1==-7) {
runAllTests();
}
setStatus("Test case calculation done");
}
function translate(lng)
{
window.status = "Translating to " + lng; //setStatus() didn't work for Firefox!
//alert("host="+location.host+"\nhostname="+location.hostname+"\npathname="+location.pathname+"\nprotocol="+location.protocol+"\nport="+location.port+"\nhash="+location.hash+"\nsearch="+location.search);
var path0 = location.pathname;
var path = "";
var c0, c;
for (i=0; i |