URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [ada/] [g-alveop.adb] - Rev 414
Go to most recent revision | Compare with Previous | Blame | View Log
------------------------------------------------------------------------------ -- -- -- GNAT COMPILER COMPONENTS -- -- -- -- G N A T . A L T I V E C . V E C T O R _ O P E R A T I O N S -- -- -- -- B o d y -- -- -- -- Copyright (C) 2004-2009, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- -- ware Foundation; either version 3, or (at your option) any later ver- -- -- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- -- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- -- or FITNESS FOR A PARTICULAR PURPOSE. -- -- -- -- As a special exception under Section 7 of GPL version 3, you are granted -- -- additional permissions described in the GCC Runtime Library Exception, -- -- version 3.1, as published by the Free Software Foundation. -- -- -- -- You should have received a copy of the GNU General Public License and -- -- a copy of the GCC Runtime Library Exception along with this program; -- -- see the files COPYING3 and COPYING.RUNTIME respectively. If not, see -- -- <http://www.gnu.org/licenses/>. -- -- -- -- GNAT was originally developed by the GNAT team at New York University. -- -- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ with GNAT.Altivec.Low_Level_Vectors; use GNAT.Altivec.Low_Level_Vectors; package body GNAT.Altivec.Vector_Operations is -------------------------------------------------------- -- Bodies for generic and specific Altivec operations -- -------------------------------------------------------- -- vec_abs -- function vec_abs (A : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (abs_v16qi (A)); end vec_abs; function vec_abs (A : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (abs_v8hi (A)); end vec_abs; function vec_abs (A : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (abs_v4si (A)); end vec_abs; function vec_abs (A : vector_float) return vector_float is begin return To_LL_VF (abs_v4sf (A)); end vec_abs; -- vec_abss -- function vec_abss (A : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (abss_v16qi (A)); end vec_abss; function vec_abss (A : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (abss_v8hi (A)); end vec_abss; function vec_abss (A : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (abss_v4si (A)); end vec_abss; -- vec_add -- function vec_add (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_add; function vec_add (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_add; function vec_add (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_add; function vec_add (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_add; function vec_add (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_add; function vec_add (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_add; function vec_add (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_add; function vec_add (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_add; function vec_add (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_add; function vec_add (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_add; function vec_add (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_add; function vec_add (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_add; function vec_add (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_add; function vec_add (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_add; function vec_add (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_add; function vec_add (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_add; function vec_add (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_add; function vec_add (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_add; function vec_add (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vaddfp (To_LL_VF (A), To_LL_VF (B))); end vec_add; -- vec_vaddfp -- function vec_vaddfp (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vaddfp (To_LL_VF (A), To_LL_VF (B))); end vec_vaddfp; -- vec_vadduwm -- function vec_vadduwm (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduwm; function vec_vadduwm (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduwm; function vec_vadduwm (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduwm; function vec_vadduwm (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduwm; function vec_vadduwm (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduwm; function vec_vadduwm (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduwm; -- vec_vadduhm -- function vec_vadduhm (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhm; function vec_vadduhm (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhm; function vec_vadduhm (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhm; function vec_vadduhm (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhm; function vec_vadduhm (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhm; function vec_vadduhm (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhm; -- vec_vaddubm -- function vec_vaddubm (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubm; function vec_vaddubm (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubm; function vec_vaddubm (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubm; function vec_vaddubm (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubm; function vec_vaddubm (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubm; function vec_vaddubm (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubm; -- vec_addc -- function vec_addc (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vaddcuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_addc; -- vec_adds -- function vec_adds (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubs (To_LL_VSC (A), To_LL_VSC (B))); end vec_adds; function vec_adds (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubs (To_LL_VSC (A), To_LL_VSC (B))); end vec_adds; function vec_adds (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubs (To_LL_VSC (A), To_LL_VSC (B))); end vec_adds; function vec_adds (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_adds; function vec_adds (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vaddsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_adds; function vec_adds (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_adds; function vec_adds (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_adds; function vec_adds (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_adds; function vec_adds (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_adds; function vec_adds (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vaddshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_adds; function vec_adds (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vaddshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_adds; function vec_adds (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vaddshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_adds; function vec_adds (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduws (To_LL_VSI (A), To_LL_VSI (B))); end vec_adds; function vec_adds (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vadduws (To_LL_VSI (A), To_LL_VSI (B))); end vec_adds; function vec_adds (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduws (To_LL_VSI (A), To_LL_VSI (B))); end vec_adds; function vec_adds (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vaddsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_adds; function vec_adds (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vaddsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_adds; function vec_adds (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vaddsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_adds; -- vec_vaddsws -- function vec_vaddsws (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vaddsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vaddsws; function vec_vaddsws (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vaddsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vaddsws; function vec_vaddsws (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vaddsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vaddsws; -- vec_vadduws -- function vec_vadduws (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduws; function vec_vadduws (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vadduws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduws; function vec_vadduws (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vadduws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vadduws; -- vec_vaddshs -- function vec_vaddshs (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vaddshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vaddshs; function vec_vaddshs (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vaddshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vaddshs; function vec_vaddshs (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vaddshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vaddshs; -- vec_vadduhs -- function vec_vadduhs (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhs; function vec_vadduhs (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhs; function vec_vadduhs (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vadduhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vadduhs; -- vec_vaddsbs -- function vec_vaddsbs (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddsbs; function vec_vaddsbs (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vaddsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddsbs; function vec_vaddsbs (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vaddsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddsbs; -- vec_vaddubs -- function vec_vaddubs (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubs; function vec_vaddubs (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubs; function vec_vaddubs (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vaddubs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vaddubs; -- vec_and -- function vec_and (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_float; B : vector_bool_int) return vector_float is begin return To_LL_VF (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_int; B : vector_float) return vector_float is begin return To_LL_VF (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; function vec_and (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vand (To_LL_VSI (A), To_LL_VSI (B))); end vec_and; -- vec_andc -- function vec_andc (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_float; B : vector_bool_int) return vector_float is begin return To_LL_VF (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_int; B : vector_float) return vector_float is begin return To_LL_VF (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; function vec_andc (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vandc (To_LL_VSI (A), To_LL_VSI (B))); end vec_andc; -- vec_avg -- function vec_avg (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vavgub (To_LL_VSC (A), To_LL_VSC (B))); end vec_avg; function vec_avg (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vavgsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_avg; function vec_avg (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vavguh (To_LL_VSS (A), To_LL_VSS (B))); end vec_avg; function vec_avg (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vavgsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_avg; function vec_avg (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vavguw (To_LL_VSI (A), To_LL_VSI (B))); end vec_avg; function vec_avg (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vavgsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_avg; -- vec_vavgsw -- function vec_vavgsw (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vavgsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vavgsw; -- vec_vavguw -- function vec_vavguw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vavguw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vavguw; -- vec_vavgsh -- function vec_vavgsh (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vavgsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vavgsh; -- vec_vavguh -- function vec_vavguh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vavguh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vavguh; -- vec_vavgsb -- function vec_vavgsb (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vavgsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vavgsb; -- vec_vavgub -- function vec_vavgub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vavgub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vavgub; -- vec_ceil -- function vec_ceil (A : vector_float) return vector_float is begin return To_LL_VF (vrfip (To_LL_VF (A))); end vec_ceil; -- vec_cmpb -- function vec_cmpb (A : vector_float; B : vector_float) return vector_signed_int is begin return To_LL_VSI (vcmpbfp (To_LL_VF (A), To_LL_VF (B))); end vec_cmpb; -- vec_cmpeq -- function vec_cmpeq (A : vector_signed_char; B : vector_signed_char) return vector_bool_char is begin return To_LL_VBC (vcmpequb (To_LL_VSC (A), To_LL_VSC (B))); end vec_cmpeq; function vec_cmpeq (A : vector_unsigned_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vcmpequb (To_LL_VSC (A), To_LL_VSC (B))); end vec_cmpeq; function vec_cmpeq (A : vector_signed_short; B : vector_signed_short) return vector_bool_short is begin return To_LL_VBS (vcmpequh (To_LL_VSS (A), To_LL_VSS (B))); end vec_cmpeq; function vec_cmpeq (A : vector_unsigned_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vcmpequh (To_LL_VSS (A), To_LL_VSS (B))); end vec_cmpeq; function vec_cmpeq (A : vector_signed_int; B : vector_signed_int) return vector_bool_int is begin return To_LL_VBI (vcmpequw (To_LL_VSI (A), To_LL_VSI (B))); end vec_cmpeq; function vec_cmpeq (A : vector_unsigned_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vcmpequw (To_LL_VSI (A), To_LL_VSI (B))); end vec_cmpeq; function vec_cmpeq (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpeqfp (To_LL_VF (A), To_LL_VF (B))); end vec_cmpeq; -- vec_vcmpeqfp -- function vec_vcmpeqfp (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpeqfp (To_LL_VF (A), To_LL_VF (B))); end vec_vcmpeqfp; -- vec_vcmpequw -- function vec_vcmpequw (A : vector_signed_int; B : vector_signed_int) return vector_bool_int is begin return To_LL_VBI (vcmpequw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vcmpequw; function vec_vcmpequw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vcmpequw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vcmpequw; -- vec_vcmpequh -- function vec_vcmpequh (A : vector_signed_short; B : vector_signed_short) return vector_bool_short is begin return To_LL_VBS (vcmpequh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vcmpequh; function vec_vcmpequh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vcmpequh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vcmpequh; -- vec_vcmpequb -- function vec_vcmpequb (A : vector_signed_char; B : vector_signed_char) return vector_bool_char is begin return To_LL_VBC (vcmpequb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vcmpequb; function vec_vcmpequb (A : vector_unsigned_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vcmpequb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vcmpequb; -- vec_cmpge -- function vec_cmpge (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpgefp (To_LL_VF (A), To_LL_VF (B))); end vec_cmpge; -- vec_cmpgt -- function vec_cmpgt (A : vector_unsigned_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vcmpgtub (To_LL_VSC (A), To_LL_VSC (B))); end vec_cmpgt; function vec_cmpgt (A : vector_signed_char; B : vector_signed_char) return vector_bool_char is begin return To_LL_VBC (vcmpgtsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_cmpgt; function vec_cmpgt (A : vector_unsigned_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vcmpgtuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_cmpgt; function vec_cmpgt (A : vector_signed_short; B : vector_signed_short) return vector_bool_short is begin return To_LL_VBS (vcmpgtsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_cmpgt; function vec_cmpgt (A : vector_unsigned_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vcmpgtuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_cmpgt; function vec_cmpgt (A : vector_signed_int; B : vector_signed_int) return vector_bool_int is begin return To_LL_VBI (vcmpgtsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_cmpgt; function vec_cmpgt (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpgtfp (To_LL_VF (A), To_LL_VF (B))); end vec_cmpgt; -- vec_vcmpgtfp -- function vec_vcmpgtfp (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpgtfp (To_LL_VF (A), To_LL_VF (B))); end vec_vcmpgtfp; -- vec_vcmpgtsw -- function vec_vcmpgtsw (A : vector_signed_int; B : vector_signed_int) return vector_bool_int is begin return To_LL_VBI (vcmpgtsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vcmpgtsw; -- vec_vcmpgtuw -- function vec_vcmpgtuw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vcmpgtuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vcmpgtuw; -- vec_vcmpgtsh -- function vec_vcmpgtsh (A : vector_signed_short; B : vector_signed_short) return vector_bool_short is begin return To_LL_VBS (vcmpgtsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vcmpgtsh; -- vec_vcmpgtuh -- function vec_vcmpgtuh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vcmpgtuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vcmpgtuh; -- vec_vcmpgtsb -- function vec_vcmpgtsb (A : vector_signed_char; B : vector_signed_char) return vector_bool_char is begin return To_LL_VBC (vcmpgtsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vcmpgtsb; -- vec_vcmpgtub -- function vec_vcmpgtub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vcmpgtub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vcmpgtub; -- vec_cmple -- function vec_cmple (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpgefp (To_LL_VF (B), To_LL_VF (A))); end vec_cmple; -- vec_cmplt -- function vec_cmplt (A : vector_unsigned_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vcmpgtub (To_LL_VSC (B), To_LL_VSC (A))); end vec_cmplt; function vec_cmplt (A : vector_signed_char; B : vector_signed_char) return vector_bool_char is begin return To_LL_VBC (vcmpgtsb (To_LL_VSC (B), To_LL_VSC (A))); end vec_cmplt; function vec_cmplt (A : vector_unsigned_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vcmpgtuh (To_LL_VSS (B), To_LL_VSS (A))); end vec_cmplt; function vec_cmplt (A : vector_signed_short; B : vector_signed_short) return vector_bool_short is begin return To_LL_VBS (vcmpgtsh (To_LL_VSS (B), To_LL_VSS (A))); end vec_cmplt; function vec_cmplt (A : vector_unsigned_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vcmpgtuw (To_LL_VSI (B), To_LL_VSI (A))); end vec_cmplt; function vec_cmplt (A : vector_signed_int; B : vector_signed_int) return vector_bool_int is begin return To_LL_VBI (vcmpgtsw (To_LL_VSI (B), To_LL_VSI (A))); end vec_cmplt; function vec_cmplt (A : vector_float; B : vector_float) return vector_bool_int is begin return To_LL_VBI (vcmpgtfp (To_LL_VF (B), To_LL_VF (A))); end vec_cmplt; -- vec_expte -- function vec_expte (A : vector_float) return vector_float is begin return To_LL_VF (vexptefp (To_LL_VF (A))); end vec_expte; -- vec_floor -- function vec_floor (A : vector_float) return vector_float is begin return To_LL_VF (vrfim (To_LL_VF (A))); end vec_floor; -- vec_ld -- function vec_ld (A : c_long; B : const_vector_float_ptr) return vector_float is begin return To_LL_VF (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_float_ptr) return vector_float is begin return To_LL_VF (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_bool_int_ptr) return vector_bool_int is begin return To_LL_VBI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_signed_int_ptr) return vector_signed_int is begin return To_LL_VSI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_int_ptr) return vector_signed_int is begin return To_LL_VSI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_long_ptr) return vector_signed_int is begin return To_LL_VSI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_unsigned_int_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_unsigned_int_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_unsigned_long_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_bool_short_ptr) return vector_bool_short is begin return To_LL_VBS (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_pixel_ptr) return vector_pixel is begin return To_LL_VP (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_signed_short_ptr) return vector_signed_short is begin return To_LL_VSS (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_short_ptr) return vector_signed_short is begin return To_LL_VSS (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_unsigned_short_ptr) return vector_unsigned_short is begin return To_LL_VUS (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_unsigned_short_ptr) return vector_unsigned_short is begin return To_LL_VUS (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_bool_char_ptr) return vector_bool_char is begin return To_LL_VBC (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_signed_char_ptr) return vector_signed_char is begin return To_LL_VSC (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_signed_char_ptr) return vector_signed_char is begin return To_LL_VSC (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_vector_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvx (A, To_PTR (B))); end vec_ld; function vec_ld (A : c_long; B : const_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvx (A, To_PTR (B))); end vec_ld; -- vec_lde -- function vec_lde (A : c_long; B : const_signed_char_ptr) return vector_signed_char is begin return To_LL_VSC (lvebx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvebx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_short_ptr) return vector_signed_short is begin return To_LL_VSS (lvehx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_unsigned_short_ptr) return vector_unsigned_short is begin return To_LL_VUS (lvehx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_float_ptr) return vector_float is begin return To_LL_VF (lvewx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_int_ptr) return vector_signed_int is begin return To_LL_VSI (lvewx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_unsigned_int_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvewx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_long_ptr) return vector_signed_int is begin return To_LL_VSI (lvewx (A, To_PTR (B))); end vec_lde; function vec_lde (A : c_long; B : const_unsigned_long_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvewx (A, To_PTR (B))); end vec_lde; -- vec_lvewx -- function vec_lvewx (A : c_long; B : float_ptr) return vector_float is begin return To_LL_VF (lvewx (A, To_PTR (B))); end vec_lvewx; function vec_lvewx (A : c_long; B : int_ptr) return vector_signed_int is begin return To_LL_VSI (lvewx (A, To_PTR (B))); end vec_lvewx; function vec_lvewx (A : c_long; B : unsigned_int_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvewx (A, To_PTR (B))); end vec_lvewx; function vec_lvewx (A : c_long; B : long_ptr) return vector_signed_int is begin return To_LL_VSI (lvewx (A, To_PTR (B))); end vec_lvewx; function vec_lvewx (A : c_long; B : unsigned_long_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvewx (A, To_PTR (B))); end vec_lvewx; -- vec_lvehx -- function vec_lvehx (A : c_long; B : short_ptr) return vector_signed_short is begin return To_LL_VSS (lvehx (A, To_PTR (B))); end vec_lvehx; function vec_lvehx (A : c_long; B : unsigned_short_ptr) return vector_unsigned_short is begin return To_LL_VUS (lvehx (A, To_PTR (B))); end vec_lvehx; -- vec_lvebx -- function vec_lvebx (A : c_long; B : signed_char_ptr) return vector_signed_char is begin return To_LL_VSC (lvebx (A, To_PTR (B))); end vec_lvebx; function vec_lvebx (A : c_long; B : unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvebx (A, To_PTR (B))); end vec_lvebx; -- vec_ldl -- function vec_ldl (A : c_long; B : const_vector_float_ptr) return vector_float is begin return To_LL_VF (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_float_ptr) return vector_float is begin return To_LL_VF (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_bool_int_ptr) return vector_bool_int is begin return To_LL_VBI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_signed_int_ptr) return vector_signed_int is begin return To_LL_VSI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_int_ptr) return vector_signed_int is begin return To_LL_VSI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_long_ptr) return vector_signed_int is begin return To_LL_VSI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_unsigned_int_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_unsigned_int_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_unsigned_long_ptr) return vector_unsigned_int is begin return To_LL_VUI (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_bool_short_ptr) return vector_bool_short is begin return To_LL_VBS (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_pixel_ptr) return vector_pixel is begin return To_LL_VP (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_signed_short_ptr) return vector_signed_short is begin return To_LL_VSS (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_short_ptr) return vector_signed_short is begin return To_LL_VSS (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_unsigned_short_ptr) return vector_unsigned_short is begin return To_LL_VUS (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_unsigned_short_ptr) return vector_unsigned_short is begin return To_LL_VUS (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_bool_char_ptr) return vector_bool_char is begin return To_LL_VBC (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_signed_char_ptr) return vector_signed_char is begin return To_LL_VSC (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_signed_char_ptr) return vector_signed_char is begin return To_LL_VSC (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_vector_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvxl (A, To_PTR (B))); end vec_ldl; function vec_ldl (A : c_long; B : const_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvxl (A, To_PTR (B))); end vec_ldl; -- vec_loge -- function vec_loge (A : vector_float) return vector_float is begin return To_LL_VF (vlogefp (To_LL_VF (A))); end vec_loge; -- vec_lvsl -- function vec_lvsl (A : c_long; B : constv_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_signed_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_unsigned_short_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_short_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_unsigned_int_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_int_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_unsigned_long_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_long_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; function vec_lvsl (A : c_long; B : constv_float_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsl (A, To_PTR (B))); end vec_lvsl; -- vec_lvsr -- function vec_lvsr (A : c_long; B : constv_unsigned_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_signed_char_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_unsigned_short_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_short_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_unsigned_int_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_int_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_unsigned_long_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_long_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; function vec_lvsr (A : c_long; B : constv_float_ptr) return vector_unsigned_char is begin return To_LL_VUC (lvsr (A, To_PTR (B))); end vec_lvsr; -- vec_madd -- function vec_madd (A : vector_float; B : vector_float; C : vector_float) return vector_float is begin return vmaddfp (A, B, C); end vec_madd; -- vec_madds -- function vec_madds (A : vector_signed_short; B : vector_signed_short; C : vector_signed_short) return vector_signed_short is begin return vmhaddshs (A, B, C); end vec_madds; -- vec_max -- function vec_max (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmaxub (To_LL_VSC (A), To_LL_VSC (B))); end vec_max; function vec_max (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vmaxub (To_LL_VSC (A), To_LL_VSC (B))); end vec_max; function vec_max (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmaxub (To_LL_VSC (A), To_LL_VSC (B))); end vec_max; function vec_max (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmaxsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_max; function vec_max (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vmaxsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_max; function vec_max (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmaxsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_max; function vec_max (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmaxuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_max; function vec_max (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vmaxuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_max; function vec_max (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmaxuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_max; function vec_max (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmaxsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_max; function vec_max (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vmaxsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_max; function vec_max (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmaxsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_max; function vec_max (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmaxuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_max; function vec_max (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vmaxuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_max; function vec_max (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmaxuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_max; function vec_max (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmaxsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_max; function vec_max (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vmaxsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_max; function vec_max (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmaxsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_max; function vec_max (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vmaxfp (To_LL_VF (A), To_LL_VF (B))); end vec_max; -- vec_vmaxfp -- function vec_vmaxfp (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vmaxfp (To_LL_VF (A), To_LL_VF (B))); end vec_vmaxfp; -- vec_vmaxsw -- function vec_vmaxsw (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmaxsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmaxsw; function vec_vmaxsw (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vmaxsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmaxsw; function vec_vmaxsw (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmaxsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmaxsw; -- vec_vmaxuw -- function vec_vmaxuw (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmaxuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmaxuw; function vec_vmaxuw (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vmaxuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmaxuw; function vec_vmaxuw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmaxuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmaxuw; -- vec_vmaxsh -- function vec_vmaxsh (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmaxsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmaxsh; function vec_vmaxsh (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vmaxsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmaxsh; function vec_vmaxsh (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmaxsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmaxsh; -- vec_vmaxuh -- function vec_vmaxuh (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmaxuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmaxuh; function vec_vmaxuh (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vmaxuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmaxuh; function vec_vmaxuh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmaxuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmaxuh; -- vec_vmaxsb -- function vec_vmaxsb (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmaxsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmaxsb; function vec_vmaxsb (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vmaxsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmaxsb; function vec_vmaxsb (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmaxsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmaxsb; -- vec_vmaxub -- function vec_vmaxub (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmaxub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmaxub; function vec_vmaxub (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vmaxub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmaxub; function vec_vmaxub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmaxub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmaxub; -- vec_mergeh -- function vec_mergeh (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vmrghb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mergeh; function vec_mergeh (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmrghb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mergeh; function vec_mergeh (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmrghb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mergeh; function vec_mergeh (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergeh; function vec_mergeh (A : vector_pixel; B : vector_pixel) return vector_pixel is begin return To_LL_VP (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergeh; function vec_mergeh (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergeh; function vec_mergeh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergeh; function vec_mergeh (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergeh; function vec_mergeh (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergeh; function vec_mergeh (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergeh; function vec_mergeh (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergeh; -- vec_vmrghw -- function vec_vmrghw (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrghw; function vec_vmrghw (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrghw; function vec_vmrghw (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrghw; function vec_vmrghw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmrghw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrghw; -- vec_vmrghh -- function vec_vmrghh (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrghh; function vec_vmrghh (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrghh; function vec_vmrghh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrghh; function vec_vmrghh (A : vector_pixel; B : vector_pixel) return vector_pixel is begin return To_LL_VP (vmrghh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrghh; -- vec_vmrghb -- function vec_vmrghb (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vmrghb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmrghb; function vec_vmrghb (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmrghb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmrghb; function vec_vmrghb (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmrghb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmrghb; -- vec_mergel -- function vec_mergel (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vmrglb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mergel; function vec_mergel (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmrglb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mergel; function vec_mergel (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmrglb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mergel; function vec_mergel (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergel; function vec_mergel (A : vector_pixel; B : vector_pixel) return vector_pixel is begin return To_LL_VP (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergel; function vec_mergel (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergel; function vec_mergel (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mergel; function vec_mergel (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergel; function vec_mergel (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergel; function vec_mergel (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergel; function vec_mergel (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_mergel; -- vec_vmrglw -- function vec_vmrglw (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrglw; function vec_vmrglw (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrglw; function vec_vmrglw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrglw; function vec_vmrglw (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vmrglw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vmrglw; -- vec_vmrglh -- function vec_vmrglh (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrglh; function vec_vmrglh (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrglh; function vec_vmrglh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrglh; function vec_vmrglh (A : vector_pixel; B : vector_pixel) return vector_pixel is begin return To_LL_VP (vmrglh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmrglh; -- vec_vmrglb -- function vec_vmrglb (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vmrglb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmrglb; function vec_vmrglb (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vmrglb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmrglb; function vec_vmrglb (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vmrglb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmrglb; -- vec_mfvscr -- function vec_mfvscr return vector_unsigned_short is begin return To_LL_VUS (mfvscr); end vec_mfvscr; -- vec_min -- function vec_min (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vminub (To_LL_VSC (A), To_LL_VSC (B))); end vec_min; function vec_min (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vminub (To_LL_VSC (A), To_LL_VSC (B))); end vec_min; function vec_min (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vminub (To_LL_VSC (A), To_LL_VSC (B))); end vec_min; function vec_min (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vminsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_min; function vec_min (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vminsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_min; function vec_min (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vminsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_min; function vec_min (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vminuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_min; function vec_min (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vminuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_min; function vec_min (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vminuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_min; function vec_min (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vminsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_min; function vec_min (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vminsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_min; function vec_min (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vminsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_min; function vec_min (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vminuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_min; function vec_min (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vminuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_min; function vec_min (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vminuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_min; function vec_min (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vminsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_min; function vec_min (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vminsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_min; function vec_min (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vminsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_min; function vec_min (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vminfp (To_LL_VF (A), To_LL_VF (B))); end vec_min; -- vec_vminfp -- function vec_vminfp (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vminfp (To_LL_VF (A), To_LL_VF (B))); end vec_vminfp; -- vec_vminsw -- function vec_vminsw (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vminsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vminsw; function vec_vminsw (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vminsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vminsw; function vec_vminsw (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vminsw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vminsw; -- vec_vminuw -- function vec_vminuw (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vminuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vminuw; function vec_vminuw (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vminuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vminuw; function vec_vminuw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vminuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vminuw; -- vec_vminsh -- function vec_vminsh (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vminsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vminsh; function vec_vminsh (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vminsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vminsh; function vec_vminsh (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vminsh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vminsh; -- vec_vminuh -- function vec_vminuh (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vminuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vminuh; function vec_vminuh (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vminuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vminuh; function vec_vminuh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vminuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vminuh; -- vec_vminsb -- function vec_vminsb (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vminsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vminsb; function vec_vminsb (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vminsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vminsb; function vec_vminsb (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vminsb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vminsb; -- vec_vminub -- function vec_vminub (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vminub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vminub; function vec_vminub (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vminub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vminub; function vec_vminub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vminub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vminub; -- vec_mladd -- function vec_mladd (A : vector_signed_short; B : vector_signed_short; C : vector_signed_short) return vector_signed_short is begin return vmladduhm (A, B, C); end vec_mladd; function vec_mladd (A : vector_signed_short; B : vector_unsigned_short; C : vector_unsigned_short) return vector_signed_short is begin return vmladduhm (A, To_LL_VSS (B), To_LL_VSS (C)); end vec_mladd; function vec_mladd (A : vector_unsigned_short; B : vector_signed_short; C : vector_signed_short) return vector_signed_short is begin return vmladduhm (To_LL_VSS (A), B, C); end vec_mladd; function vec_mladd (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vmladduhm (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSS (C))); end vec_mladd; -- vec_mradds -- function vec_mradds (A : vector_signed_short; B : vector_signed_short; C : vector_signed_short) return vector_signed_short is begin return vmhraddshs (A, B, C); end vec_mradds; -- vec_msum -- function vec_msum (A : vector_unsigned_char; B : vector_unsigned_char; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmsumubm (To_LL_VSC (A), To_LL_VSC (B), To_LL_VSI (C))); end vec_msum; function vec_msum (A : vector_signed_char; B : vector_unsigned_char; C : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmsummbm (To_LL_VSC (A), To_LL_VSC (B), To_LL_VSI (C))); end vec_msum; function vec_msum (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmsumuhm (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_msum; function vec_msum (A : vector_signed_short; B : vector_signed_short; C : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmsumshm (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_msum; -- vec_vmsumshm -- function vec_vmsumshm (A : vector_signed_short; B : vector_signed_short; C : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmsumshm (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_vmsumshm; -- vec_vmsumuhm -- function vec_vmsumuhm (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmsumuhm (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_vmsumuhm; -- vec_vmsummbm -- function vec_vmsummbm (A : vector_signed_char; B : vector_unsigned_char; C : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmsummbm (To_LL_VSC (A), To_LL_VSC (B), To_LL_VSI (C))); end vec_vmsummbm; -- vec_vmsumubm -- function vec_vmsumubm (A : vector_unsigned_char; B : vector_unsigned_char; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmsumubm (To_LL_VSC (A), To_LL_VSC (B), To_LL_VSI (C))); end vec_vmsumubm; -- vec_msums -- function vec_msums (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmsumuhs (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_msums; function vec_msums (A : vector_signed_short; B : vector_signed_short; C : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmsumshs (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_msums; -- vec_vmsumshs -- function vec_vmsumshs (A : vector_signed_short; B : vector_signed_short; C : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vmsumshs (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_vmsumshs; -- vec_vmsumuhs -- function vec_vmsumuhs (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vmsumuhs (To_LL_VSS (A), To_LL_VSS (B), To_LL_VSI (C))); end vec_vmsumuhs; -- vec_mtvscr -- procedure vec_mtvscr (A : vector_signed_int) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_unsigned_int) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_bool_int) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_signed_short) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_unsigned_short) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_bool_short) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_pixel) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_signed_char) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_unsigned_char) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; procedure vec_mtvscr (A : vector_bool_char) is begin mtvscr (To_LL_VSI (A)); end vec_mtvscr; -- vec_mule -- function vec_mule (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vmuleub (To_LL_VSC (A), To_LL_VSC (B))); end vec_mule; function vec_mule (A : vector_signed_char; B : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vmulesb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mule; function vec_mule (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_int is begin return To_LL_VUI (vmuleuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mule; function vec_mule (A : vector_signed_short; B : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vmulesh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mule; -- vec_vmulesh -- function vec_vmulesh (A : vector_signed_short; B : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vmulesh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmulesh; -- vec_vmuleuh -- function vec_vmuleuh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_int is begin return To_LL_VUI (vmuleuh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmuleuh; -- vec_vmulesb -- function vec_vmulesb (A : vector_signed_char; B : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vmuleub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmulesb; -- vec_vmuleub -- function vec_vmuleub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vmuleub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmuleub; -- vec_mulo -- function vec_mulo (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vmuloub (To_LL_VSC (A), To_LL_VSC (B))); end vec_mulo; function vec_mulo (A : vector_signed_char; B : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vmulosb (To_LL_VSC (A), To_LL_VSC (B))); end vec_mulo; function vec_mulo (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_int is begin return To_LL_VUI (vmulouh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mulo; function vec_mulo (A : vector_signed_short; B : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vmulosh (To_LL_VSS (A), To_LL_VSS (B))); end vec_mulo; -- vec_vmulosh -- function vec_vmulosh (A : vector_signed_short; B : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vmulosh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmulosh; -- vec_vmulouh -- function vec_vmulouh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_int is begin return To_LL_VUI (vmulouh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vmulouh; -- vec_vmulosb -- function vec_vmulosb (A : vector_signed_char; B : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vmulosb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmulosb; -- vec_vmuloub -- function vec_vmuloub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vmuloub (To_LL_VSC (A), To_LL_VSC (B))); end vec_vmuloub; -- vec_nmsub -- function vec_nmsub (A : vector_float; B : vector_float; C : vector_float) return vector_float is begin return To_LL_VF (vnmsubfp (To_LL_VF (A), To_LL_VF (B), To_LL_VF (C))); end vec_nmsub; -- vec_nor -- function vec_nor (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; function vec_nor (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vnor (To_LL_VSI (A), To_LL_VSI (B))); end vec_nor; -- vec_or -- function vec_or (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_float; B : vector_bool_int) return vector_float is begin return To_LL_VF (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_int; B : vector_float) return vector_float is begin return To_LL_VF (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; function vec_or (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vor (To_LL_VSI (A), To_LL_VSI (B))); end vec_or; -- vec_pack -- function vec_pack (A : vector_signed_short; B : vector_signed_short) return vector_signed_char is begin return To_LL_VSC (vpkuhum (To_LL_VSS (A), To_LL_VSS (B))); end vec_pack; function vec_pack (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vpkuhum (To_LL_VSS (A), To_LL_VSS (B))); end vec_pack; function vec_pack (A : vector_bool_short; B : vector_bool_short) return vector_bool_char is begin return To_LL_VBC (vpkuhum (To_LL_VSS (A), To_LL_VSS (B))); end vec_pack; function vec_pack (A : vector_signed_int; B : vector_signed_int) return vector_signed_short is begin return To_LL_VSS (vpkuwum (To_LL_VSI (A), To_LL_VSI (B))); end vec_pack; function vec_pack (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vpkuwum (To_LL_VSI (A), To_LL_VSI (B))); end vec_pack; function vec_pack (A : vector_bool_int; B : vector_bool_int) return vector_bool_short is begin return To_LL_VBS (vpkuwum (To_LL_VSI (A), To_LL_VSI (B))); end vec_pack; -- vec_vpkuwum -- function vec_vpkuwum (A : vector_bool_int; B : vector_bool_int) return vector_bool_short is begin return To_LL_VBS (vpkuwum (To_LL_VSI (A), To_LL_VSI (B))); end vec_vpkuwum; function vec_vpkuwum (A : vector_signed_int; B : vector_signed_int) return vector_signed_short is begin return To_LL_VSS (vpkuwum (To_LL_VSI (A), To_LL_VSI (B))); end vec_vpkuwum; function vec_vpkuwum (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vpkuwum (To_LL_VSI (A), To_LL_VSI (B))); end vec_vpkuwum; -- vec_vpkuhum -- function vec_vpkuhum (A : vector_bool_short; B : vector_bool_short) return vector_bool_char is begin return To_LL_VBC (vpkuhum (To_LL_VSS (A), To_LL_VSS (B))); end vec_vpkuhum; function vec_vpkuhum (A : vector_signed_short; B : vector_signed_short) return vector_signed_char is begin return To_LL_VSC (vpkuhum (To_LL_VSS (A), To_LL_VSS (B))); end vec_vpkuhum; function vec_vpkuhum (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vpkuhum (To_LL_VSS (A), To_LL_VSS (B))); end vec_vpkuhum; -- vec_packpx -- function vec_packpx (A : vector_unsigned_int; B : vector_unsigned_int) return vector_pixel is begin return To_LL_VP (vpkpx (To_LL_VSI (A), To_LL_VSI (B))); end vec_packpx; -- vec_packs -- function vec_packs (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vpkuhus (To_LL_VSS (A), To_LL_VSS (B))); end vec_packs; function vec_packs (A : vector_signed_short; B : vector_signed_short) return vector_signed_char is begin return To_LL_VSC (vpkshss (To_LL_VSS (A), To_LL_VSS (B))); end vec_packs; function vec_packs (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vpkuwus (To_LL_VSI (A), To_LL_VSI (B))); end vec_packs; function vec_packs (A : vector_signed_int; B : vector_signed_int) return vector_signed_short is begin return To_LL_VSS (vpkswss (To_LL_VSI (A), To_LL_VSI (B))); end vec_packs; -- vec_vpkswss -- function vec_vpkswss (A : vector_signed_int; B : vector_signed_int) return vector_signed_short is begin return To_LL_VSS (vpkswss (To_LL_VSI (A), To_LL_VSI (B))); end vec_vpkswss; -- vec_vpkuwus -- function vec_vpkuwus (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vpkuwus (To_LL_VSI (A), To_LL_VSI (B))); end vec_vpkuwus; -- vec_vpkshss -- function vec_vpkshss (A : vector_signed_short; B : vector_signed_short) return vector_signed_char is begin return To_LL_VSC (vpkshss (To_LL_VSS (A), To_LL_VSS (B))); end vec_vpkshss; -- vec_vpkuhus -- function vec_vpkuhus (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vpkuhus (To_LL_VSS (A), To_LL_VSS (B))); end vec_vpkuhus; -- vec_packsu -- function vec_packsu (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vpkuhus (To_LL_VSS (A), To_LL_VSS (B))); end vec_packsu; function vec_packsu (A : vector_signed_short; B : vector_signed_short) return vector_unsigned_char is begin return To_LL_VUC (vpkshus (To_LL_VSS (A), To_LL_VSS (B))); end vec_packsu; function vec_packsu (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vpkuwus (To_LL_VSI (A), To_LL_VSI (B))); end vec_packsu; function vec_packsu (A : vector_signed_int; B : vector_signed_int) return vector_unsigned_short is begin return To_LL_VUS (vpkswus (To_LL_VSI (A), To_LL_VSI (B))); end vec_packsu; -- vec_vpkswus -- function vec_vpkswus (A : vector_signed_int; B : vector_signed_int) return vector_unsigned_short is begin return To_LL_VUS (vpkswus (To_LL_VSI (A), To_LL_VSI (B))); end vec_vpkswus; -- vec_vpkshus -- function vec_vpkshus (A : vector_signed_short; B : vector_signed_short) return vector_unsigned_char is begin return To_LL_VUC (vpkshus (To_LL_VSS (A), To_LL_VSS (B))); end vec_vpkshus; -- vec_perm -- function vec_perm (A : vector_float; B : vector_float; C : vector_unsigned_char) return vector_float is begin return To_LL_VF (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_signed_int; B : vector_signed_int; C : vector_unsigned_char) return vector_signed_int is begin return To_LL_VSI (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_unsigned_int; B : vector_unsigned_int; C : vector_unsigned_char) return vector_unsigned_int is begin return To_LL_VUI (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_bool_int; B : vector_bool_int; C : vector_unsigned_char) return vector_bool_int is begin return To_LL_VBI (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_signed_short; B : vector_signed_short; C : vector_unsigned_char) return vector_signed_short is begin return To_LL_VSS (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_bool_short; B : vector_bool_short; C : vector_unsigned_char) return vector_bool_short is begin return To_LL_VBS (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_pixel; B : vector_pixel; C : vector_unsigned_char) return vector_pixel is begin return To_LL_VP (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_signed_char; B : vector_signed_char; C : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_unsigned_char; B : vector_unsigned_char; C : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; function vec_perm (A : vector_bool_char; B : vector_bool_char; C : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vperm_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSC (C))); end vec_perm; -- vec_re -- function vec_re (A : vector_float) return vector_float is begin return To_LL_VF (vrefp (To_LL_VF (A))); end vec_re; -- vec_rl -- function vec_rl (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vrlb (To_LL_VSC (A), To_LL_VSC (B))); end vec_rl; function vec_rl (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vrlb (To_LL_VSC (A), To_LL_VSC (B))); end vec_rl; function vec_rl (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vrlh (To_LL_VSS (A), To_LL_VSS (B))); end vec_rl; function vec_rl (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vrlh (To_LL_VSS (A), To_LL_VSS (B))); end vec_rl; function vec_rl (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vrlw (To_LL_VSI (A), To_LL_VSI (B))); end vec_rl; function vec_rl (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vrlw (To_LL_VSI (A), To_LL_VSI (B))); end vec_rl; -- vec_vrlw -- function vec_vrlw (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vrlw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vrlw; function vec_vrlw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vrlw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vrlw; -- vec_vrlh -- function vec_vrlh (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vrlh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vrlh; function vec_vrlh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vrlh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vrlh; -- vec_vrlb -- function vec_vrlb (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vrlb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vrlb; function vec_vrlb (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vrlb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vrlb; -- vec_round -- function vec_round (A : vector_float) return vector_float is begin return To_LL_VF (vrfin (To_LL_VF (A))); end vec_round; -- vec_rsqrte -- function vec_rsqrte (A : vector_float) return vector_float is begin return To_LL_VF (vrsqrtefp (To_LL_VF (A))); end vec_rsqrte; -- vec_sel -- function vec_sel (A : vector_float; B : vector_float; C : vector_bool_int) return vector_float is begin return To_LL_VF (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_float; B : vector_float; C : vector_unsigned_int) return vector_float is begin return To_LL_VF (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_signed_int; B : vector_signed_int; C : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_signed_int; B : vector_signed_int; C : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_unsigned_int; B : vector_unsigned_int; C : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_unsigned_int; B : vector_unsigned_int; C : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_bool_int; B : vector_bool_int; C : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_bool_int; B : vector_bool_int; C : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_signed_short; B : vector_signed_short; C : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_signed_short; B : vector_signed_short; C : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_unsigned_short; B : vector_unsigned_short; C : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_bool_short; B : vector_bool_short; C : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_bool_short; B : vector_bool_short; C : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_signed_char; B : vector_signed_char; C : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_signed_char; B : vector_signed_char; C : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_unsigned_char; B : vector_unsigned_char; C : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_unsigned_char; B : vector_unsigned_char; C : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_bool_char; B : vector_bool_char; C : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; function vec_sel (A : vector_bool_char; B : vector_bool_char; C : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vsel_4si (To_LL_VSI (A), To_LL_VSI (B), To_LL_VSI (C))); end vec_sel; -- vec_sl -- function vec_sl (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vslb (To_LL_VSC (A), To_LL_VSC (B))); end vec_sl; function vec_sl (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vslb (To_LL_VSC (A), To_LL_VSC (B))); end vec_sl; function vec_sl (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vslh (To_LL_VSS (A), To_LL_VSS (B))); end vec_sl; function vec_sl (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vslh (To_LL_VSS (A), To_LL_VSS (B))); end vec_sl; function vec_sl (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vslw (To_LL_VSI (A), To_LL_VSI (B))); end vec_sl; function vec_sl (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vslw (To_LL_VSI (A), To_LL_VSI (B))); end vec_sl; -- vec_vslw -- function vec_vslw (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vslw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vslw; function vec_vslw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vslw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vslw; -- vec_vslh -- function vec_vslh (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vslh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vslh; function vec_vslh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vslh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vslh; -- vec_vslb -- function vec_vslb (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vslb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vslb; function vec_vslb (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vslb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vslb; -- vec_sll -- function vec_sll (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_int; B : vector_unsigned_short) return vector_signed_int is begin return To_LL_VSI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_int; B : vector_unsigned_char) return vector_signed_int is begin return To_LL_VSI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_int; B : vector_unsigned_short) return vector_unsigned_int is begin return To_LL_VUI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_int; B : vector_unsigned_char) return vector_unsigned_int is begin return To_LL_VUI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_int; B : vector_unsigned_short) return vector_bool_int is begin return To_LL_VBI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_int; B : vector_unsigned_char) return vector_bool_int is begin return To_LL_VBI (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_short; B : vector_unsigned_int) return vector_signed_short is begin return To_LL_VSS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_short; B : vector_unsigned_char) return vector_signed_short is begin return To_LL_VSS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_short; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_short; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_short; B : vector_unsigned_int) return vector_bool_short is begin return To_LL_VBS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_short; B : vector_unsigned_char) return vector_bool_short is begin return To_LL_VBS (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_pixel; B : vector_unsigned_int) return vector_pixel is begin return To_LL_VP (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_pixel; B : vector_unsigned_short) return vector_pixel is begin return To_LL_VP (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_pixel; B : vector_unsigned_char) return vector_pixel is begin return To_LL_VP (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_char; B : vector_unsigned_int) return vector_signed_char is begin return To_LL_VSC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_char; B : vector_unsigned_short) return vector_signed_char is begin return To_LL_VSC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_char; B : vector_unsigned_int) return vector_unsigned_char is begin return To_LL_VUC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_char; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_char; B : vector_unsigned_int) return vector_bool_char is begin return To_LL_VBC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_char; B : vector_unsigned_short) return vector_bool_char is begin return To_LL_VBC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; function vec_sll (A : vector_bool_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vsl (To_LL_VSI (A), To_LL_VSI (B))); end vec_sll; -- vec_slo -- function vec_slo (A : vector_float; B : vector_signed_char) return vector_float is begin return To_LL_VF (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_float; B : vector_unsigned_char) return vector_float is begin return To_LL_VF (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_signed_int; B : vector_signed_char) return vector_signed_int is begin return To_LL_VSI (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_signed_int; B : vector_unsigned_char) return vector_signed_int is begin return To_LL_VSI (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_unsigned_int; B : vector_signed_char) return vector_unsigned_int is begin return To_LL_VUI (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_unsigned_int; B : vector_unsigned_char) return vector_unsigned_int is begin return To_LL_VUI (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_signed_short; B : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_signed_short; B : vector_unsigned_char) return vector_signed_short is begin return To_LL_VSS (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_unsigned_short; B : vector_signed_char) return vector_unsigned_short is begin return To_LL_VUS (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_unsigned_short; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_pixel; B : vector_signed_char) return vector_pixel is begin return To_LL_VP (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_pixel; B : vector_unsigned_char) return vector_pixel is begin return To_LL_VP (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_unsigned_char; B : vector_signed_char) return vector_unsigned_char is begin return To_LL_VUC (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; function vec_slo (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vslo (To_LL_VSI (A), To_LL_VSI (B))); end vec_slo; -- vec_sr -- function vec_sr (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsrb (To_LL_VSC (A), To_LL_VSC (B))); end vec_sr; function vec_sr (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsrb (To_LL_VSC (A), To_LL_VSC (B))); end vec_sr; function vec_sr (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsrh (To_LL_VSS (A), To_LL_VSS (B))); end vec_sr; function vec_sr (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsrh (To_LL_VSS (A), To_LL_VSS (B))); end vec_sr; function vec_sr (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsrw (To_LL_VSI (A), To_LL_VSI (B))); end vec_sr; function vec_sr (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsrw (To_LL_VSI (A), To_LL_VSI (B))); end vec_sr; -- vec_vsrw -- function vec_vsrw (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsrw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsrw; function vec_vsrw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsrw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsrw; -- vec_vsrh -- function vec_vsrh (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsrh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsrh; function vec_vsrh (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsrh (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsrh; -- vec_vsrb -- function vec_vsrb (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsrb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsrb; function vec_vsrb (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsrb (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsrb; -- vec_sra -- function vec_sra (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsrab (To_LL_VSC (A), To_LL_VSC (B))); end vec_sra; function vec_sra (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsrab (To_LL_VSC (A), To_LL_VSC (B))); end vec_sra; function vec_sra (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsrah (To_LL_VSS (A), To_LL_VSS (B))); end vec_sra; function vec_sra (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsrah (To_LL_VSS (A), To_LL_VSS (B))); end vec_sra; function vec_sra (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsraw (To_LL_VSI (A), To_LL_VSI (B))); end vec_sra; function vec_sra (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsraw (To_LL_VSI (A), To_LL_VSI (B))); end vec_sra; -- vec_vsraw -- function vec_vsraw (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsraw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsraw; function vec_vsraw (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsraw (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsraw; -- vec_vsrah -- function vec_vsrah (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsrah (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsrah; function vec_vsrah (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsrah (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsrah; -- vec_vsrab -- function vec_vsrab (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsrab (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsrab; function vec_vsrab (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsrab (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsrab; -- vec_srl -- function vec_srl (A : vector_signed_int; B : vector_unsigned_int) return vector_signed_int is begin return To_LL_VSI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_int; B : vector_unsigned_short) return vector_signed_int is begin return To_LL_VSI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_int; B : vector_unsigned_char) return vector_signed_int is begin return To_LL_VSI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_int; B : vector_unsigned_short) return vector_unsigned_int is begin return To_LL_VUI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_int; B : vector_unsigned_char) return vector_unsigned_int is begin return To_LL_VUI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_int; B : vector_unsigned_int) return vector_bool_int is begin return To_LL_VBI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_int; B : vector_unsigned_short) return vector_bool_int is begin return To_LL_VBI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_int; B : vector_unsigned_char) return vector_bool_int is begin return To_LL_VBI (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_short; B : vector_unsigned_int) return vector_signed_short is begin return To_LL_VSS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_short; B : vector_unsigned_short) return vector_signed_short is begin return To_LL_VSS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_short; B : vector_unsigned_char) return vector_signed_short is begin return To_LL_VSS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_short; B : vector_unsigned_int) return vector_unsigned_short is begin return To_LL_VUS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_short; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_short; B : vector_unsigned_int) return vector_bool_short is begin return To_LL_VBS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_short; B : vector_unsigned_short) return vector_bool_short is begin return To_LL_VBS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_short; B : vector_unsigned_char) return vector_bool_short is begin return To_LL_VBS (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_pixel; B : vector_unsigned_int) return vector_pixel is begin return To_LL_VP (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_pixel; B : vector_unsigned_short) return vector_pixel is begin return To_LL_VP (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_pixel; B : vector_unsigned_char) return vector_pixel is begin return To_LL_VP (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_char; B : vector_unsigned_int) return vector_signed_char is begin return To_LL_VSC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_char; B : vector_unsigned_short) return vector_signed_char is begin return To_LL_VSC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_char; B : vector_unsigned_int) return vector_unsigned_char is begin return To_LL_VUC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_char; B : vector_unsigned_short) return vector_unsigned_char is begin return To_LL_VUC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_char; B : vector_unsigned_int) return vector_bool_char is begin return To_LL_VBC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_char; B : vector_unsigned_short) return vector_bool_char is begin return To_LL_VBC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; function vec_srl (A : vector_bool_char; B : vector_unsigned_char) return vector_bool_char is begin return To_LL_VBC (vsr (To_LL_VSI (A), To_LL_VSI (B))); end vec_srl; -- vec_sro -- function vec_sro (A : vector_float; B : vector_signed_char) return vector_float is begin return To_LL_VF (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_float; B : vector_unsigned_char) return vector_float is begin return To_LL_VF (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_signed_int; B : vector_signed_char) return vector_signed_int is begin return To_LL_VSI (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_signed_int; B : vector_unsigned_char) return vector_signed_int is begin return To_LL_VSI (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_unsigned_int; B : vector_signed_char) return vector_unsigned_int is begin return To_LL_VUI (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_unsigned_int; B : vector_unsigned_char) return vector_unsigned_int is begin return To_LL_VUI (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_signed_short; B : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_signed_short; B : vector_unsigned_char) return vector_signed_short is begin return To_LL_VSS (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_unsigned_short; B : vector_signed_char) return vector_unsigned_short is begin return To_LL_VUS (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_unsigned_short; B : vector_unsigned_char) return vector_unsigned_short is begin return To_LL_VUS (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_pixel; B : vector_signed_char) return vector_pixel is begin return To_LL_VP (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_pixel; B : vector_unsigned_char) return vector_pixel is begin return To_LL_VP (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_signed_char; B : vector_unsigned_char) return vector_signed_char is begin return To_LL_VSC (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_unsigned_char; B : vector_signed_char) return vector_unsigned_char is begin return To_LL_VUC (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; function vec_sro (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsro (To_LL_VSI (A), To_LL_VSI (B))); end vec_sro; -- vec_st -- procedure vec_st (A : vector_float; B : c_int; C : vector_float_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_float; B : c_int; C : float_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_signed_int; B : c_int; C : vector_signed_int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_signed_int; B : c_int; C : int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_unsigned_int; B : c_int; C : vector_unsigned_int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_unsigned_int; B : c_int; C : unsigned_int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_int; B : c_int; C : vector_bool_int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_int; B : c_int; C : unsigned_int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_int; B : c_int; C : int_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_signed_short; B : c_int; C : vector_signed_short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_signed_short; B : c_int; C : short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_unsigned_short; B : c_int; C : vector_unsigned_short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_unsigned_short; B : c_int; C : unsigned_short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_short; B : c_int; C : vector_bool_short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_short; B : c_int; C : unsigned_short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_pixel; B : c_int; C : vector_pixel_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_pixel; B : c_int; C : unsigned_short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_pixel; B : c_int; C : short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_short; B : c_int; C : short_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_signed_char; B : c_int; C : vector_signed_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_signed_char; B : c_int; C : signed_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_unsigned_char; B : c_int; C : vector_unsigned_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_unsigned_char; B : c_int; C : unsigned_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_char; B : c_int; C : vector_bool_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_char; B : c_int; C : unsigned_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; procedure vec_st (A : vector_bool_char; B : c_int; C : signed_char_ptr) is begin stvx (To_LL_VSI (A), B, To_PTR (C)); end vec_st; -- vec_ste -- procedure vec_ste (A : vector_signed_char; B : c_int; C : signed_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_unsigned_char; B : c_int; C : unsigned_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_bool_char; B : c_int; C : signed_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_bool_char; B : c_int; C : unsigned_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_signed_short; B : c_int; C : short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_unsigned_short; B : c_int; C : unsigned_short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_bool_short; B : c_int; C : short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_bool_short; B : c_int; C : unsigned_short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_pixel; B : c_int; C : short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_pixel; B : c_int; C : unsigned_short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_float; B : c_int; C : float_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_signed_int; B : c_int; C : int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_unsigned_int; B : c_int; C : unsigned_int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_bool_int; B : c_int; C : int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_ste; procedure vec_ste (A : vector_bool_int; B : c_int; C : unsigned_int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_ste; -- vec_stvewx -- procedure vec_stvewx (A : vector_float; B : c_int; C : float_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_stvewx; procedure vec_stvewx (A : vector_signed_int; B : c_int; C : int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_stvewx; procedure vec_stvewx (A : vector_unsigned_int; B : c_int; C : unsigned_int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_stvewx; procedure vec_stvewx (A : vector_bool_int; B : c_int; C : int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_stvewx; procedure vec_stvewx (A : vector_bool_int; B : c_int; C : unsigned_int_ptr) is begin stvewx (To_LL_VSI (A), B, To_PTR (C)); end vec_stvewx; -- vec_stvehx -- procedure vec_stvehx (A : vector_signed_short; B : c_int; C : short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_stvehx; procedure vec_stvehx (A : vector_unsigned_short; B : c_int; C : unsigned_short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_stvehx; procedure vec_stvehx (A : vector_bool_short; B : c_int; C : short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_stvehx; procedure vec_stvehx (A : vector_bool_short; B : c_int; C : unsigned_short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_stvehx; procedure vec_stvehx (A : vector_pixel; B : c_int; C : short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_stvehx; procedure vec_stvehx (A : vector_pixel; B : c_int; C : unsigned_short_ptr) is begin stvehx (To_LL_VSS (A), B, To_PTR (C)); end vec_stvehx; -- vec_stvebx -- procedure vec_stvebx (A : vector_signed_char; B : c_int; C : signed_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_stvebx; procedure vec_stvebx (A : vector_unsigned_char; B : c_int; C : unsigned_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_stvebx; procedure vec_stvebx (A : vector_bool_char; B : c_int; C : signed_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_stvebx; procedure vec_stvebx (A : vector_bool_char; B : c_int; C : unsigned_char_ptr) is begin stvebx (To_LL_VSC (A), B, To_PTR (C)); end vec_stvebx; -- vec_stl -- procedure vec_stl (A : vector_float; B : c_int; C : vector_float_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_float; B : c_int; C : float_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_signed_int; B : c_int; C : vector_signed_int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_signed_int; B : c_int; C : int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_unsigned_int; B : c_int; C : vector_unsigned_int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_unsigned_int; B : c_int; C : unsigned_int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_int; B : c_int; C : vector_bool_int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_int; B : c_int; C : unsigned_int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_int; B : c_int; C : int_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_signed_short; B : c_int; C : vector_signed_short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_signed_short; B : c_int; C : short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_unsigned_short; B : c_int; C : vector_unsigned_short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_unsigned_short; B : c_int; C : unsigned_short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_short; B : c_int; C : vector_bool_short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_short; B : c_int; C : unsigned_short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_short; B : c_int; C : short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_pixel; B : c_int; C : vector_pixel_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_pixel; B : c_int; C : unsigned_short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_pixel; B : c_int; C : short_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_signed_char; B : c_int; C : vector_signed_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_signed_char; B : c_int; C : signed_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_unsigned_char; B : c_int; C : vector_unsigned_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_unsigned_char; B : c_int; C : unsigned_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_char; B : c_int; C : vector_bool_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_char; B : c_int; C : unsigned_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; procedure vec_stl (A : vector_bool_char; B : c_int; C : signed_char_ptr) is begin stvxl (To_LL_VSI (A), B, To_PTR (C)); end vec_stl; -- vec_sub -- function vec_sub (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_sub; function vec_sub (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_sub; function vec_sub (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_sub; function vec_sub (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_sub; function vec_sub (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_sub; function vec_sub (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_sub; function vec_sub (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_sub; function vec_sub (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_sub; function vec_sub (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_sub; function vec_sub (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_sub; function vec_sub (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_sub; function vec_sub (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_sub; function vec_sub (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_sub; function vec_sub (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_sub; function vec_sub (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_sub; function vec_sub (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_sub; function vec_sub (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_sub; function vec_sub (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_sub; function vec_sub (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vsubfp (To_LL_VF (A), To_LL_VF (B))); end vec_sub; -- vec_vsubfp -- function vec_vsubfp (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vsubfp (To_LL_VF (A), To_LL_VF (B))); end vec_vsubfp; -- vec_vsubuwm -- function vec_vsubuwm (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuwm; function vec_vsubuwm (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuwm; function vec_vsubuwm (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuwm; function vec_vsubuwm (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuwm; function vec_vsubuwm (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuwm; function vec_vsubuwm (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuwm (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuwm; -- vec_vsubuhm -- function vec_vsubuhm (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhm; function vec_vsubuhm (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhm; function vec_vsubuhm (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhm; function vec_vsubuhm (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhm; function vec_vsubuhm (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhm; function vec_vsubuhm (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhm (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhm; -- vec_vsububm -- function vec_vsububm (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububm; function vec_vsububm (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububm; function vec_vsububm (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububm; function vec_vsububm (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububm; function vec_vsububm (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububm; function vec_vsububm (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububm (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububm; -- vec_subc -- function vec_subc (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubcuw (To_LL_VSI (A), To_LL_VSI (B))); end vec_subc; -- vec_subs -- function vec_subs (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububs (To_LL_VSC (A), To_LL_VSC (B))); end vec_subs; function vec_subs (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vsububs (To_LL_VSC (A), To_LL_VSC (B))); end vec_subs; function vec_subs (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububs (To_LL_VSC (A), To_LL_VSC (B))); end vec_subs; function vec_subs (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsubsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_subs; function vec_subs (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vsubsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_subs; function vec_subs (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsubsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_subs; function vec_subs (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_subs; function vec_subs (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_subs; function vec_subs (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_subs; function vec_subs (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_subs; function vec_subs (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vsubshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_subs; function vec_subs (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_subs; function vec_subs (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuws (To_LL_VSI (A), To_LL_VSI (B))); end vec_subs; function vec_subs (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuws (To_LL_VSI (A), To_LL_VSI (B))); end vec_subs; function vec_subs (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuws (To_LL_VSI (A), To_LL_VSI (B))); end vec_subs; function vec_subs (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_subs; function vec_subs (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vsubsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_subs; function vec_subs (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_subs; -- vec_vsubsws -- function vec_vsubsws (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubsws; function vec_vsubsws (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vsubsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubsws; function vec_vsubsws (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsubsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubsws; -- vec_vsubuws -- function vec_vsubuws (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuws; function vec_vsubuws (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuws; function vec_vsubuws (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsubuws (To_LL_VSI (A), To_LL_VSI (B))); end vec_vsubuws; -- vec_vsubshs -- function vec_vsubshs (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubshs; function vec_vsubshs (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vsubshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubshs; function vec_vsubshs (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vsubshs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubshs; -- vec_vsubuhs -- function vec_vsubuhs (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhs; function vec_vsubuhs (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhs; function vec_vsubuhs (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vsubuhs (To_LL_VSS (A), To_LL_VSS (B))); end vec_vsubuhs; -- vec_vsubsbs -- function vec_vsubsbs (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsubsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsubsbs; function vec_vsubsbs (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vsubsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsubsbs; function vec_vsubsbs (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vsubsbs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsubsbs; -- vec_vsububs -- function vec_vsububs (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububs; function vec_vsububs (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vsububs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububs; function vec_vsububs (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vsububs (To_LL_VSC (A), To_LL_VSC (B))); end vec_vsububs; -- vec_sum4s -- function vec_sum4s (A : vector_unsigned_char; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsum4ubs (To_LL_VSC (A), To_LL_VSI (B))); end vec_sum4s; function vec_sum4s (A : vector_signed_char; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsum4sbs (To_LL_VSC (A), To_LL_VSI (B))); end vec_sum4s; function vec_sum4s (A : vector_signed_short; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsum4shs (To_LL_VSS (A), To_LL_VSI (B))); end vec_sum4s; -- vec_vsum4shs -- function vec_vsum4shs (A : vector_signed_short; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsum4shs (To_LL_VSS (A), To_LL_VSI (B))); end vec_vsum4shs; -- vec_vsum4sbs -- function vec_vsum4sbs (A : vector_signed_char; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsum4sbs (To_LL_VSC (A), To_LL_VSI (B))); end vec_vsum4sbs; -- vec_vsum4ubs -- function vec_vsum4ubs (A : vector_unsigned_char; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vsum4ubs (To_LL_VSC (A), To_LL_VSI (B))); end vec_vsum4ubs; -- vec_sum2s -- function vec_sum2s (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsum2sws (To_LL_VSI (A), To_LL_VSI (B))); end vec_sum2s; -- vec_sums -- function vec_sums (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vsumsws (To_LL_VSI (A), To_LL_VSI (B))); end vec_sums; -- vec_trunc -- function vec_trunc (A : vector_float) return vector_float is begin return To_LL_VF (vrfiz (To_LL_VF (A))); end vec_trunc; -- vec_unpackh -- function vec_unpackh (A : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vupkhsb (To_LL_VSC (A))); end vec_unpackh; function vec_unpackh (A : vector_bool_char) return vector_bool_short is begin return To_LL_VBS (vupkhsb (To_LL_VSC (A))); end vec_unpackh; function vec_unpackh (A : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vupkhsh (To_LL_VSS (A))); end vec_unpackh; function vec_unpackh (A : vector_bool_short) return vector_bool_int is begin return To_LL_VBI (vupkhsh (To_LL_VSS (A))); end vec_unpackh; function vec_unpackh (A : vector_pixel) return vector_unsigned_int is begin return To_LL_VUI (vupkhpx (To_LL_VSS (A))); end vec_unpackh; -- vec_vupkhsh -- function vec_vupkhsh (A : vector_bool_short) return vector_bool_int is begin return To_LL_VBI (vupkhsh (To_LL_VSS (A))); end vec_vupkhsh; function vec_vupkhsh (A : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vupkhsh (To_LL_VSS (A))); end vec_vupkhsh; -- vec_vupkhpx -- function vec_vupkhpx (A : vector_pixel) return vector_unsigned_int is begin return To_LL_VUI (vupkhpx (To_LL_VSS (A))); end vec_vupkhpx; -- vec_vupkhsb -- function vec_vupkhsb (A : vector_bool_char) return vector_bool_short is begin return To_LL_VBS (vupkhsb (To_LL_VSC (A))); end vec_vupkhsb; function vec_vupkhsb (A : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vupkhsb (To_LL_VSC (A))); end vec_vupkhsb; -- vec_unpackl -- function vec_unpackl (A : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vupklsb (To_LL_VSC (A))); end vec_unpackl; function vec_unpackl (A : vector_bool_char) return vector_bool_short is begin return To_LL_VBS (vupklsb (To_LL_VSC (A))); end vec_unpackl; function vec_unpackl (A : vector_pixel) return vector_unsigned_int is begin return To_LL_VUI (vupklpx (To_LL_VSS (A))); end vec_unpackl; function vec_unpackl (A : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vupklsh (To_LL_VSS (A))); end vec_unpackl; function vec_unpackl (A : vector_bool_short) return vector_bool_int is begin return To_LL_VBI (vupklsh (To_LL_VSS (A))); end vec_unpackl; -- vec_vupklpx -- function vec_vupklpx (A : vector_pixel) return vector_unsigned_int is begin return To_LL_VUI (vupklpx (To_LL_VSS (A))); end vec_vupklpx; -- vec_upklsh -- function vec_vupklsh (A : vector_bool_short) return vector_bool_int is begin return To_LL_VBI (vupklsh (To_LL_VSS (A))); end vec_vupklsh; function vec_vupklsh (A : vector_signed_short) return vector_signed_int is begin return To_LL_VSI (vupklsh (To_LL_VSS (A))); end vec_vupklsh; -- vec_vupklsb -- function vec_vupklsb (A : vector_bool_char) return vector_bool_short is begin return To_LL_VBS (vupklsb (To_LL_VSC (A))); end vec_vupklsb; function vec_vupklsb (A : vector_signed_char) return vector_signed_short is begin return To_LL_VSS (vupklsb (To_LL_VSC (A))); end vec_vupklsb; -- vec_xor -- function vec_xor (A : vector_float; B : vector_float) return vector_float is begin return To_LL_VF (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_float; B : vector_bool_int) return vector_float is begin return To_LL_VF (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_int; B : vector_float) return vector_float is begin return To_LL_VF (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_int; B : vector_bool_int) return vector_bool_int is begin return To_LL_VBI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_signed_int; B : vector_bool_int) return vector_signed_int is begin return To_LL_VSI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_signed_int; B : vector_signed_int) return vector_signed_int is begin return To_LL_VSI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_unsigned_int; B : vector_bool_int) return vector_unsigned_int is begin return To_LL_VUI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_unsigned_int; B : vector_unsigned_int) return vector_unsigned_int is begin return To_LL_VUI (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_short; B : vector_bool_short) return vector_bool_short is begin return To_LL_VBS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_signed_short; B : vector_bool_short) return vector_signed_short is begin return To_LL_VSS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_signed_short; B : vector_signed_short) return vector_signed_short is begin return To_LL_VSS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_unsigned_short; B : vector_bool_short) return vector_unsigned_short is begin return To_LL_VUS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_unsigned_short; B : vector_unsigned_short) return vector_unsigned_short is begin return To_LL_VUS (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_char; B : vector_bool_char) return vector_bool_char is begin return To_LL_VBC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_signed_char; B : vector_bool_char) return vector_signed_char is begin return To_LL_VSC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_signed_char; B : vector_signed_char) return vector_signed_char is begin return To_LL_VSC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_bool_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_unsigned_char; B : vector_bool_char) return vector_unsigned_char is begin return To_LL_VUC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; function vec_xor (A : vector_unsigned_char; B : vector_unsigned_char) return vector_unsigned_char is begin return To_LL_VUC (vxor (To_LL_VSI (A), To_LL_VSI (B))); end vec_xor; ----------------------------------- -- Bodies for Altivec predicates -- ----------------------------------- -- vec_all_eq -- function vec_all_eq (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_eq; function vec_all_eq (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_pixel; B : vector_pixel) return c_int is begin return vcmpequh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_eq; function vec_all_eq (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_eq; function vec_all_eq (A : vector_float; B : vector_float) return c_int is begin return vcmpeqfp_p (CR6_LT, To_LL_VF (A), To_LL_VF (B)); end vec_all_eq; -- vec_all_ge -- function vec_all_ge (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_ge; function vec_all_ge (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_EQ, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_ge; function vec_all_ge (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_ge; function vec_all_ge (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_ge; function vec_all_ge (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_EQ, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_ge; function vec_all_ge (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_ge; function vec_all_ge (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_ge; function vec_all_ge (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_EQ, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_ge; function vec_all_ge (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_ge; function vec_all_ge (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_ge; function vec_all_ge (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_ge; function vec_all_ge (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_EQ, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_ge; function vec_all_ge (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_ge; function vec_all_ge (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_EQ, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_ge; function vec_all_ge (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_ge; function vec_all_ge (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_ge; function vec_all_ge (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_EQ, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_ge; function vec_all_ge (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_ge; function vec_all_ge (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_LT, To_LL_VF (A), To_LL_VF (B)); end vec_all_ge; -- vec_all_gt -- function vec_all_gt (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_gt; function vec_all_gt (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_gt; function vec_all_gt (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_gt; function vec_all_gt (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_gt; function vec_all_gt (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_gt; function vec_all_gt (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_gt; function vec_all_gt (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_gt; function vec_all_gt (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_gt; function vec_all_gt (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_gt; function vec_all_gt (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_gt; function vec_all_gt (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_gt; function vec_all_gt (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_gt; function vec_all_gt (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_gt; function vec_all_gt (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_gt; function vec_all_gt (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_gt; function vec_all_gt (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_gt; function vec_all_gt (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_gt; function vec_all_gt (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_gt; function vec_all_gt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_LT, To_LL_VF (A), To_LL_VF (B)); end vec_all_gt; -- vec_all_in -- function vec_all_in (A : vector_float; B : vector_float) return c_int is begin return vcmpbfp_p (CR6_EQ, To_LL_VF (A), To_LL_VF (B)); end vec_all_in; -- vec_all_le -- function vec_all_le (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_le; function vec_all_le (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_le; function vec_all_le (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_le; function vec_all_le (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_le; function vec_all_le (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_le; function vec_all_le (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_le; function vec_all_le (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_le; function vec_all_le (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_le; function vec_all_le (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_le; function vec_all_le (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_le; function vec_all_le (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_le; function vec_all_le (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_le; function vec_all_le (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_le; function vec_all_le (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_le; function vec_all_le (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_le; function vec_all_le (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_le; function vec_all_le (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_le; function vec_all_le (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_le; function vec_all_le (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_LT, To_LL_VF (B), To_LL_VF (A)); end vec_all_le; -- vec_all_lt -- function vec_all_lt (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_lt; function vec_all_lt (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_LT, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_lt; function vec_all_lt (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_lt; function vec_all_lt (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_lt; function vec_all_lt (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_LT, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_lt; function vec_all_lt (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT, To_LL_VSC (B), To_LL_VSC (A)); end vec_all_lt; function vec_all_lt (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_lt; function vec_all_lt (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_LT, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_lt; function vec_all_lt (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_lt; function vec_all_lt (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_lt; function vec_all_lt (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_LT, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_lt; function vec_all_lt (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT, To_LL_VSS (B), To_LL_VSS (A)); end vec_all_lt; function vec_all_lt (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_lt; function vec_all_lt (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_LT, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_lt; function vec_all_lt (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_lt; function vec_all_lt (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_lt; function vec_all_lt (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_LT, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_lt; function vec_all_lt (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT, To_LL_VSI (B), To_LL_VSI (A)); end vec_all_lt; function vec_all_lt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_LT, To_LL_VF (B), To_LL_VF (A)); end vec_all_lt; -- vec_all_nan -- function vec_all_nan (A : vector_float) return c_int is begin return vcmpeqfp_p (CR6_EQ, To_LL_VF (A), To_LL_VF (A)); end vec_all_nan; -- vec_all_ne -- function vec_all_ne (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_EQ, To_LL_VSC (A), To_LL_VSC (B)); end vec_all_ne; function vec_all_ne (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_pixel; B : vector_pixel) return c_int is begin return vcmpequh_p (CR6_EQ, To_LL_VSS (A), To_LL_VSS (B)); end vec_all_ne; function vec_all_ne (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_EQ, To_LL_VSI (A), To_LL_VSI (B)); end vec_all_ne; function vec_all_ne (A : vector_float; B : vector_float) return c_int is begin return vcmpeqfp_p (CR6_EQ, To_LL_VF (A), To_LL_VF (B)); end vec_all_ne; -- vec_all_nge -- function vec_all_nge (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_EQ, To_LL_VF (A), To_LL_VF (B)); end vec_all_nge; -- vec_all_ngt -- function vec_all_ngt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_EQ, To_LL_VF (A), To_LL_VF (B)); end vec_all_ngt; -- vec_all_nle -- function vec_all_nle (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_EQ, To_LL_VF (B), To_LL_VF (A)); end vec_all_nle; -- vec_all_nlt -- function vec_all_nlt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_EQ, To_LL_VF (B), To_LL_VF (A)); end vec_all_nlt; -- vec_all_numeric -- function vec_all_numeric (A : vector_float) return c_int is begin return vcmpeqfp_p (CR6_LT, To_LL_VF (A), To_LL_VF (A)); end vec_all_numeric; -- vec_any_eq -- function vec_any_eq (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_eq; function vec_any_eq (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_pixel; B : vector_pixel) return c_int is begin return vcmpequh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_eq; function vec_any_eq (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_eq; function vec_any_eq (A : vector_float; B : vector_float) return c_int is begin return vcmpeqfp_p (CR6_EQ_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_eq; -- vec_any_ge -- function vec_any_ge (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_ge; function vec_any_ge (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_ge; function vec_any_ge (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_ge; function vec_any_ge (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_ge; function vec_any_ge (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_ge; function vec_any_ge (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_ge; function vec_any_ge (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_ge; function vec_any_ge (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_ge; function vec_any_ge (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_ge; function vec_any_ge (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_LT_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_ge; function vec_any_ge (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_ge; function vec_any_ge (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_ge; function vec_any_ge (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_ge; function vec_any_ge (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_ge; function vec_any_ge (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_ge; function vec_any_ge (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_ge; function vec_any_ge (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_ge; function vec_any_ge (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_ge; function vec_any_ge (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_EQ_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_ge; -- vec_any_gt -- function vec_any_gt (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_gt; function vec_any_gt (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_gt; function vec_any_gt (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_gt; function vec_any_gt (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_gt; function vec_any_gt (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_gt; function vec_any_gt (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_gt; function vec_any_gt (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_gt; function vec_any_gt (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_gt; function vec_any_gt (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_gt; function vec_any_gt (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_gt; function vec_any_gt (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_gt; function vec_any_gt (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_gt; function vec_any_gt (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_gt; function vec_any_gt (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_gt; function vec_any_gt (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_gt; function vec_any_gt (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_gt; function vec_any_gt (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_gt; function vec_any_gt (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_gt; function vec_any_gt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_EQ_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_gt; -- vec_any_le -- function vec_any_le (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_le; function vec_any_le (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_le; function vec_any_le (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_le; function vec_any_le (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_le; function vec_any_le (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_le; function vec_any_le (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_le; function vec_any_le (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_le; function vec_any_le (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_le; function vec_any_le (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_le; function vec_any_le (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_le; function vec_any_le (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_le; function vec_any_le (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_le; function vec_any_le (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_le; function vec_any_le (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_le; function vec_any_le (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_le; function vec_any_le (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_le; function vec_any_le (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_le; function vec_any_le (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_le; function vec_any_le (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_EQ_REV, To_LL_VF (B), To_LL_VF (A)); end vec_any_le; -- vec_any_lt -- function vec_any_lt (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_lt; function vec_any_lt (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpgtub_p (CR6_EQ_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_lt; function vec_any_lt (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpgtub_p (CR6_EQ_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_lt; function vec_any_lt (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_lt; function vec_any_lt (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpgtsb_p (CR6_EQ_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_lt; function vec_any_lt (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpgtsb_p (CR6_EQ_REV, To_LL_VSC (B), To_LL_VSC (A)); end vec_any_lt; function vec_any_lt (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_lt; function vec_any_lt (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpgtuh_p (CR6_EQ_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_lt; function vec_any_lt (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpgtuh_p (CR6_EQ_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_lt; function vec_any_lt (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_lt; function vec_any_lt (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpgtsh_p (CR6_EQ_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_lt; function vec_any_lt (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpgtsh_p (CR6_EQ_REV, To_LL_VSS (B), To_LL_VSS (A)); end vec_any_lt; function vec_any_lt (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_lt; function vec_any_lt (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpgtuw_p (CR6_EQ_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_lt; function vec_any_lt (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpgtuw_p (CR6_EQ_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_lt; function vec_any_lt (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_lt; function vec_any_lt (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpgtsw_p (CR6_EQ_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_lt; function vec_any_lt (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpgtsw_p (CR6_EQ_REV, To_LL_VSI (B), To_LL_VSI (A)); end vec_any_lt; function vec_any_lt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_EQ_REV, To_LL_VF (B), To_LL_VF (A)); end vec_any_lt; -- vec_any_nan -- function vec_any_nan (A : vector_float) return c_int is begin return vcmpeqfp_p (CR6_LT_REV, To_LL_VF (A), To_LL_VF (A)); end vec_any_nan; -- vec_any_ne -- function vec_any_ne (A : vector_signed_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_signed_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_unsigned_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_unsigned_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_char; B : vector_bool_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_char; B : vector_unsigned_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_char; B : vector_signed_char) return c_int is begin return vcmpequb_p (CR6_LT_REV, To_LL_VSC (A), To_LL_VSC (B)); end vec_any_ne; function vec_any_ne (A : vector_signed_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_signed_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_unsigned_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_unsigned_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_short; B : vector_bool_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_short; B : vector_unsigned_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_short; B : vector_signed_short) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_pixel; B : vector_pixel) return c_int is begin return vcmpequh_p (CR6_LT_REV, To_LL_VSS (A), To_LL_VSS (B)); end vec_any_ne; function vec_any_ne (A : vector_signed_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_signed_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_unsigned_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_unsigned_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_int; B : vector_bool_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_int; B : vector_unsigned_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_bool_int; B : vector_signed_int) return c_int is begin return vcmpequw_p (CR6_LT_REV, To_LL_VSI (A), To_LL_VSI (B)); end vec_any_ne; function vec_any_ne (A : vector_float; B : vector_float) return c_int is begin return vcmpeqfp_p (CR6_LT_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_ne; -- vec_any_nge -- function vec_any_nge (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_LT_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_nge; -- vec_any_ngt -- function vec_any_ngt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_LT_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_ngt; -- vec_any_nle -- function vec_any_nle (A : vector_float; B : vector_float) return c_int is begin return vcmpgefp_p (CR6_LT_REV, To_LL_VF (B), To_LL_VF (A)); end vec_any_nle; -- vec_any_nlt -- function vec_any_nlt (A : vector_float; B : vector_float) return c_int is begin return vcmpgtfp_p (CR6_LT_REV, To_LL_VF (B), To_LL_VF (A)); end vec_any_nlt; -- vec_any_numeric -- function vec_any_numeric (A : vector_float) return c_int is begin return vcmpeqfp_p (CR6_EQ_REV, To_LL_VF (A), To_LL_VF (A)); end vec_any_numeric; -- vec_any_out -- function vec_any_out (A : vector_float; B : vector_float) return c_int is begin return vcmpbfp_p (CR6_EQ_REV, To_LL_VF (A), To_LL_VF (B)); end vec_any_out; -- vec_step -- function vec_step (V : vector_unsigned_char) return Integer is pragma Unreferenced (V); begin return 16; end vec_step; function vec_step (V : vector_signed_char) return Integer is pragma Unreferenced (V); begin return 16; end vec_step; function vec_step (V : vector_bool_char) return Integer is pragma Unreferenced (V); begin return 16; end vec_step; function vec_step (V : vector_unsigned_short) return Integer is pragma Unreferenced (V); begin return 8; end vec_step; function vec_step (V : vector_signed_short) return Integer is pragma Unreferenced (V); begin return 8; end vec_step; function vec_step (V : vector_bool_short) return Integer is pragma Unreferenced (V); begin return 8; end vec_step; function vec_step (V : vector_unsigned_int) return Integer is pragma Unreferenced (V); begin return 4; end vec_step; function vec_step (V : vector_signed_int) return Integer is pragma Unreferenced (V); begin return 4; end vec_step; function vec_step (V : vector_bool_int) return Integer is pragma Unreferenced (V); begin return 4; end vec_step; function vec_step (V : vector_float) return Integer is pragma Unreferenced (V); begin return 4; end vec_step; function vec_step (V : vector_pixel) return Integer is pragma Unreferenced (V); begin return 4; end vec_step; end GNAT.Altivec.Vector_Operations;
Go to most recent revision | Compare with Previous | Blame | View Log