/*******************************************************
 * Copyright (c) 2014, ArrayFire
 * All rights reserved.
 *
 * This file is distributed under 3-clause BSD license.
 * The complete license agreement can be obtained at:
 * http://arrayfire.com/licenses/BSD-3-Clause
 ********************************************************/

#include <af/array.h>
#include <af/dim4.hpp>
#include <af/statistics.h>
#include "common.hpp"
#include "error.hpp"

namespace af {

array var(const array& in, const bool isbiased, const dim_t dim) {
    af_array temp = 0;
    AF_THROW(af_var(&temp, in.get(), isbiased, getFNSD(dim, in.dims())));
    return array(temp);
}

array var(const array& in, const array& weights, const dim_t dim) {
    af_array temp = 0;
    AF_THROW(af_var_weighted(&temp, in.get(), weights.get(),
                             getFNSD(dim, in.dims())));
    return array(temp);
}

#define INSTANTIATE_VAR(T)                                                 \
    template<>                                                             \
    AFAPI T var(const array& in, const bool isbiased) {                    \
        double ret_val;                                                    \
        AF_THROW(af_var_all(&ret_val, NULL, in.get(), isbiased));          \
        return (T)ret_val;                                                 \
    }                                                                      \
                                                                           \
    template<>                                                             \
    AFAPI T var(const array& in, const array& weights) {                   \
        double ret_val;                                                    \
        AF_THROW(                                                          \
            af_var_all_weighted(&ret_val, NULL, in.get(), weights.get())); \
        return (T)ret_val;                                                 \
    }

template<>
AFAPI af_cfloat var(const array& in, const bool isbiased) {
    double real, imag;
    AF_THROW(af_var_all(&real, &imag, in.get(), isbiased));
    return af_cfloat((float)real, (float)imag);
}

template<>
AFAPI af_cdouble var(const array& in, const bool isbiased) {
    double real, imag;
    AF_THROW(af_var_all(&real, &imag, in.get(), isbiased));
    return af_cdouble(real, imag);
}

template<>
AFAPI af_cfloat var(const array& in, const array& weights) {
    double real, imag;
    AF_THROW(af_var_all_weighted(&real, &imag, in.get(), weights.get()));
    return af_cfloat((float)real, (float)imag);
}

template<>
AFAPI af_cdouble var(const array& in, const array& weights) {
    double real, imag;
    AF_THROW(af_var_all_weighted(&real, &imag, in.get(), weights.get()));
    return af_cdouble(real, imag);
}

INSTANTIATE_VAR(float);
INSTANTIATE_VAR(double);
INSTANTIATE_VAR(int);
INSTANTIATE_VAR(unsigned int);
INSTANTIATE_VAR(long long);
INSTANTIATE_VAR(unsigned long long);
INSTANTIATE_VAR(short);
INSTANTIATE_VAR(unsigned short);
INSTANTIATE_VAR(char);
INSTANTIATE_VAR(unsigned char);

#undef INSTANTIATE_VAR

}  // namespace af