A1: cos = R^1 cos ;
R^1 | (R^1 (dom cos)) = R^1 by SIN_COS:24, TOPREALB:6;
hence cos is Function of R^1,R^1 by A1; :: thesis: verum