00001
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029 #ifndef _GAN_MAT_SCALEDI_H
00030 #define _GAN_MAT_SCALEDI_H
00031
00032 #include <gandalf/linalg/mat_square.h>
00033
00034 #ifdef __cplusplus
00035 extern "C" {
00036 #endif
00037
00053
00054 Gan_SquMatrix *gan_scalImat_set_size ( Gan_SquMatrix *A, unsigned long size );
00055 Gan_SquMatrix *gan_scalImat_fill_va ( Gan_SquMatrix *A,
00056 unsigned long size, ... );
00057 Gan_SquMatrix *gan_scalImat_fill_const_q ( Gan_SquMatrix *A,
00058 unsigned long size,
00059 double value );
00060 Gan_Bool gan_scalImat_read_va ( const Gan_SquMatrix *A, unsigned long size, ... );
00061
00076 Gan_SquMatrix *gan_scalImat_alloc ( unsigned long size );
00077
00090 Gan_SquMatrix *gan_scalImat_form ( Gan_SquMatrix *A, unsigned long size );
00091
00105 Gan_SquMatrix *gan_scalImat_form_data ( Gan_SquMatrix *A, unsigned long size,
00106 double *data, size_t data_size );
00107
00128 Gan_SquMatrix *
00129 gan_scalImat_fill_const_s ( unsigned long size, double value );
00130
00141 Gan_SquMatrix *
00142 gan_scalImat_fill_zero_q ( Gan_SquMatrix *A, unsigned long size );
00143
00155 Gan_SquMatrix *
00156 gan_scalImat_fill_zero_s ( unsigned long size );
00157
00162
00163 Gan_SquMatrix *gan_scalImat_form_gen ( Gan_SquMatrix *A, unsigned long size,
00164 double *data, size_t data_size );
00165 Gan_SquMatrix *gan_scalImat_fill_vap ( Gan_SquMatrix *A,
00166 unsigned long size, va_list *aptr );
00167
00180 #ifdef __cplusplus
00181 }
00182 #endif
00183
00184 #endif