The C and Fortran syntax for S3L_rand_fib are shown below.
#include <s3l/s3l-c.h> #include <s3l/s3l_errno-c.h> int S3L_rand_fib(a, setup_id, seed) S3L_array_t a int setup_id |
include `s3l/s3l-f.h' include `s3l/s3l_errno-f.h' subroutine S3L_rand_fib(a, setup_id, seed, ier) integer*8 a integer*4 setup_id integer*4 ier |