Function fiat_crypto::p521_64::fiat_p521_carry_square

pub fn fiat_p521_carry_square(
    out1: &mut fiat_p521_tight_field_element,
    arg1: &fiat_p521_loose_field_element
)

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

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