Wrong indentation in pretty printer

**Reproduce**:
```haskell
pPrint( ((1, 2), 3, (4)) )
```

**Current behavior**
```
(
( 1
, 2
)
, 3
, ( 4 )
)
```

**Expected behavior**: First tuple should be aligned with the rest of the elements.
```
(
( 1
, 2
)
, 3
, ( 4 )
)
```

Is the current behavior intentional?