c_cpp/etc/calc/help/ssq

   1 NAME
   2     ssq - sum of squares
   3
   4 SYNOPSIS
   5     ssq(x1, x2, ...)
   6
   7 TYPES
   8     x1, x2, ... lists or values for which required operations are defined
   9
  10     return      as determined by the operations on x1, x2, ...
  11
  12 DESCRIPTION
  13     Null values are ignored; ssq() returns the null value.
  14     If no argument is a list, returns x1^2 + x2^2 + ...
  15     If an argument = list(t1, t2, ...) it contributes ssq(t1, t2, ...)
  16         to the result.
  17 EXAMPLE
  18     ; print ssq(1,2,3), ssq(1+2i, 3-4i, 5 +6i)
  19     14 -21+40i
  20
  21     ; mat A[2,2] = {1,2,3,4}; mat B[2,2] = {5,6,7,8}
  22     ; print ssq(A, B, A + B)
  23
  24     mat [2,2] (4 elements, 4 nonzero):
  25       [0,0] = 190
  26       [0,1] = 232
  27       [1,0] = 286
  28       [1,1] = 352
  29
  30     ; ssq(list(2,3,5),7)
  31         87
  32
  33     ; ssq(1,2,3,4,5,6,7,8)
  34         204
  35     ; ssq(1,2, list(3,4,list(5,6)), list(), 7, 8)
  36         204
  37
  38 LIMITS
  39     The number of arguments is not to exceed 1024.
  40
  41 LINK LIBRARY
  42     none
  43
  44 SEE ALSO
  45     sum, max, min
  46
  47 ## Copyright (C) 1999-2006  Landon Curt Noll
  48 ##
  49 ## Calc is open software; you can redistribute it and/or modify it under
  50 ## the terms of the version 2.1 of the GNU Lesser General Public License
  51 ## as published by the Free Software Foundation.
  52 ##
  53 ## Calc is distributed in the hope that it will be useful, but WITHOUT
  54 ## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  55 ## or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General
  56 ## Public License for more details.
  57 ##
  58 ## A copy of version 2.1 of the GNU Lesser General Public License is
  59 ## distributed with calc under the filename COPYING-LGPL.  You should have
  60 ## received a copy with calc; if not, write to Free Software Foundation, Inc.
  61 ## 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  62 ##
  63 ## @(#) $Revision: 30.1 $
  64 ## @(#) $Id: ssq,v 30.1 2007/03/16 11:10:42 chongo Exp $
  65 ## @(#) $Source: /usr/local/src/cmd/calc/help/RCS/ssq,v $
  66 ##
  67 ## Under source code control:   1995/10/25 04:03:46
  68 ## File existed as early as:    1995
  69 ##
  70 ## chongo <was here> /\oo/\     http://www.isthe.com/chongo/
  71 ## Share and enjoy!  :-)        http://www.isthe.com/chongo/tech/comp/calc/