procedure Test.0 (): let Test.19 : [C [C [C *self, C ]], C ] = TagId(1) ; let Test.17 : [C [C *self, C ]] = TagId(0) Test.19; let Test.16 : [C [C [C *self, C ]], C ] = TagId(0) Test.17; let Test.4 : [C [C *self, C ]] = TagId(0) Test.16; ret Test.4;