points
https://overreacted.io/a-social-filesystem/
induction b with d hd rw [add_zero, zero_add] rfl rw [add_succ, succ_add] rw [hd] rfl