packages feed

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

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

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