Add indentation rules for patterns guards

[coot]

fun a | a == 0 = ?r
         | otherwise = ?r

or

fun =  case _ of
  x | x == 0 -> ?r
     | otherwise -> ?r