You could do /gml ultra_set(5, 2, 1)
where 5 is character index (1=Fish,2=Crystal,etc.) and 2 is ultra mutation index (1,2,3). Pass 0 as the third argument to take it away