/usr/include/armadillo_bits/fn_speye.hpp is in libarmadillo-dev 1:4.200.0+dfsg-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 | // Copyright (C) 2012 Conrad Sanderson
// Copyright (C) 2012 Ryan Curtin
//
// This Source Code Form is subject to the terms of the Mozilla Public
// License, v. 2.0. If a copy of the MPL was not distributed with this
// file, You can obtain one at http://mozilla.org/MPL/2.0/.
//! \addtogroup fn_speye
//! @{
//! Generate a sparse matrix with the values along the main diagonal set to one
template<typename obj_type>
inline
obj_type
speye(const uword n_rows, const uword n_cols, const typename arma_SpMat_SpCol_SpRow_only<obj_type>::result* junk = NULL)
{
arma_extra_debug_sigprint();
arma_ignore(junk);
if(is_SpCol<obj_type>::value == true)
{
arma_debug_check( (n_cols != 1), "speye(): incompatible size" );
}
else
if(is_SpRow<obj_type>::value == true)
{
arma_debug_check( (n_rows != 1), "speye(): incompatible size" );
}
obj_type out;
out.eye(n_rows, n_cols);
return out;
}
// Convenience shortcut method (no template parameter necessary)
inline
sp_mat
speye(const uword n_rows, const uword n_cols)
{
arma_extra_debug_sigprint();
sp_mat out;
out.eye(n_rows, n_cols);
return out;
}
//! @}
|