packages feed

aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/MultiWayIf/indented.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE MultiWayIf #-}
module Indented where

f :: Int -> Int -> Int
f x y = if
  | x > 0, y > 0 -> x + y
  | x < 0        -> -x
  | otherwise    -> y