33// lower_tri.h: Rcpp R/C++ interface class library -- lower.tri
44//
55// Copyright (C) 2010 - 2017 Dirk Eddelbuettel and Romain Francois
6- // Copyright (C) 2017 Dirk Eddelbuettel, Romain Francois, and Nathan Russell
6+ // Copyright (C) 2017 Dirk Eddelbuettel, Romain Francois, and Nathan Russell
77//
88// This file is part of Rcpp.
99//
@@ -29,39 +29,39 @@ namespace sugar {
2929template <int RTYPE, bool NA, typename T>
3030class LowerTri : public MatrixBase <LGLSXP, false , LowerTri<RTYPE, NA, T> > {
3131public:
32- typedef Rcpp::MatrixBase<RTYPE, NA, T> MatBase;
32+ typedef Rcpp::MatrixBase<RTYPE, NA, T> MatBase;
3333
34- LowerTri (const T& lhs, bool diag)
35- : nr(lhs.nrow()),
34+ LowerTri (const T& lhs, bool diag)
35+ : nr(lhs.nrow()),
3636 nc (lhs.ncol()),
37- getter(diag ? (&LowerTri::get_diag_true) : (&LowerTri::get_diag_false))
37+ getter(diag ? (&LowerTri::get_diag_true) : (&LowerTri::get_diag_false))
3838 {}
3939
40- inline int operator ()(int i, int j) const { return get (i, j); }
40+ inline int operator ()(int i, int j) const { return get (i, j); }
4141
42- inline R_xlen_t size () const { return static_cast <R_xlen_t>(nr) * nc; }
43- inline int nrow () const { return nr; }
44- inline int ncol () const { return nc; }
42+ inline R_xlen_t size () const { return static_cast <R_xlen_t>(nr) * nc; }
43+ inline int nrow () const { return nr; }
44+ inline int ncol () const { return nc; }
4545
4646private:
47- typedef bool (LowerTri::*Method)(int , int ) const ;
47+ typedef bool (LowerTri::*Method)(int , int ) const ;
4848
49- int nr, nc;
50- Method getter;
49+ int nr, nc;
50+ Method getter;
5151
52- inline bool get_diag_true (int i, int j) const { return i >= j; }
52+ inline bool get_diag_true (int i, int j) const { return i >= j; }
5353
54- inline bool get_diag_false (int i, int j) const { return i > j; }
54+ inline bool get_diag_false (int i, int j) const { return i > j; }
5555
56- inline bool get (int i, int j) const { return (this ->*getter)(i, j); }
56+ inline bool get (int i, int j) const { return (this ->*getter)(i, j); }
5757};
5858
5959} // sugar
6060
6161template <int RTYPE, bool NA, typename T>
6262inline sugar::LowerTri<RTYPE, NA, T>
6363lower_tri (const Rcpp::MatrixBase<RTYPE, NA, T>& lhs, bool diag = false ) {
64- return sugar::LowerTri<RTYPE, NA, T>(lhs, diag);
64+ return sugar::LowerTri<RTYPE, NA, T>(lhs, diag);
6565}
6666
6767} // Rcpp
0 commit comments