blas_sparse_vec.h

Go to the documentation of this file.

/*
 *   Copyright 2021 Huawei Technologies Co., Ltd.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#ifndef _H_ALP_SPARSEBLAS_EXT_VEC
#define _H_ALP_SPARSEBLAS_EXT_VEC

#define __SPBLAS_CONC( _a, _b ) _a ## _b
#define __SPBLAS_CONCAT( _a, _b ) __SPBLAS_CONC( _a, _b )
#define SPCONCAT( _a, _b ) __SPBLAS_CONCAT( _a, _b )

#ifdef __cplusplus
extern "C" {
#endif

#define EXTBLAS_FUN( name ) SPCONCAT( EXTBLAS_, name )
#define EXTBLAS_TYPE( name ) SPCONCAT( extblas_, name )

typedef void * EXTBLAS_TYPE( sparse_vector );

EXTBLAS_TYPE( sparse_vector ) EXTBLAS_FUN( dusv_begin )( const int n );

int EXTBLAS_FUN( dusv_insert_entry )(
    EXTBLAS_TYPE( sparse_vector ) x,
    const double val,
    const int index
);

int EXTBLAS_FUN( dusv_end )( EXTBLAS_TYPE( sparse_vector ) x );

int EXTBLAS_FUN( dusvds )( EXTBLAS_TYPE( sparse_vector ) x );

int EXTBLAS_FUN( dusv_nz )( const EXTBLAS_TYPE( sparse_vector ) x, int * nz );

int EXTBLAS_FUN( dusv_open )( const EXTBLAS_TYPE( sparse_vector ) x );

int EXTBLAS_FUN( dusv_get )(
    const EXTBLAS_TYPE( sparse_vector ) x,
    double * const val, int * const ind
);

int EXTBLAS_FUN( dusv_close )( const EXTBLAS_TYPE( sparse_vector ) x );

int EXTBLAS_FUN( dusv_clear )( EXTBLAS_TYPE( sparse_vector ) x );
 // end doxygen grouping for SPARSEBLAS

#ifdef __cplusplus
} // end extern "C"
#endif

#endif // end `_H_ALP_SPARSEBLAS_EXT_VEC'