fork download
  1. $_=$$/$$;@_=$_+$_;$__=$_-$_;$-_=$_-@_
  2. @___=->_,&__{_==[]?[]:[__[_[$__]]]+@___[_[$_..$-_],&__]}
  3. $____=->_{_==[]||_==''?$__:$_+$____[_[$_..$-_]]}
  4. @____=->_,&__{_==[]?[]:(__[_[$__]]?[_[$__]]:[])+@____[_[$_..$-_],&__]}
  5. $_____=->_,&__{___,*_____=*_
  6. _==[] ?[]:$_____[@____[_____,&->____{(__[___]<=>__[____])==$_}],&__]+
  7. [___]+$_____[@____[_____,&->____{(__[___]<=>__[____])<=$__}],&__]}
  8. @_____=->__{(___=->_{''<<_==__ ?_:___[_+$_]})[$_]}
  9. $______=->_{___=$____[_];__=[];$.=$__;(____=->{__<<_[$.];($.+=$_)==___ ?__:____[]})[]}
  10. @______=->_,__{(____=->___{_[___]==__ ?___:____[___+$_]})[$__]}
  11. $_______=->_,&__{___=$____[_];$.=$__;(____=->{__[_[$.]];($.+=$_)==___ ?_:____[]})[]}
  12. @_______=->_{$><<_<<(''<<@_*(@_+@_)+@_)}
  13. @________=@_**(@_*@_+$_)
  14. $________=->_____,_,__{_=@___[$______[_],&->___{@_____[___]|@________}]
  15. $_______[$_____[__,&->___{@___[$______[___],&->____{@______[_,@_____[____]|@________]}]}],&@_______]}
  16.  
  17. $________[8,'UVWXYZNOPQRSTHIJKLMABCDEFG',
  18. ['ANTLER','ANY','COW','HILL','HOW','HOWEVER','WHATEVER','ZONE']]
  19. @_______['']
  20. $________[5,'ZYXWVuTSRQpONMLkJIHGFEDCBa',
  21. ['go','aLL','ACM','teamS','Go']]
Success #stdin #stdout 0.05s 7492KB
stdin
Standard input is empty
stdout
WHATEVER
ZONE
HOW
HOWEVER
HILL
ANY
ANTLER
COW

teamS
go
Go
aLL
ACM