З огляду на введення рядка, що представляє визначення функції, виведіть рядок з новими рядками та пробілами, щоб аргументи функції були розділені на новий рядок та вирівняні.

Рядок введення буде відповідати наступному шаблону:

• По-перше, він розпочнеться з префікса, який завжди має принаймні один символ і не містить жодного символу ,().

• Відкрита дужка ( () позначатиме початок списку аргументів.

• Після цього вийде список нульових або більше аргументів. Вони розділені рядком ", "(комою, а потім пробілом). Жоден із аргументів не містить жодного символу ,().

• Близька дужка ( )) позначатиме кінець списку аргументів.

• Нарешті, може бути знайдено постфікс, який дорівнює нулю або більше символів і може містити символи ,().

Вхідний рядок буде складатися виключно з друкованого ASCII (це означає, що він ніколи не буде містити новий рядок).

Вихід повинен бути:

• Префікс, скопійований дослівно, і відкриті дужки.

• Список аргументів цього разу розділений не ", "комою, новим рядком, а стільки пробілів, скільки потрібно для вертикального вирівнювання першого символу кожного аргументу.

• Близький батьківський і постфікс (якщо він існує) дослівно.

Оскільки це код-гольф , найкоротший код у байтах виграє.

Тестові приклади (формат: однолінійний вхід з подальшим результатом з подвійним новим рядком):

def foo(bar, baz, quux):
def foo(bar,
        baz,
        quux):

int main() {
int main() {

fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {
fn f(a: i32,
     b: f64,
     c: String) -> (String, Vec<i32>) {

function g(h) {
function g(h) {

def abc(def, ghi, jkl, mno)
def abc(def,
        ghi,
        jkl,
        mno)

x y z(x, y, z) x, y, z)
x y z(x,
      y,
      z) x, y, z)

Haskell, 115 байт

import Data.Lists
f x|(a,b:c)<-span(/='(')x,(d,e)<-span(/=')')c=a++b:intercalate(",\n "++(a>>" "))(splitOn", "d)++e

Приклад використання:

*Main> putStrLn $ f "fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {"
fn f(a: i32,
     b: f64,
     c: String) -> (String, Vec<i32>) {

Як це працює:

bind
  a: everything before the first (
  b: the first (
  c: everything after the first (
  d: everything of c before the first )
  e: everything of c from the first ) to the end

construct the output string by concatenating
  a
  b
  splitting d at the argument separator ", " and rejoining it with ",\n " followed by (length a) spaces    
  e

Japt, 23 байти

¡Y?X:Xr',",
"+SpUb'(}')

Перевірте це в Інтернеті!

Як це працює

               // Implicit: U = input string
¡        }')   // Map each item X and index Y in U.split(")") to:
Y?X            //  If Y is non-zero, X. This keeps e.g. "(String, Vec<i32>)" from being parsed.
:Xr',",\n"+    //  Otherwise, X with each comma replaced with ",\n" concatenated with
SpUb'(         //  U.indexOf("(") spaces.
               // Implicit: re-join with ")", output

Perl, 62 52 + 2 = 54 байти

s/\(.*?\)/$a=$"x length$`;$&=~s|(?<=,)[^,]+|\n$a$&|gr/e

Потрібен -pпрапор:

$ echo "x y z(x, y, z) x, y, z)
fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {" | \
perl -pe's/\(.*?\)/$a=$"x length$`;$&=~s|(?<=,)[^,]+|\n$a$&|gr/e'
x y z(x,
      y,
      z) x, y, z)
fn f(a: i32,
     b: f64,
     c: String) -> (String, Vec<i32>) {

Як це працює:

# '-p' reads first line into $_ and will also auto print at the end
s/\(.*?\)/             # Match (...) and replace with the below
  $a=$"x length$`;     # $` contains all the content before the matched string
                       # And $" contains a literal space 
  $&=~s|               # Replace in previous match
    (?<=,)[^,]+        # Check for a , before the the string to match
                       # This will match ' b: f64', ' c: String'
  |\n$a$&|gr/e         # Replace with \n, [:spaces:] and all the matched text

Сітківка, 31 байт

(?<=^([^(])*\([^)]*,) 
¶ $#1$* 

Зверніть увагу на пробіли в кінці обох рядків.

Ми замінюємо кожен простір, який має ^([^(])*\([^)]*,перед собою регулярний вираз . Замінним рядком буде новий рядок, а кількість захоплень ([^(])*плюс один пробіл.

Більш узгоджене пояснення з’являється пізніше.

Спробуйте його онлайн тут.

ES6, 68 67 байт

s=>s.replace(/\(.*?\)/,(s,n)=>s.replace/, /g, `,
 `+` `.repeat(n)))

Це працює шляхом вилучення списку аргументів з початкового рядка та заміни кожного роздільника аргументів відступом, обчисленим з положення списку аргументів у вихідному рядку.

Редагувати: Збережено 1 байт завдяки @ETHproductions.

Pyth, 35 30 байт

+j++\,b*dhxz\(c<zKhxz\)", ">zK

Спробуйте тут!

Пояснення:

+j++\,b*dhxz\(c<zKhxz\)", ">zK    # z = input()

                 Khxz\)           # Get index of the first ")"
               <z                 # Take the string until there...
              c        ", "       # ...and split it on the arguments
 j                                # Join the splitted string on...
  ++                              # ...the concatenation of...
    \,b                           # ...a comma followed by a newline...
       *dhxz\(                    # ...followed by the right amount of spaces = index of the first "(" + 1
+                         >zK     # Concat the resulting string with the postfix

Groovy, 137 89 95 байт

Groovy не є «правильним інструментом для роботи» ™. Редагувати: Це добре працює, коли у вас є хтось із мозком, який використовує його ...

f={s=(it+' ').split(/\0/)
s[0].replace(',',',\n'+(' '*it.indexOf('(')))+')'+s[1..-1].join(')')}

Тести:

println f("def foo(bar, baz, quux):")
println f("int main() {")
println f("fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {")
println f("function g(h) {")
println f("def abc(def, ghi, jkl, mno)")
println f("x y z(x, y, z) x, y, z)")

Дещо незворушний:

f = {String it ->
    def str = (it + ' ').split(/\)/)
    return (str[0].replace (',', ',\n'+(' ' * it.indexOf('('))) + ')' + str[1])
}

Сітківка , 47 байт

Кількість байтів передбачає кодування ISO 8859-1.

m+`^(([^(]+.)[^,)]+,) (.+)
$1¶$2$3
T`p` `¶.+?\(

Спробуйте в Інтернеті!

JavaScript (ES6), 85

s=>s.replace(/^.*?\(|[^),]+, |.+/g,(x,p)=>[a+x,a=a||(p?`
`+' '.repeat(p):a)][0],a='')

Тест

f=s=>s.replace(/^.*?\(|[^),]+, |.+/g,(x,p)=>[a+x,a=a||(p?`
`+' '.repeat(p):a)][0],a='')

console.log=x=>O.textContent+=x+'\n'

;['def foo(bar, baz, quux):',
  'int main() {',
  'fn f(a: i32, b: f64, c: String) -> (String, Vec<i32>) {',
  'function g(h) {',
  'def abc(def, ghi, jkl, mno)',
  'x y z(x, y, z) x, y, z)']
.forEach(t=>console.log(t+'\n'+f(t)+'\n'))

<pre id=O></pre>

Желе , 39 байт

ṣ”)Ḣṣ”(Ṫ©œṣ⁾, ji”(⁶ẋƊ⁾,¶;ƊḢ,j®${jʋ@œṣ®$

Спробуйте в Інтернеті!