#include "sll_errors.h"
Go to the source code of this file.
|
| subroutine | s_vector_space_c1_block__init (self, n1, n2, p1, p2) |
| |
| subroutine | s_vector_space_c1_block__copy (self, x) |
| |
| subroutine | s_vector_space_c1_block__incr (self, x) |
| |
| subroutine | s_vector_space_c1_block__scal (self, a) |
| |
| subroutine | s_vector_space_c1_block__add (self, x, y) |
| |
| subroutine | s_vector_space_c1_block__mult (self, a, x) |
| |
| subroutine | s_vector_space_c1_block__mult_add (self, a, x, y) |
| |
| subroutine | s_vector_space_c1_block__incr_mult (self, a, x) |
| |
| subroutine | s_vector_space_c1_block__lcmb (self, a, x) |
| |
| subroutine | s_vector_space_c1_block__incr_lcmb (self, a, x) |
| |
| real(wp) function | f_vector_space_c1_block__norm (self) |
| |
| real(wp) function | f_vector_space_c1_block__inner (self, x) |
| |
|
| integer, parameter | wp = f64 |
| | Working precision. More...
|
| |
| character(len= *), parameter | wrong_type_x = "x not of type 'sll_t_vector_space_c1_block'" |
| |
| character(len= *), parameter | wrong_type_y = "y not of type 'sll_t_vector_space_c1_block'" |
| |