The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# -------------------------------------------------------------------------------------
# TripleStore::Query::Clause::Sort::NumericDescending
# -------------------------------------------------------------------------------------
#
#       Author : Jean-Michel Hiver (jhiver@mkdoc.com).
#      Version : $Id: NumericDescending.pm,v 1.1.1.1 2003/01/13 18:20:40 jhiver Exp $
#
#    Description:
#
#      Sort order for a variable.
#
# -------------------------------------------------------------------------------------
package TripleStore::Query::Sort::NumericDescending;
use strict;
use warnings;
use Carp;
use base qw /TripleStore::Query::Sort/;

sub is_numeric   { 1 }
sub is_ascending { 0 }


1;


__END__