The C and Fortran syntax for S3L_outer_prod are shown below.
#include <s3l/s3l-c.h> #include <s3l/s3l_errno-c.h> int S3L_outer_prod(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis) S3L_outer_prod_noadd(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis) S3L_outer_prod_addto(A, x, y, B, row_axis, col_axis, x_vector_axis, y_vector_axis) S3L_outer_prod_c2(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis) S3L_outer_prod_c2_noadd(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis) S3L_outer_prod_c2_addto(A, x, y, B, row_axis, col_axis, x_vector_axis, y_vector_axis) S3L_array_t A S3L_array_t x S3L_array_t y S3L_array_t B int row_axis int col_axis int x_vector_axis int y_vector_axis |
include `s3l/s3l-f.h' include `s3l/s3l_errno-f.h' subroutine S3L_outer_prod(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis, ier) S3L_outer_prod_noadd(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis, ier) S3L_outer_prod_addto(A, x, y, B, row_axis, col_axis, x_vector_axis, y_vector_axis, ier) S3L_outer_prod_c2(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis, ier) S3L_outer_prod_c2_noadd(A, x, y, row_axis, col_axis, x_vector_axis, y_vector_axis, ier) S3L_outer_prod_c2_addto(A, x, y, B, row_axis, col_axis, x_vector_axis, y_vector_axis, ier) S3L_array_t A S3L_array_t x S3L_array_t y S3L_array_t B int row_axis int col_axis int x_vector_axis int y_vector_axis int ier |