case

case 'case :: p :: _ =>
      val list = asList(x)
      val listOfParam = list.tail.tail
      def loop(l: List[Data]): Data = l match {
        case xs :: Nil => xs match {
          case 'else :: z :: Nil =>
            eval(z, env)
        }
        case xs :: _ => xs match {
          case y :: z :: Nil => //eval(('if :: ('= :: y :: p :: Nil) :: z :: loop(l.tail) :: Nil), env)
                      if (p == y) {
                        eval(z, env)
                      } else {
                        loop(l.tail)
                      }
        }
      }

      loop(listOfParam)