Skip to main content
Code Golf

Return to Answer

edited body
Source Link
PhiNotPi
PhiNotPi
  • 29.1k
  • 10
  • 85
  • 157

Element, 22 19 18 bytes

_'{"(3:~'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~'![2:`];'}
_                        input line
 '                       use as conditional
  {               }       WHILE loop
   "                     retrieve string back from control (c-) stack
    (                    split to get the first character of (remaining) string
     3:                  a total of three copies of that character
       ~                 retrieve character's hash value
        '                put on c-stack
         !               negate, gives true if undef/empty string
          [   ]          FOR loop
           2:`           duplicate and output
               ;         store character into itself
                '        put remaining string on c-stack as looping condition

Element, 22 19 18 bytes

_'{"(3:~'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~'![2:`];'}
_                        input line
 '                       use as conditional
  {               }      WHILE loop
   "                     retrieve string back from control (c-) stack
    (                    split to get the first character of (remaining) string
     3:                  a total of three copies of that character
       ~                 retrieve character's hash value
        '                put on c-stack
         !               negate, gives true if undef/empty string
          [   ]          FOR loop
           2:`           duplicate and output
               ;         store character into itself
                '        put remaining string on c-stack as looping condition

Element, 22 19 18 bytes

_'{"(3:~'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~'![2:`];'}
_                        input line
 '                       use as conditional
  {              }       WHILE loop
   "                     retrieve string back from control (c-) stack
    (                    split to get the first character of (remaining) string
     3:                  a total of three copies of that character
       ~                 retrieve character's hash value
        '                put on c-stack
         !               negate, gives true if undef/empty string
          [   ]          FOR loop
           2:`           duplicate and output
               ;         store character into itself
                '        put remaining string on c-stack as looping condition
added 26 characters in body
Source Link
PhiNotPi
PhiNotPi
  • 29.1k
  • 10
  • 85
  • 157

Element, 1922 19 18 bytes

_'{"(3:~$'~'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~$'~'![2:`];'}
_                         input line
 '                        use as conditional
  {               }       WHILE loop
   "                      retrieve string back from control (c-) stack
    (                     split to get the first character of (remaining) string
     3:                   a total of three copies of that character
       ~                  retrieve character's hash value
        $''                lengthput ason conditionc-stack
          !               negate, gives true if zero-length
undef/empty string
          [   ]          FOR loop
            2:`           duplicate and output
                ;         store character into itself
                 '        put remaining string on c-stack as looping condition

Element, 19 bytes

_'{"(3:~$'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~$'![2:`];'}
_                         input line
 '                        use as conditional
  {               }       WHILE loop
   "                      retrieve string back from control (c-) stack
    (                     split to get the first character of (remaining) string
     3:                   a total of three copies of that character
       ~                  retrieve character's hash value
        $'                length as condition
          !               if zero-length
           [   ]          FOR loop
            2:`           duplicate and output
                ;         store character into itself
                 '        put remaining string on c-stack as looping condition

Element, 22 19 18 bytes

_'{"(3:~'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~'![2:`];'}
_                        input line
 '                       use as conditional
  {               }      WHILE loop
   "                     retrieve string back from control (c-) stack
    (                    split to get the first character of (remaining) string
     3:                  a total of three copies of that character
       ~                 retrieve character's hash value
        '                put on c-stack
         !               negate, gives true if undef/empty string
          [   ]          FOR loop
           2:`           duplicate and output
               ;         store character into itself
                '        put remaining string on c-stack as looping condition
added 75 characters in body
Source Link
PhiNotPi
PhiNotPi
  • 29.1k
  • 10
  • 85
  • 157

Element, 2219 bytes

_2:$'[_'{"('1"23:~?~$'![2:`];]`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_2:$'[_'{"('1"23:~?~$'![2:`];]`];'}
_                         input line
 2:'                       duplicate
 use as $'conditional
  {               }    length of string asWHILE conditionloop
   "  [               ]    FOR loop
retrieve string back from control (c-) [stack
    (              ]    split (remaining) string split to get the first character of (remaining) string
     [3: '1"           ]    push   a 1total asof 2ndthree thingcopies inof stackthat character
     [  ~  2:         ]    duplicate the character retrieve character's hash value
     [   $'   ~        ]    retrieve character'slength hashas valuecondition
     [     !  ?!      ]    If zero/undefined
  if zero-length
  [         [   ] ]         FOR loop
     [       2:`  [2:`] ]    duplicate character   duplicate and output it
     [           ;   ;]      store thecharacter 1into fromitself
 earlier as the character's hash value           '        put remaining string on c-stack as looping condition

Element, 22 bytes

_2:$'[('1"2:~?![2:`];]

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_2:$'[('1"2:~?![2:`];]
_                         input line
 2:                       duplicate
   $'                     length of string as condition
     [               ]    FOR loop
     [(              ]    split (remaining) string to get first character
     [ '1"           ]    push a 1 as 2nd thing in stack
     [    2:         ]    duplicate the character
     [      ~        ]    retrieve character's hash value
     [       ?!      ]    If zero/undefined
     [         [   ] ]    FOR loop
     [         [2:`] ]    duplicate character and output it
     [              ;]    store the 1 from earlier as the character's hash value

Element, 19 bytes

_'{"(3:~$'![2:`];'}

Example input/output: hello world -> helo wrd

This works by simply processing the string one character at a time and keeping track which ones it has seen before.

_'{"(3:~$'![2:`];'}
_                         input line
 '                        use as conditional
  {               }       WHILE loop
   "                      retrieve string back from control (c-) stack
    (                     split to get the first character of (remaining) string
     3:                   a total of three copies of that character
       ~                  retrieve character's hash value
        $'                length as condition
          !               if zero-length
           [   ]          FOR loop
            2:`           duplicate and output
                ;         store character into itself
                 '        put remaining string on c-stack as looping condition
added 776 characters in body
Source Link
PhiNotPi
PhiNotPi
  • 29.1k
  • 10
  • 85
  • 157
Source Link
PhiNotPi
PhiNotPi
  • 29.1k
  • 10
  • 85
  • 157