#include "plants.h"
#include <bits/stdc++.h>
using namespace std;
struct lazy_segtree {
vector<pair<int,int>> T;
vector<int> lz;
int n;
void build(vector<int> &a, int tl, int tr, int v) {
if(tl == tr) {
T[v] = {a[tl], tl};
return;
}
int tm = (tl+tr)/2;
build(a, tl, tm, 2*v);
build(a, tm+1, tr, 2*v+1);
T[v] = min(T[2*v], T[2*v+1]);
}
lazy_segtree(vector<int> &a) {
n=a.size();
T.resize(4*n);
lz.resize(4*n);
build(a, 0, n-1, 1);
}
void push(int v){
lz[2*v] += lz[v];
lz[2*v+1] += lz[v];
T[2*v].first += lz[v];
T[2*v+1].first += lz[v];
lz[v] = 0;
}
void update(int l, int r, int add, int tl, int tr, int v) {
if(r < tl or tr < l)return;
if(l <= tl and tr<=r) {
lz[v]+=add;
T[v].first+=add;
return;
}
push(v);
int tm=(tl+tr)/2;
update(l, r, add, tl, tm, 2*v);
update(l, r, add, tm+1, tr, 2*v+1);
T[v] = min(T[2*v], T[2*v+1]);
}
pair<int,int> query(int l, int r, int tl, int tr, int v) {
if(r < tl or tr < l)return {1e9, 1e9};
if(l <= tl and tr<=r)return T[v];
push(v);
int tm=(tl+tr)/2;
return min(query(l, r, tl, tm, 2*v), query(l, r, tm+1, tr, 2*v+1));
}
void update(int l, int r, int add) {
update(l, r, add, 0, n-1, 1);
}
pair<int,int> query(int l, int r) {
return query(l, r, 0, n-1, 1);
}
};
vector<int> H;
void init(int k, std::vector<int> r) {
int n = r.size();
lazy_segtree ls(r);
int cnt = n;
H.resize(n, -1);
auto dfs = [&](int at, auto &&dfs) -> void {
if(at >= k-1) {
pair<int,int> val = ls.query(at-k+1, at-1);
while(val.first == 0) {
dfs(val.second, dfs);
val = ls.query(at-k+1, at-1);
}
H[at] = cnt--;
ls.update(at-k+1, at-1, -1);
ls.update(at, at, 1e9);
}
else {
pair<int,int> val = min(ls.query(0, at-1), ls.query(n-k+at+1, n-1));
while(val.first == 0) {
dfs(val.second, dfs);
val = min(ls.query(0, at-1), ls.query(n-k+at+1, n-1));
}
H[at] = cnt--;
ls.update(0, at-1, -1), ls.update(n-k+at+1, n-1, -1);
ls.update(at, at, 1e9);
}
};
while(ls.query(0, n-1).first == 0) {
dfs(ls.query(0, n-1).second, dfs);
}
return;
}
int compare_plants(int x, int y) {
if(H[x] < H[y])return -1;
return 1;
}
