From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <lambda.q.q@gmail.com>
Received: from mail4-relais-sop.national.inria.fr (mail4-relais-sop.national.inria.fr [192.134.164.105])
	by sympa.inria.fr (Postfix) with ESMTPS id F279B7EEAF
	for <caml-list@sympa.inria.fr>; Fri, 18 Jan 2013 07:32:18 +0100 (CET)
Received-SPF: None (mail4-smtp-sop.national.inria.fr: no sender
  authenticity information available from domain of
  lambda.q.q@gmail.com) identity=pra; client-ip=209.85.215.52;
  receiver=mail4-smtp-sop.national.inria.fr;
  envelope-from="lambda.q.q@gmail.com";
  x-sender="lambda.q.q@gmail.com";
  x-conformance=sidf_compatible
Received-SPF: Pass (mail4-smtp-sop.national.inria.fr: domain of
  lambda.q.q@gmail.com designates 209.85.215.52 as permitted
  sender) identity=mailfrom; client-ip=209.85.215.52;
  receiver=mail4-smtp-sop.national.inria.fr;
  envelope-from="lambda.q.q@gmail.com";
  x-sender="lambda.q.q@gmail.com";
  x-conformance=sidf_compatible; x-record-type="v=spf1"
Received-SPF: None (mail4-smtp-sop.national.inria.fr: no sender
  authenticity information available from domain of
  postmaster@mail-la0-f52.google.com) identity=helo;
  client-ip=209.85.215.52;
  receiver=mail4-smtp-sop.national.inria.fr;
  envelope-from="lambda.q.q@gmail.com";
  x-sender="postmaster@mail-la0-f52.google.com";
  x-conformance=sidf_compatible
X-IronPort-Anti-Spam-Filtered: true
X-IronPort-Anti-Spam-Result: AukBABbs+FDRVdc0jWdsb2JhbABFhX64NRYOAQEBAQkJCwkSBiOCHgEBBAEnEwYBOAEDAQsBBQUOEyUPAQQgAQUBIhOIBwMJBgSdfo8vhS4nDYhVAQUMkS0DiFuNMY5oP4FYgkQ
X-IronPort-AV: E=Sophos;i="4.84,490,1355094000"; 
   d="scan'208";a="168874493"
Received: from mail-la0-f52.google.com ([209.85.215.52])
  by mail4-smtp-sop.national.inria.fr with ESMTP/TLS/RC4-SHA; 18 Jan 2013 07:32:18 +0100
Received: by mail-la0-f52.google.com with SMTP id ee20so1396663lab.11
        for <caml-list@yquem.inria.fr>; Thu, 17 Jan 2013 22:32:17 -0800 (PST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
        d=gmail.com; s=20120113;
        h=x-received:sender:from:to:cc:subject:references:date:in-reply-to
         :message-id:user-agent:mime-version:content-type;
        bh=wmaJEhf/mIxiO5j7Ra0dUl+EZPxzMRUIMVtIvhiJB0k=;
        b=rI3YIiAoTQd4uKXsEUdAZmD1sp3uSJI9IpW8wgIyM2oZ4DuUi8QsNcmPrYi6/dMiEY
         VobJeeheRymIT0SXJniTG2PkkieyMpPv1h24nz4eIM2dpCNmaZfml7T/1DGAonsFoZLa
         xSdnMKal6Vj6FxW1Nl5+kJRaDC8eJLBBxKM9GScV5ka4vTyXX66owHfA4MrLqSO7FteI
         yQPmPW3IT3xv2ZBpZX8ibYtx+W0sH3CQVFMtSQLYS79QY8O+qgiLE1Fi0IJzzR0QW0zJ
         0O8MHXaM1vUy26WbRBN+NjwEZn8mTzIN7deRMcHY+DFTU5QwwNbjjKEMto9iBl/pjw5w
         ehsg==
X-Received: by 10.152.108.48 with SMTP id hh16mr7302495lab.25.1358490737595;
        Thu, 17 Jan 2013 22:32:17 -0800 (PST)
Received: from golf.niidar.ru.niidar.ru ([178.176.128.156])
        by mx.google.com with ESMTPS id fh4sm1637492lbb.7.2013.01.17.22.32.15
        (version=TLSv1.1 cipher=RC4-SHA bits=128/128);
        Thu, 17 Jan 2013 22:32:16 -0800 (PST)
Sender: Ivan Gotovchits <lambda.q.q@gmail.com>
From: Ivan Gotovchits <ivg@ieee.org>
To: Erkki Seppala <flux-caml@inside.org>
Cc: caml-list@yquem.inria.fr
References: <871udjt7e1.fsf@golf.niidar.ru>
	<m49pq13t3vi.fsf@coffee.modeemi.fi>
Date: Fri, 18 Jan 2013 10:32:08 +0400
In-Reply-To: <m49pq13t3vi.fsf@coffee.modeemi.fi> (Erkki Seppala's message of
	"Fri, 18 Jan 2013 08:13:53 +0200")
Message-ID: <87r4ljrogn.fsf@golf.niidar.ru>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.2 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Subject: Re: [Caml-list] Removing repeating code

Erkki Seppala <flux-caml@inside.org> writes:

> let f = function | Strings a | Floats a -> Array.length a
>

Nope,

  # let f = function | Strings a | Floats a -> Array.length a;;
  Characters 19-39:
    let f = function | Strings a | Floats a -> Array.length a;;
                       ^^^^^^^^^^^^^^^^^^^^
  Error: This pattern matches values of type string array
         but a pattern was expected which matches values of type float array


Strings a cannot be unified with Floats a ...


-- 
         (__) 
         (oo) 
   /------\/ 
  / |    ||   
 *  /\---/\ 
    ~~   ~~   
...."Have you mooed today?"...