#include <bits/stdc++.h>
using namespace std;
int n;
double seg[131072 << 1], alazy[131072 << 1], mlazy[131072 << 1];
double a[131072];
int size(int n) {
  int siz = 1;
  for (; siz < n; siz <<= 1)
    ;
  return siz << 1;
}
void build(int id, int l, double r) {
  mlazy[id] = 1;
  if (l == r - 1) {
    seg[id] = a[l];
    return;
  }
  int mid = (l + r) / 2;
  build(2 * id, l, mid);
  build(2 * id + 1, mid, r);
  seg[id] = seg[2 * id] + seg[2 * id + 1];
}
void lazy_updatea(int id, int l, int r, double x) {
  seg[id] += (r - l) * x;
  alazy[id] += x;
}
void lazy_updatem(int id, int l, int r, double x) {
  seg[id] = (seg[id]) * x;
  mlazy[id] *= x;
  alazy[id] *= x;
}
void shift(int id, int l, int r) {
  int mid = (l + r) / 2;
  lazy_updatem(2 * id, l, mid, mlazy[id]);
  lazy_updatem(2 * id + 1, mid, r, mlazy[id]);
  mlazy[id] = 1.0;
  lazy_updatea(2 * id, l, mid, alazy[id]);
  lazy_updatea(2 * id + 1, mid, r, alazy[id]);
  alazy[id] = 0;
}
void range_update_mult(int x, int y, double val, int id = 1, int l = 1,
                       int r = n + 1) {
  if (y - 1 < l || r - 1 < x) return;
  if (l >= x && r - 1 <= y - 1) {
    lazy_updatem(id, l, r, val);
    return;
  }
  shift(id, l, r);
  int mid = (l + r) / 2;
  range_update_mult(x, y, val, 2 * id, l, mid);
  range_update_mult(x, y, val, 2 * id + 1, mid, r);
  seg[id] = seg[2 * id] + seg[2 * id + 1];
}
void range_update_ad(int x, int y, double val, int id = 1, int l = 1,
                     int r = n + 1) {
  if (y - 1 < l || r - 1 < x) return;
  if (l >= x && r - 1 <= y - 1) {
    lazy_updatea(id, l, r, val);
    return;
  }
  shift(id, l, r);
  int mid = (l + r) / 2;
  range_update_ad(x, y, val, 2 * id, l, mid);
  range_update_ad(x, y, val, 2 * id + 1, mid, r);
  seg[id] = seg[2 * id] + seg[2 * id + 1];
}
double sum_lazy(int x, int y, int id = 1, int l = 1, int r = n + 1) {
  if (l >= x && r - 1 <= y - 1) return seg[id];
  if (l > y - 1 || r - 1 < x) return 0;
  shift(id, l, r);
  int mid = (l + r) / 2;
  return sum_lazy(x, y, 2 * id, l, mid) + sum_lazy(x, y, 2 * id + 1, mid, r);
}
int main() {
  int q;
  cin >> n >> q;
  for (int i = int(1); i < int(n + 1); i++) {
    cin >> a[i];
  }
  int size_ofstree = size(n);
  memset(alazy, 0, sizeof alazy);
  build(1, 1, n + 1);
  int t, l, r, ll, rr, lll, rrr;
  while (q--) {
    cin >> t;
    if (t == 1) {
      cin >> l >> r >> ll >> rr;
      double currexpsum1 = sum_lazy(l, r + 1) / (r - l + 1);
      double currexpsum2 = sum_lazy(ll, rr + 1) / (rr - ll + 1);
      range_update_mult(l, r + 1, (double)(r - l) / (double)(r - l + 1));
      range_update_mult(ll, rr + 1, (double)(rr - ll) / (double)(rr - ll + 1));
      range_update_ad(l, r + 1, currexpsum2 / (double)(r - l + 1));
      range_update_ad(ll, rr + 1, currexpsum1 / (double)(rr - ll + 1));
    } else {
      cin >> lll >> rrr;
      printf("%.9lf\n", sum_lazy(lll, rrr + 1));
    }
  }
  return 0;
}
