multi infix:max= (Num $curr is rw, Num $new) is exported {
    $curr = max $curr, $new;
}