Blah.

model/ExampleROProofMode.v

@@ -244,7 +244,7 @@ Proof using.
   xletfun => F HF.
   ram_apply_let (rule_box_up2 (fun (x:int) => (x + n)%Z) n).
   { intros. xdef. xletapp rule_box_get => m ->.
-    ram_apply rule_add. { auto with iFrame. } } (* TODO : improve. *)
+    ram_apply rule_add. { auto with iFrame. } }
   { iIntros "Hq Hp". iDestruct (Box_fold with "[$Hq $Hp]") as "$".
     auto with iFrame. }
   unlock. xpull=> u /= _. apply rule_htop_post. ram_apply rule_box_get.