Function fiat_crypto::poly1305_32::fiat_poly1305_carry_square

pub fn fiat_poly1305_carry_square(
    out1: &mut fiat_poly1305_tight_field_element,
    arg1: &fiat_poly1305_loose_field_element
)

The function fiat_poly1305_carry_square squares a field element and reduces the result.

Postconditions: eval out1 mod m = (eval arg1 * eval arg1) mod m