blacs_matrix.h

Go to the documentation of this file.

#ifndef STARNEIG_BLACS_MATRIX_H
#define STARNEIG_BLACS_MATRIX_H

#ifdef __cplusplus
extern "C" {
#endif

#include <starneig/configuration.h>

#ifndef STARNEIG_ENABLE_MPI
#error "This header should be included only when STARNEIG_ENABLE_MPI is defined."
#endif

#ifndef STARNEIG_ENABLE_BLACS
#error "This header should be included only when STARNEIG_ENABLE_BLACS is defined."
#endif

#include <starneig/distr_matrix.h>



typedef int starneig_blacs_context_t;

starneig_blacs_context_t starneig_distr_to_blacs_context(
    starneig_distr_t distr);

starneig_distr_t starneig_blacs_context_to_distr(
    starneig_blacs_context_t context);

int starneig_distr_is_blacs_compatible(starneig_distr_t distr);

int starneig_distr_is_compatible_with(
    starneig_distr_t distr, starneig_blacs_context_t context);



typedef struct starneig_blacs_descr {
    int type;
    starneig_blacs_context_t context;
    int m;
    int n;
    int sm;
    int sn;
    int rsrc;
    int csrc;
    int lld;
} starneig_blacs_descr_t;

void starneig_blacs_create_matrix(
    int rows, int cols, int row_blksz, int col_blksz, starneig_datatype_t type,
    starneig_blacs_context_t context,
    starneig_blacs_descr_t *descr, void **local);

void starneig_create_blacs_matrix(
    int rows, int cols, int row_blksz, int col_blksz, starneig_datatype_t type,
    starneig_blacs_context_t context,
    starneig_blacs_descr_t *descr, void **local);

void starneig_blacs_destroy_matrix(starneig_blacs_descr_t *descr, void **local);

void starneig_destroy_blacs_matrix(starneig_blacs_descr_t *descr, void **local);

void starneig_distr_matrix_to_blacs_descr(
    starneig_distr_matrix_t matrix, starneig_blacs_context_t context,
    starneig_blacs_descr_t *descr, void **local);

starneig_distr_matrix_t starneig_blacs_descr_to_distr_matrix(
    starneig_datatype_t type, starneig_distr_t distr,
    starneig_blacs_descr_t *descr, void *local);

int starneig_distr_matrix_is_blacs_compatible(starneig_distr_matrix_t matrix);

int starneig_distr_matrix_is_compatible_with(
    starneig_distr_matrix_t matrix, starneig_blacs_context_t context);



#ifdef __cplusplus
}
#endif

#endif // STARNEIG_BLACS_MATRIX_H