Problem:
Score : 500 points

Problem Statement

Given are N positive integers A_1,...,A_N.

Consider positive integers B_1, ..., B_N that satisfy the following condition.

Condition: For any i, j such that 1 \leq i < j \leq N, A_i B_i = A_j B_j holds.

Find the minimum possible value of B_1 + ... + B_N for such B_1,...,B_N.

Since the answer can be enormous, print the sum modulo (10^9 +7).

Constraints

1 \leq N \leq 10^4

1 \leq A_i \leq 10^6

All values in input are integers.

Input

Input is given from Standard Input in the following format:

N
A_1 ... A_N

Output

Print the minimum possible value of B_1 + ... + B_N for B_1,...,B_N that satisfy the condition, modulo (10^9 +7).

Sample Input 1

3
2 3 4

Sample Output 1

13

Let B_1=6, B_2=4, and B_3=3, and the condition will be satisfied.

Sample Input 2

5
12 12 12 12 12

Sample Output 2

5

We can let all B_i be 1.

Sample Input 3

3
1000000 999999 999998

Sample Output 3

996989508

Print the sum modulo (10^9+7).

Solution in C# (Mono 4.6.2.0) (judge verdict: Time Limit Exceeded)

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Reflection;
using System.Text;

namespace A
{
    class StartingPoint
    {
        static void Main(string[] args)
        {
            if (args?.Any() == true)
            {
                var assembly = Assembly.GetEntryAssembly();
                var resourceName = "AtCoderCSharp.In.txt";
                var stream = assembly.GetManifestResourceStream(resourceName);
                var streamReader = new StreamReader(stream, Encoding.UTF8);
                var str = streamReader.ReadToEnd();
                var textReader = new StringReader(str);
                Console.SetIn(textReader);
            }

            try
            {
                foreach (var s in new Program().Solve())
                {
                    Console.WriteLine(s);
                }
            }
            catch (Exception e)
            {
                Console.WriteLine(e);
                if (args?.Any() != true)
                    throw e;
            }

            if (args?.Any() == true)
                Console.ReadKey();
        }
    }

    class Program
    {
        public List<int> ScanInts(int count) => Enumerable.Range(0, count).Select(_ => ScanInt).ToList();
        public List<int> ScanInts(long count) => ScanInts((int)count);
        public List<long> ScanLongs(int count) => Enumerable.Range(0, count).Select(_ => Scan).ToList();
        public List<long> ScanLongs(long count) => ScanLongs((int)count);
        public int ScanInt => int.Parse(Str);
        public long Scan => long.Parse(Str);
        public double ScanDouble => (double)Scan;

        StringBuilder sb = new StringBuilder();

        public string Str => ScanStr();
        public string ScanStr()
        {
            sb.Clear();

            int r = 0;
            bool? b = null;
            do
            {
                r = Console.Read();
                b = IsBreak(r);
            } while (b == true);

            if (b == null)
                throw new Exception("input error: unexpected end of stream");

            do
            {
                sb.Append((char)r);
                r = Console.Read();
                b = IsBreak(r);
            } while (b == false);

            return sb.ToString();
        }

        bool? IsBreak(int c)
        {
            switch (c)
            {
                case -1:
                    return null;
                case (int)' ':
                case (int)'\n':
                case (int)'\r':
                    return true;
                default:
                    return false;
            }
        }

        public IEnumerable<int> Loop(int count) => Enumerable.Range(0, count);
        public IEnumerable<int> Loop(int from, int to) => Enumerable.Range(from, to - from + 1);

        public IEnumerable<long> Loop(long count) => Loop(0, count - 1);
        public IEnumerable<long> Loop(long from, long to)
        {
            for (long i = from; i <= to; i++)
                yield return i;
        }

        public string YesNo(bool isYes) => isYes ? "Yes" : "No";

        public HashSet<T> ToHashSet<T>(IEnumerable<T> ts) => new HashSet<T>(ts);

        struct Mint
        {
            public static long Divider { set { divider = value; } }
            private static long divider = 1000000007;
            public static void Set998244353() { divider = 998244353; }

            public long Value { get; }

            public Mint(long value)
            {
                this.Value = value;
            }

            public static Mint operator +(Mint a, Mint b) => new Mint((a.Value + b.Value) % divider);

            public static Mint operator -(Mint a, Mint b)
            {
                var t = (a.Value - b.Value) % divider;
                if (t < 0)
                    t += divider;
                return new Mint(t);
            }

            public static Mint operator *(Mint a, Mint b) => new Mint((a.Value * b.Value) % divider);

            public static Mint operator /(Mint a, Mint b) => new Mint((a.Value * InvImpl(b.Value)) % divider);

            public Mint Pow(long p) => new Mint(PowImpl(Value, p));
            private static long PowImpl(long a, long p)
            {
                if (p == 0)
                    return 1L;

                if (p == 1)
                    return a;

                var halfP = p / 2;
                var halfPowered = PowImpl(a, halfP);
                var powered = halfPowered * halfPowered % divider;
                return p % 2 == 0 ? powered : powered * a % divider;
            }

            public static Mint Inv(long a) => new Mint(InvImpl(a));
            private static readonly Dictionary<long, long> invCache = new Dictionary<long, long>();
            private static long InvImpl(long a)
            {
                long cache = 0L;
                if (invCache.TryGetValue(a, out cache))
                    return cache;

                var result = PowImpl(a, divider - 2);
                invCache.Add(a, result);
                return result;
            }

            public static Mint Fac(long a) => new Mint(FacImpl(a));
            private static readonly List<long> facCache = new List<long>() { 1L };
            private static long FacImpl(long a)
            {
                if (a >= divider)
                    return 0;

                if (a < facCache.Count)
                    return facCache[(int)a];

                var val = facCache.Last();
                var start = facCache.Count;
                for (int i = start; i <= a; i++)
                {
                    val = (val * i) % divider;
                    facCache.Add(val);
                }

                return val;
            }

            public static Mint Perm(long n, long r) => new Mint(PermImpl(n, r));
            private static long PermImpl(long n, long r)
            {
                if (n < r)
                    return 0L;

                if (r <= 0)
                    return 1L;

                var nn = FacImpl(n);
                var nr = FacImpl(n - r);
                return (nn * InvImpl(nr)) % divider;
            }

            public static Mint Comb(long n, long r) => new Mint(CombImpl(n, r));
            private static long CombImpl(long n, long r)
            {
                if (n < r)
                    return 0L;

                if (n == r)
                    return 1L;

                var nn = FacImpl(n);
                var nr = FacImpl(n - r);
                var rr = FacImpl(r);

                var nndnr = (nn * InvImpl(nr)) % divider;
                return (nndnr * InvImpl(rr)) % divider;
            }
        }


        public int Gcm(int a, int b)
        {
            if (a < b)
                return GcmImpl(b, a);
            else
                return GcmImpl(a, b);
        }

        int GcmImpl(int a, int b)
        {
            var remainder = a % b;
            if (remainder == 0)
                return b;
            else
                return GcmImpl(b, remainder);
        }

        public int Lcm(int a, int b)
        {
            return a / Gcm(a, b) * b;
        }

        public Dictionary<int, int> F(int n)
        {
            var m = n;
            var res = new Dictionary<int, int>();

            for (int i = 2; i * i <= m; i++)
            {
                var r = 0;
                while (m % i == 0)
                {
                    m /= i;
                    r++;
                }

                if (r > 0)
                    res.Add(i, r);
            }

            if (m > 1)
                res.Add(m, 1);

            return res;
        }

        public IEnumerable<string> Solve()
        {

            var n = ScanInt;
            var a = ScanInts(n);
            var mx = new Dictionary<int, int>();
            var fs = new List<Dictionary<int, int>>();


            foreach (var i in Loop(n))
            {
                var f = F(a[i]);

                foreach (var p in f)
                {
                    var ff = 0;
                    if (mx.TryGetValue(p.Key, out ff))
                        mx[p.Key] = Math.Max(ff, p.Value);
                    else
                        mx[p.Key] = p.Value;
                }

                fs.Add(f);
            }

            var res = new Mint(0);


            foreach (var i in Loop(n))
            {
                var f = fs[i];
                var mt = new Mint(1);

                foreach (var p in mx)
                {
                    var ff = 0;
                    var df =
                        f.TryGetValue(p.Key, out ff) ? ff : 0;


                    var m = new Mint(p.Key);
                    foreach (var _ in Loop(p.Value - df))
                        mt *= m;
                }

                res += mt;
            }

            yield return res.Value.ToString();
        }
    }
}