#include <iostream>
#include <string>
#include <vector>
#include <queue>

const long long MOD=(long long)1e9 + 7;

long long pow(long long a, long long n) {
  long long ret=1;
  for (;n>0;n>>=1,a=a*a%MOD) {
    if (n%2==1) ret=ret*a%MOD;
  }
  return ret;
}

long long inv(long long a) {
  return pow(a, MOD-2);
}

// s + s+1 + s+2 + ... + t
long long sum1(long long s, long long t) {
  if (s>t) return 0;
  return (s+t)*(t-s+1)%MOD*inv(2)%MOD;
}

long long gcd(long long a, long long b) {
  if (a>b) return gcd(b, a);
  if (a==0) return b;
  return gcd(b%a, a);
}

const int NMAX=3123456;

long long cnt[NMAX];
long long cnt2[NMAX];
long long cnt3[NMAX];

int main() {
  long long H, W;
  std::cin >> H >> W;
  for (int i=0;i<NMAX;++i){
    cnt[i]=0;
    cnt2[i]=0;
    cnt3[i]=0;
  }
  for (int i=2;i<NMAX;++i) for (int j=i;j<NMAX;j+=i) cnt[j]++;
  for (int i=2;i<NMAX;++i) {
    for (int j=i;j<NMAX;j+=i) {
      cnt2[j]+=(cnt[i]%2==1?1:-1)*((W-1)/i);
      cnt3[j]+=(cnt[i]%2==1?1:-1)*((W-1)/i)*i%MOD;
    }
  }
  for (int i=0;i<NMAX;++i) cnt3[i]%=MOD;
  long long ans=0;
  for (long long p=2;p<H;++p) {
    ans+=(H-p)*W%MOD*(std::max(0LL, W-2)-cnt2[p])%MOD;
    ans-=(H-p)*(sum1(2, W-1)-cnt3[p])%MOD;
    ans=(ans+MOD)%MOD;
  }
  ans=2*ans%MOD;
  ans+=(H-1)*(W-1)%MOD*(H+W-2)%MOD;//p!=0 && q!=0 && (p==1 || q==1)
  ans+=(H*(W-1)%MOD+W*(H-1)%MOD)%MOD;//p=0 || q=0
  ans=(ans%MOD+MOD)%MOD;
  std::cout << ans << std::endl;
}