Function s7_random 

pub unsafe extern "C" fn s7_random(
    sc: *mut s7_scheme,
    state: s7_pointer,
) -> s7_double