function compare_new($x, $y, $user, $rev) {
    return ($rev ? -1 : 1) * (intval($x->hasSeen($user)) - $y->hasSeen($user));
}

function compare_component($x, $y, $fn1, $fn2, $rev) {
    return ($rev ? -1 : 1) * strnatcasecmp(($a = $x->$fn1()) ? $a->$fn2() : ($rev ? '' : '~'), ($b = $y->$fn1()) ? $b->$fn2() : ($rev ? '' : '~'));
}

function compare_component_indexed($x, $y, $fn1, $idx, $fn2, $rev) {
    return ($rev ? -1 : 1) * strnatcasecmp(($a = $x->$fn1($idx)) ? $a->$fn2() : ($rev ? '' : '~'), ($b = $y->$fn1($idx)) ? $b->$fn2() : ($rev ? '' : '~'));
}

function compare_string($x, $y, $p1, $rev) {
    return ($rev ? -1 : 1) * strnatcasecmp(($a = $x->$p1) ? $a : ($rev ? '' : '~'), ($b = $y->$p1) ? $b : ($rev ? '' : '~'));
}

function compare_getformfieldvaluebyreference($x, $y, $p1, $rev) {
    return ($rev ? -1 : 1) * strnatcasecmp(($a = $x->getFormFieldValueByReference($p1)) ? $a : ($rev ? '' : '~'), ($b = $y->getFormFieldValueByReference($p1)) ? $b : ($rev ? '' : '~'));
}

function compare_two_string($x, $y, $p1, $p2, $rev) {
    return ($rev ? -1 : 1) * (($s = strnatcasecmp(($a = $x->$p1) ? $a : ($rev ? '' : '~'), ($b = $y->$p1) ? $b : ($rev ? '' : '~'))) ? $s :
        strnatcasecmp(($a = $x->$p2) ? $a : ($rev ? '' : '~'), ($b = $y->$p2) ? $b : ($rev ? '' : '~')));
}

function compare_number($x, $y, $p1, $rev) {
    return !($a = $x->$p1) ? (!($b = $y->$p1) ? 0 : 1) : (!($b = $y->$p1) ? -1 : ($rev ? $b - $a : $a - $b));
}

function compare_conditional_number($x, $y, $p1, $p2, $rev) {
    return !($a = $x->$p1 == 'yes' ? $x->$p2 : 0) ? (!($b = $y->$p1 == 'yes' ? $y->$p2 : 0) ? 0 : 1) : (!($b = $y->$p1 == 'yes' ? $y->$p2 : 0) ? -1 : ($rev ? $b - $a : $a - $b));
}