type.idel

来自「idel虚拟机源码」· IDEL 代码 · 共 3 行

def 2 0 type 
  { a n --  0 n < if  a c@ emit  a 1 +  n 1 -  type  then } ;