/in/foo.c: In function 'aa':
/in/foo.c:9:11: error: invalid operands to binary % (have 'long int' and 'double')
    i = i*a%A;
           ^
/in/foo.c:10:10: error: invalid operands to binary % (have 'long int' and 'double')
   a = a*a%A;
          ^