// ~~ icebear ~~
#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
typedef pair<int, int> ii;
typedef pair<int, ii> iii;
template<class T>
bool minimize(T &a, const T &b) {
if (a > b) return a = b, true;
return false;
}
template<class T>
bool maximize(T &a, const T &b) {
if (a < b) return a = b, true;
return false;
}
#define FOR(i,a,b) for(int i=(a); i<=(b); ++i)
#define FORR(i,a,b) for(int i=(a); i>=(b); --i)
#define REP(i, n) for(int i=0; i<(n); ++i)
#define RED(i, n) for(int i=(n)-1; i>=0; --i)
#define MASK(i) (1LL << (i))
#define BIT(S, i) (((S) >> (i)) & 1)
#define mp make_pair
#define pb push_back
#define fi first
#define se second
#define all(x) x.begin(), x.end()
#define task "icebear"
const int MOD = 1e9 + 7;
const int inf = 1e9 + 27092008;
const ll INF = 1e18 + 27092008;
const int N = 1e5 + 5;
const int MAX = 1e7 + 5;
int n, a[N], lab[N];
vector<ii> E[MAX];
int root(int v) {
return (lab[v] < 0 ? v : lab[v] = root(lab[v]));
}
bool unite(int u, int v) {
u = root(u);
v = root(v);
if (u == v) return false;
if (lab[u] > lab[v]) swap(u, v);
lab[u] += lab[v];
lab[v] = u;
return true;
}
void init(void) {
cin >> n;
FOR(i, 1, n) {
cin >> a[i];
lab[i] = -1;
}
sort(a + 1, a + n + 1);
}
void process(void) {
FOR(i, 1, n) {
if (a[i] == a[i - 1]) {
E[0].pb(mp(i - 1, i));
continue;
}
int p = upper_bound(a + 1, a + n + 1, a[i]) - a;
if (p <= n) E[a[p] % a[i]].emplace_back(i, p);
for(int j = 2; j * a[i] <= a[n]; j++) {
p = lower_bound(a + 1, a + n + 1, j * a[i]) - a;
if (p <= n) E[a[p] % a[i]].emplace_back(i, p);
}
}
ll ans = 0;
int e = 0;
FOR(i, 0, MAX - 5) {
for(ii x : E[i])
if (unite(x.fi, x.se))
ans += i, e++;
if (e == n - 1) break;
}
cout << ans;
}
int main() {
ios_base::sync_with_stdio(0);
cin.tie(0); cout.tie(0);
if (fopen(task".inp", "r")) {
freopen(task".inp", "r", stdin);
freopen(task".out", "w", stdout);
}
int tc = 1;
// cin >> tc;
while(tc--) {
init();
process();
}
return 0;
}
Ly8gfn4gaWNlYmVhciB+fgojaW5jbHVkZSA8Yml0cy9zdGRjKysuaD4KdXNpbmcgbmFtZXNwYWNlIHN0ZDsKCnR5cGVkZWYgbG9uZyBsb25nIGxsOwp0eXBlZGVmIHBhaXI8aW50LCBpbnQ+IGlpOwp0eXBlZGVmIHBhaXI8aW50LCBpaT4gaWlpOwoKdGVtcGxhdGU8Y2xhc3MgVD4KICAgIGJvb2wgbWluaW1pemUoVCAmYSwgY29uc3QgVCAmYikgewogICAgICAgIGlmIChhID4gYikgcmV0dXJuIGEgPSBiLCB0cnVlOwogICAgICAgIHJldHVybiBmYWxzZTsKICAgIH0KCnRlbXBsYXRlPGNsYXNzIFQ+CiAgICBib29sIG1heGltaXplKFQgJmEsIGNvbnN0IFQgJmIpIHsKICAgICAgICBpZiAoYSA8IGIpIHJldHVybiBhID0gYiwgdHJ1ZTsKICAgICAgICByZXR1cm4gZmFsc2U7CiAgICB9CgojZGVmaW5lIEZPUihpLGEsYikgZm9yKGludCBpPShhKTsgaTw9KGIpOyArK2kpCiNkZWZpbmUgRk9SUihpLGEsYikgZm9yKGludCBpPShhKTsgaT49KGIpOyAtLWkpCiNkZWZpbmUgUkVQKGksIG4pIGZvcihpbnQgaT0wOyBpPChuKTsgKytpKQojZGVmaW5lIFJFRChpLCBuKSBmb3IoaW50IGk9KG4pLTE7IGk+PTA7IC0taSkKI2RlZmluZSBNQVNLKGkpICgxTEwgPDwgKGkpKQojZGVmaW5lIEJJVChTLCBpKSAoKChTKSA+PiAoaSkpICYgMSkKI2RlZmluZSBtcCBtYWtlX3BhaXIKI2RlZmluZSBwYiBwdXNoX2JhY2sKI2RlZmluZSBmaSBmaXJzdAojZGVmaW5lIHNlIHNlY29uZAojZGVmaW5lIGFsbCh4KSB4LmJlZ2luKCksIHguZW5kKCkKI2RlZmluZSB0YXNrICJpY2ViZWFyIgoKY29uc3QgaW50IE1PRCA9IDFlOSArIDc7CmNvbnN0IGludCBpbmYgPSAxZTkgKyAyNzA5MjAwODsKY29uc3QgbGwgSU5GID0gMWUxOCArIDI3MDkyMDA4Owpjb25zdCBpbnQgTiA9IDFlNSArIDU7CmNvbnN0IGludCBNQVggPSAxZTcgKyA1OwppbnQgbiwgYVtOXSwgbGFiW05dOwp2ZWN0b3I8aWk+IEVbTUFYXTsKCmludCByb290KGludCB2KSB7CiAgICByZXR1cm4gKGxhYlt2XSA8IDAgPyB2IDogbGFiW3ZdID0gcm9vdChsYWJbdl0pKTsKfQoKYm9vbCB1bml0ZShpbnQgdSwgaW50IHYpIHsKICAgIHUgPSByb290KHUpOwogICAgdiA9IHJvb3Qodik7CiAgICBpZiAodSA9PSB2KSByZXR1cm4gZmFsc2U7CiAgICBpZiAobGFiW3VdID4gbGFiW3ZdKSBzd2FwKHUsIHYpOwogICAgbGFiW3VdICs9IGxhYlt2XTsKICAgIGxhYlt2XSA9IHU7CiAgICByZXR1cm4gdHJ1ZTsKfQoKCnZvaWQgaW5pdCh2b2lkKSB7CiAgICBjaW4gPj4gbjsKICAgIEZPUihpLCAxLCBuKSB7CiAgICAgICAgY2luID4+IGFbaV07CiAgICAgICAgbGFiW2ldID0gLTE7CiAgICB9CiAgICBzb3J0KGEgKyAxLCBhICsgbiArIDEpOwp9Cgp2b2lkIHByb2Nlc3Modm9pZCkgewogICAgRk9SKGksIDEsIG4pIHsKICAgICAgICBpZiAoYVtpXSA9PSBhW2kgLSAxXSkgewogICAgICAgICAgICBFWzBdLnBiKG1wKGkgLSAxLCBpKSk7CiAgICAgICAgICAgIGNvbnRpbnVlOwogICAgICAgIH0KICAgICAgICBpbnQgcCA9IHVwcGVyX2JvdW5kKGEgKyAxLCBhICsgbiArIDEsIGFbaV0pIC0gYTsKICAgICAgICBpZiAocCA8PSBuKSBFW2FbcF0gJSBhW2ldXS5lbXBsYWNlX2JhY2soaSwgcCk7CgogICAgICAgIGZvcihpbnQgaiA9IDI7IGogKiBhW2ldIDw9IGFbbl07IGorKykgewogICAgICAgICAgICBwID0gbG93ZXJfYm91bmQoYSArIDEsIGEgKyBuICsgMSwgaiAqIGFbaV0pIC0gYTsKICAgICAgICAgICAgaWYgKHAgPD0gbikgRVthW3BdICUgYVtpXV0uZW1wbGFjZV9iYWNrKGksIHApOwogICAgICAgIH0KICAgIH0KCiAgICBsbCBhbnMgPSAwOwogICAgaW50IGUgPSAwOwogICAgRk9SKGksIDAsIE1BWCAtIDUpIHsKICAgICAgICBmb3IoaWkgeCA6IEVbaV0pCiAgICAgICAgICAgIGlmICh1bml0ZSh4LmZpLCB4LnNlKSkKICAgICAgICAgICAgICAgIGFucyArPSBpLCBlKys7CiAgICAgICAgaWYgKGUgPT0gbiAtIDEpIGJyZWFrOwogICAgfQogICAgY291dCA8PCBhbnM7Cn0KCmludCBtYWluKCkgewogICAgaW9zX2Jhc2U6OnN5bmNfd2l0aF9zdGRpbygwKTsKICAgIGNpbi50aWUoMCk7IGNvdXQudGllKDApOwogICAgaWYgKGZvcGVuKHRhc2siLmlucCIsICJyIikpIHsKICAgICAgICBmcmVvcGVuKHRhc2siLmlucCIsICJyIiwgc3RkaW4pOwogICAgICAgIGZyZW9wZW4odGFzayIub3V0IiwgInciLCBzdGRvdXQpOwogICAgfQogICAgaW50IHRjID0gMTsKLy8gICAgY2luID4+IHRjOwogICAgd2hpbGUodGMtLSkgewogICAgICAgIGluaXQoKTsKICAgICAgICBwcm9jZXNzKCk7CiAgICB9CiAgICByZXR1cm4gMDsKfQo=