00001 // This is rpl/rrel/rrel_tukey_obj.cxx 00002 #include "rrel_tukey_obj.h" 00003 00004 namespace { 00005 inline double sqr( double x ) { return x*x; } 00006 inline double cube( double x ) { return x*x*x; } 00007 } 00008 00009 00010 rrel_tukey_obj::rrel_tukey_obj( double B ) 00011 : B_( B ) 00012 { 00013 } 00014 00015 00016 rrel_tukey_obj::~rrel_tukey_obj() 00017 { 00018 } 00019 00020 00021 double 00022 rrel_tukey_obj::rho( double u ) const 00023 { 00024 return rho_fast(u); 00025 } 00026 00027 double 00028 rrel_tukey_obj::wgt( double u ) const 00029 { 00030 return wgt_fast(u); 00031 }