(@n rename begin) (@t length begin) (@m import begin) (@x export begin) (@c clip color :clip :random-color) (@openbracket select :clip-prev) (@closebracket select :clip-next) (@lt swap :clip :clip-prev) (@gt swap :clip :clip-next) (@delete clip/delete :clip) (@shift-A clip/add :after :new-clip) (@shift-D clip/add :after :cloned-clip)