00001 #ifndef Impala_Core_Array_Trait_BpoNegDiv_h 00002 #define Impala_Core_Array_Trait_BpoNegDiv_h 00003 00004 #include "Core/Array/Pattern/Categories.h" 00005 #include "Core/Array/Element/E1Cast.h" 00006 00007 namespace Impala 00008 { 00009 namespace Core 00010 { 00011 namespace Array 00012 { 00013 namespace Trait 00014 { 00015 00016 00019 template<class DstArrayT, class Src1ArrayT, class Src2ArrayT> 00020 class BpoNegDiv 00021 { 00022 public: 00024 typedef Pattern::TagTransInVar TransVarianceCategory; 00025 00027 typedef Pattern::TagCallValue CallCategory; 00028 00029 typedef typename DstArrayT::ArithType DstArithT; 00030 typedef typename Src1ArrayT::ArithType Src1ArithT; 00031 typedef typename Src2ArrayT::ArithType Src2ArithT; 00032 00034 BpoNegDiv() 00035 { 00036 } 00037 00039 DstArithT 00040 DoIt(const Src1ArithT& x, const Src2ArithT& y) 00041 { 00042 return Element::E1Cast(x<0 ? -x/y : 0.0, DstArithT()); 00043 } 00044 00045 static DstArithT 00046 NeutralElement() 00047 { 00048 return Element::E1Cast(1, DstArithT()); 00049 } 00050 00051 }; 00052 00053 } // namespace Trait 00054 } // namespace Array 00055 } // namespace Core 00056 } // namespace Impala 00057 00058 #endif