//  ============================================================
//
//  nttlTraits.h
//
//  Copyright 2002, Dennis Meilicke and Rene Peralta
//
//  ============================================================
//
//  Description:
//
//  Optimization overrides for NTTL.
//
//  ============================================================
#ifndef __lnv3_nttlTraits__
#define __lnv3_nttlTraits__


#include <lnv3/lnv3.h>


#include<nttl/traitsD.h>


inline
ln
nttlTraits<ln>::Power( ln X, ln e, const ln &m )
{
    return X.FastExp( e, m );
}

inline
ln
nttlTraits<ln>::Random( size_t size )
{
    ln x;
    return x.Random( size );
}

inline
short
nttlTraits<ln>::Mod8( const ln& x )
{
    if( x.IsZero( ) ) return 0;

    return ( x.GetDigit( 0 ) & 7 );
}

inline
short
nttlTraits<ln>::Mod4( const ln& x )
{
    if( x.IsZero( ) ) return 0;

    return ( x.GetDigit( 0 ) & 3 );
}

inline
bool
nttlTraits<ln>::IsOdd( const ln &x )
{
    return x.IsOdd( );
}

inline
bool
nttlTraits<ln>::IsEven( const ln &x )
{
    return x.IsEven( );
}

inline
ln
nttlTraits<ln>::Abs( const ln &X )
{
    return X.Abs( );
}

inline
short
nttlTraits<ln>::ToShort( const ln& X )
{
    short x;
    x = X.GetDigit( 0 ) & 0xefff;
    if( X < 0 ) x = -x;
    return x;
}

inline
long
nttlTraits<ln>::ToLong( const ln& X )
{
    long x;
    x = X.GetDigit( 0 );
    if( X < 0 ) x = -x;
    return x;
}

inline
unsigned short
nttlTraits<ln>::ToUnsignedShort( const ln& X )
{
    unsigned short x;
    x = X.GetDigit( 0 ) & 0xffff;
    return x;
}

inline
unsigned long
nttlTraits<ln>::ToUnsignedLong( const ln& X )
{
    unsigned long x;
    x = X.GetDigit( 0 );
    return x;
}


#include<nttl/traitsI.h>


#endif