Problem: Roma found a new character in the game "World of Darkraft - 2". In this game the character fights monsters, finds the more and more advanced stuff that lets him fight stronger monsters.

The character can equip himself with k distinct types of items. Power of each item depends on its level (positive integer number). Initially the character has one 1-level item of each of the k types.

After the victory over the monster the character finds exactly one new randomly generated item. The generation process looks as follows. Firstly the type of the item is defined; each of the k types has the same probability. Then the level of the new item is defined. Let's assume that the level of player's item of the chosen type is equal to t at the moment. Level of the new item will be chosen uniformly among integers from segment [1; t + 1].

From the new item and the current player's item of the same type Roma chooses the best one (i.e. the one with greater level) and equips it (if both of them has the same level Roma choses any). The remaining item is sold for coins. Roma sells an item of level x of any type for x coins.

Help Roma determine the expected number of earned coins after the victory over n monsters.

Input

The first line contains two integers, n and k (1 ≤ n ≤ 105; 1 ≤ k ≤ 100).

Output

Print a real number — expected number of earned coins after victory over n monsters. The answer is considered correct if its relative or absolute error doesn't exceed 10 - 9.

Examples

Input

1 3


Output

1.0000000000


Input

2 1


Output

2.3333333333


Input

10 2


Output

15.9380768924

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
int n, d;
double f[2][610], g[2][610], F[100010], k;
int cnt, begin;
int main() {
  scanf("%d %lf", &n, &k);
  f[0][1] = k;
  for (register int i = 0; i < n; i++) {
    d ^= 1;
    register int lim = (i + 1 < begin + 200 ? i + 1 : begin + 200) + 1;
    for (register int j = begin; j <= lim; j++) f[d][j] = g[d][j] = 0, cnt++;
    for (register int j = begin; j <= lim; j++) {
      register double t1 = f[d ^ 1][j] / (j + 1) / k,
                      t2 = f[d ^ 1][j] / (j + 1) * j / k;
      f[d][j + 1] += t1;
      g[d][j + 1] += t1 * j;
      f[d][j] += t2;
      g[d][j] += f[d ^ 1][j] * j / 2 / k;
      f[d][j] += f[d ^ 1][j] - t1 - t2;
      cnt++;
    }
    for (register int j = begin; j <= lim; j++) F[i] += g[d][j], cnt++;
    while (f[d][begin] < 1e-16) begin++;
  }
  register double Ans = 0;
  for (register int i = 1; i <= n; i++) F[i] += F[i - 1];
  printf("%0.10lf\n", F[n]);
  return 0;
}