The C and Fortran syntax for S3L_set_safety are shown below.
#include <s3l/s3l-c.h> #include <s3l/s3l_errno-c.h> int S3L_get_safety()
include `s3l/s3l-f.h' include `s3l/s3l_errno-f.h' subroutine S3L_get_safety(ier) integer*4 ier