Cuba-3.0/COPYING 0000644 0000000 0000000 00000016743 11352247751 012001 0 ustar root root GNU LESSER GENERAL PUBLIC LICENSE
Version 3, 29 June 2007
Copyright (C) 2007 Free Software Foundation, Inc.
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
This version of the GNU Lesser General Public License incorporates
the terms and conditions of version 3 of the GNU General Public
License, supplemented by the additional permissions listed below.
0. Additional Definitions.
As used herein, "this License" refers to version 3 of the GNU Lesser
General Public License, and the "GNU GPL" refers to version 3 of the GNU
General Public License.
"The Library" refers to a covered work governed by this License,
other than an Application or a Combined Work as defined below.
An "Application" is any work that makes use of an interface provided
by the Library, but which is not otherwise based on the Library.
Defining a subclass of a class defined by the Library is deemed a mode
of using an interface provided by the Library.
A "Combined Work" is a work produced by combining or linking an
Application with the Library. The particular version of the Library
with which the Combined Work was made is also called the "Linked
Version".
The "Minimal Corresponding Source" for a Combined Work means the
Corresponding Source for the Combined Work, excluding any source code
for portions of the Combined Work that, considered in isolation, are
based on the Application, and not on the Linked Version.
The "Corresponding Application Code" for a Combined Work means the
object code and/or source code for the Application, including any data
and utility programs needed for reproducing the Combined Work from the
Application, but excluding the System Libraries of the Combined Work.
1. Exception to Section 3 of the GNU GPL.
You may convey a covered work under sections 3 and 4 of this License
without being bound by section 3 of the GNU GPL.
2. Conveying Modified Versions.
If you modify a copy of the Library, and, in your modifications, a
facility refers to a function or data to be supplied by an Application
that uses the facility (other than as an argument passed when the
facility is invoked), then you may convey a copy of the modified
version:
a) under this License, provided that you make a good faith effort to
ensure that, in the event an Application does not supply the
function or data, the facility still operates, and performs
whatever part of its purpose remains meaningful, or
b) under the GNU GPL, with none of the additional permissions of
this License applicable to that copy.
3. Object Code Incorporating Material from Library Header Files.
The object code form of an Application may incorporate material from
a header file that is part of the Library. You may convey such object
code under terms of your choice, provided that, if the incorporated
material is not limited to numerical parameters, data structure
layouts and accessors, or small macros, inline functions and templates
(ten or fewer lines in length), you do both of the following:
a) Give prominent notice with each copy of the object code that the
Library is used in it and that the Library and its use are
covered by this License.
b) Accompany the object code with a copy of the GNU GPL and this license
document.
4. Combined Works.
You may convey a Combined Work under terms of your choice that,
taken together, effectively do not restrict modification of the
portions of the Library contained in the Combined Work and reverse
engineering for debugging such modifications, if you also do each of
the following:
a) Give prominent notice with each copy of the Combined Work that
the Library is used in it and that the Library and its use are
covered by this License.
b) Accompany the Combined Work with a copy of the GNU GPL and this license
document.
c) For a Combined Work that displays copyright notices during
execution, include the copyright notice for the Library among
these notices, as well as a reference directing the user to the
copies of the GNU GPL and this license document.
d) Do one of the following:
0) Convey the Minimal Corresponding Source under the terms of this
License, and the Corresponding Application Code in a form
suitable for, and under terms that permit, the user to
recombine or relink the Application with a modified version of
the Linked Version to produce a modified Combined Work, in the
manner specified by section 6 of the GNU GPL for conveying
Corresponding Source.
1) Use a suitable shared library mechanism for linking with the
Library. A suitable mechanism is one that (a) uses at run time
a copy of the Library already present on the user's computer
system, and (b) will operate properly with a modified version
of the Library that is interface-compatible with the Linked
Version.
e) Provide Installation Information, but only if you would otherwise
be required to provide such information under section 6 of the
GNU GPL, and only to the extent that such information is
necessary to install and execute a modified version of the
Combined Work produced by recombining or relinking the
Application with a modified version of the Linked Version. (If
you use option 4d0, the Installation Information must accompany
the Minimal Corresponding Source and Corresponding Application
Code. If you use option 4d1, you must provide the Installation
Information in the manner specified by section 6 of the GNU GPL
for conveying Corresponding Source.)
5. Combined Libraries.
You may place library facilities that are a work based on the
Library side by side in a single library together with other library
facilities that are not Applications and are not covered by this
License, and convey such a combined library under terms of your
choice, if you do both of the following:
a) Accompany the combined library with a copy of the same work based
on the Library, uncombined with any other library facilities,
conveyed under the terms of this License.
b) Give prominent notice with the combined library that part of it
is a work based on the Library, and explaining where to find the
accompanying uncombined form of the same work.
6. Revised Versions of the GNU Lesser General Public License.
The Free Software Foundation may publish revised and/or new versions
of the GNU Lesser General Public License from time to time. Such new
versions will be similar in spirit to the present version, but may
differ in detail to address new problems or concerns.
Each version is given a distinguishing version number. If the
Library as you received it specifies that a certain numbered version
of the GNU Lesser General Public License "or any later version"
applies to it, you have the option of following the terms and
conditions either of that published version or of any later version
published by the Free Software Foundation. If the Library as you
received it does not specify a version number of the GNU Lesser
General Public License, you may choose any version of the GNU Lesser
General Public License ever published by the Free Software Foundation.
If the Library as you received it specifies that a proxy can decide
whether future versions of the GNU Lesser General Public License shall
apply, that proxy's public statement of acceptance of any version is
permanent authorization for you to choose that version for the
Library.
Cuba-3.0/ChangeLog 0000644 0000000 0000000 00000015642 11663441220 012505 0 ustar root root 24 Nov 11:
- Significantly rearranged Divonne, e.g. unrolled the recursion
on regions, for better parallelizability.
- Improved parallelization through DoSample.
- Automatic detection and usage of the free cores on a machine,
or else set CUBACORES to the number of cores one wishes to
utilize, with negative numbers meaning "up to" depending on
availability (e.g. -2 means "use up to two free cores").
12 Aug 11:
- Version 3.0: Added parallelization, currently 'only' through
the DoSample routine. Uses fork/wait so integrands do not have
to be reentrant.
Specify number of cores in environment variable CUBACORES.
C/C++/Fortran only, Mathematica users need to replace MapSample
by ParallelMap or similar (as before).
18 Jun 11:
- Fixed problem with inner integration bounds depending on outer
ones in the MathLink executables.
15 Feb 11:
- Moved partview to Qt 4.
- Rectified error reporting via longjmp, in particular avoiding
sending $Failed twice in MathLink which would upset the
following communications.
13 Sep 10:
- Added iteration number to integrand's optional parameters
(Vegas and Suave).
- Fixed initialization problem when using state file in Vegas.
- Added tests for MathLink to configure.
20 Jul 10:
- Fixed severe bug in divonne/Split.c (wrong sign in SignedDelta
macro).
14 Jul 10:
- Disabled optimization for gcc 4.2.x and 4.4.3, which would lead
to an Internal Compiler Error when compiling Cuba, see
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40237
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42956
21 Jun 10:
- Fixed problem with bashy syntax in tools/mcc.
8 Jun 10:
- All Cuba functions now reentrant, except for gridptr_ and griddim_
in Vegas, which are intentionally preserved across calls.
19 May 10:
- Version 2.0: Changed invocations.
- Added void *userdata to be passed to integrator.
- Promoted integrand to int function, has to return 0 if successful,
otherwise integrator terminates immediately.
- Moved all global variables (common blocks) to argument list.
12 Feb 10:
- Added Ranlux pseudo-random number generator.
Luxury level 0 (mis)used for Mersenne Twister branch
(but observe that Luxury level 24 = Luxury level 0).
- Changed external variable mersenneseed to
struct { unsigned int level, seed; } cubarandom;
22 Jul 09:
- Fixed potential segfault in Split.c of Divonne, thanks to
Andreas v. Manteuffel.
29 May 09:
- Added flushing of grids in Vegas through a negative grid number.
25 May 09:
- Removed explicit pointer reference from reallocatable
"region_" array.
8 May 09:
- Improved memory handling in Divonne.
8 Apr 09:
- Version 1.6: Improved memory handling in Cuhre.
Thanks to Valery Yundin for pointing out the problem.
6 Mar 09:
- Fixed segfault in Divonne if all samples from a region returned NaN.
- Reinstated fcc to fix static linkage problem with mcc 7.
10 Feb 09:
- Removed dependence on fcc script.
19 Jan 09:
- Added missing #include to partview.cpp.
15 Jan 09:
- Fixed problem with MathLink compilation for Mathematica 7.
5 Dec 08
- Version 1.5: Added possibility to set Mersenne Twister
random seed.
- Introduced function MapSample to map the integrand over
the points, whose default value Map can be replaced e.g.
by ParallelMap.
15 Feb 08
- Added further check to Suave for sharp-edged functions.
15 Jan 08
- Fixed bug in makefile.in w.r.t. DESTDIR.
2 Jan 08
- Fixed minor bug in invocation of IniRandom in Suave.
19 Dec 07
- Version 1.4: Added new flag (bit 4), to turn off smoothing of
the importance function for sharp-edged functions.
- Improved configure for Cygwin. Now compiles MathLink
executables `out of the box'.
30 Nov 07
- Fixed detection of variable-size arrays in configure.ac.
- Minor fixes for autoconf 2.60.
30 Aug 07
- Added passing of weight information to the integrand routine
in Vegas and Suave. Mathematica versions use $Weight.
7 Mar 07
- Documented the ll versions in the manual.
1 Mar 06
- Version 1.3: added long long int versions, i.e. all
number-of-points-like quantities are now long long int
instead of int. The corresponding names are prefixed with
"ll", e.g. llVegas.
5 Jan 06
- Corrected a number of declarations so that changing the "number"
typedef in stddecl.h to a longer integer should work now.
Note that this bugfix has NO EFFECT if the "number" typedef
was not changed by hand!
31 Aug 05
- A small patch considerably reduces the "mysterious" problem
in Vegas and Suave that further iterations on a more or less
optimal grid would often degrade the grid.
2 Jun 05
- Added some #ifdefs to make the compile completely silent.
- Changed HUGE_VAL to DBL_MAX to avoid problems with icc.
7 Mar 05
- Extended Divonne's Korobov tables.
- partview now sorts the list of rectangles so that the smallest
ones come on top.
2 Mar 05
- Fixed "mysterious" problem where Divonne would report a
larger-than-requested error even though enough samples were
available.
17 Feb 05
- Rewrote partview.cpp with tabbed window.
- Moved sources to src/{vegas,suave,divonne,cuhre}.
The original names would get into the way of the Mathematica
executables on OSX's case-insensitive file system.
15 Feb 05
- configure now disables compilation of demo-fortran if no
Fortran compiler is found.
9 Feb 05
- Added some explicit typecasts and other tidbits such that
Cuba compiles successfully also with a C++ compiler now.
7 Feb 05
- Added erf implementation in case some "C99 compliant" compiler
like M$ Visual C++ in fact has no erf.
4 Feb 05
- Added partview.m for Mathematica.
3 Feb 05
- Added proper autoconf configure.
- Added cuba.F, a Fortran chooser which makes the invocation
of the Cuba routines still simpler from Fortran.
- Straightened out the contexts of the MathLink executables.
2 Feb 05
- Substituted preprocessor variable NBATCH by run-time configurable
global variable vegasbatch_.
- Added checks on ncomp.
1 Feb 05
- Added a partition viewer which displays the tesselation of the
integration region on screen. Needs Qt.
27 Jan 05
- Added a preprocessor flag NO_LONG_DOUBLE to disable the use
of long doubles on systems that don't have it.
25 Jan 05
- Rearranged Vegas to sample in batches of NBATCH points to
reduce memory consumption.
21 Jan 05
- Fixed bug in Divonne: Final result was wrong if not enough
samples left for Phase 3.
19 Jan 05
- Updated manual re pseudo-random sampling.
17 Jan 05
- Introduced "number" typedef, might be useful when using wide ints.
Not well tested, though.
- Substituted [sd]rand48 by Mersenne Twister generator.
14 Jan 05
- Added pseudo-rng (bit 3 in flags).
- Collected common declarations in stddecl.h.
- Better checking of dimension (e.g. in Divonne, all cases).
12 Jan 05
- Updated manual re vegas{grid,state}.
23 Dec 04
- Fixed a memory leak in Cuhre.
18 Nov 04
- Added vegasstate load/restore of internal state.
16 Jul 04
- Added vegasgrid.
Cuba-3.0/config.h.in 0000644 0000000 0000000 00000002534 11663160330 012752 0 ustar root root /* config.h.in. Generated from configure.ac by autoheader. */
/* Define to 1 if you have the `erf' function. */
#undef HAVE_ERF
/* Define to 1 if you have the `getloadavg' function. */
#undef HAVE_GETLOADAVG
/* Define to 1 if the type `long double' works and has more range or precision
than `double'. */
#undef HAVE_LONG_DOUBLE
/* Define to 1 if the type `long double' works and has more range or precision
than `double'. */
#undef HAVE_LONG_DOUBLE_WIDER
/* Define to 1 if you have the `powl' function. */
#undef HAVE_POWL
/* Maximum number of dimensions */
#undef NCOMP
/* Maximum number of components */
#undef NDIM
/* Define to the address where bug reports for this package should be sent. */
#undef PACKAGE_BUGREPORT
/* Define to the full name of this package. */
#undef PACKAGE_NAME
/* Define to the full name and version of this package. */
#undef PACKAGE_STRING
/* Define to the one symbol short name of this package. */
#undef PACKAGE_TARNAME
/* Define to the home page for this package. */
#undef PACKAGE_URL
/* Define to the version of this package. */
#undef PACKAGE_VERSION
/* Define to empty if `const' does not conform to ANSI C. */
#undef const
/* Define to `__inline__' or `__inline' if that's what the C compiler
calls it, or to nothing if 'inline' is not supported under any name. */
#ifndef __cplusplus
#undef inline
#endif
Cuba-3.0/configure 0000755 0000000 0000000 00000415313 11663160327 012647 0 ustar root root #! /bin/sh
# Guess values for system-dependent variables and create Makefiles.
# Generated by GNU Autoconf 2.68 for Cuba 3.0.
#
# Report bugs to .
#
#
# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001,
# 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software
# Foundation, Inc.
#
#
# This configure script is free software; the Free Software Foundation
# gives unlimited permission to copy, distribute and modify it.
## -------------------- ##
## M4sh Initialization. ##
## -------------------- ##
# Be more Bourne compatible
DUALCASE=1; export DUALCASE # for MKS sh
if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
emulate sh
NULLCMD=:
# Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
# is contrary to our usage. Disable this feature.
alias -g '${1+"$@"}'='"$@"'
setopt NO_GLOB_SUBST
else
case `(set -o) 2>/dev/null` in #(
*posix*) :
set -o posix ;; #(
*) :
;;
esac
fi
as_nl='
'
export as_nl
# Printing a long string crashes Solaris 7 /usr/bin/printf.
as_echo='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo
as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo$as_echo
# Prefer a ksh shell builtin over an external printf program on Solaris,
# but without wasting forks for bash or zsh.
if test -z "$BASH_VERSION$ZSH_VERSION" \
&& (test "X`print -r -- $as_echo`" = "X$as_echo") 2>/dev/null; then
as_echo='print -r --'
as_echo_n='print -rn --'
elif (test "X`printf %s $as_echo`" = "X$as_echo") 2>/dev/null; then
as_echo='printf %s\n'
as_echo_n='printf %s'
else
if test "X`(/usr/ucb/echo -n -n $as_echo) 2>/dev/null`" = "X-n $as_echo"; then
as_echo_body='eval /usr/ucb/echo -n "$1$as_nl"'
as_echo_n='/usr/ucb/echo -n'
else
as_echo_body='eval expr "X$1" : "X\\(.*\\)"'
as_echo_n_body='eval
arg=$1;
case $arg in #(
*"$as_nl"*)
expr "X$arg" : "X\\(.*\\)$as_nl";
arg=`expr "X$arg" : ".*$as_nl\\(.*\\)"`;;
esac;
expr "X$arg" : "X\\(.*\\)" | tr -d "$as_nl"
'
export as_echo_n_body
as_echo_n='sh -c $as_echo_n_body as_echo'
fi
export as_echo_body
as_echo='sh -c $as_echo_body as_echo'
fi
# The user is always right.
if test "${PATH_SEPARATOR+set}" != set; then
PATH_SEPARATOR=:
(PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
(PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
PATH_SEPARATOR=';'
}
fi
# IFS
# We need space, tab and new line, in precisely that order. Quoting is
# there to prevent editors from complaining about space-tab.
# (If _AS_PATH_WALK were called with IFS unset, it would disable word
# splitting by setting IFS to empty value.)
IFS=" "" $as_nl"
# Find who we are. Look in the path if we contain no directory separator.
as_myself=
case $0 in #((
*[\\/]* ) as_myself=$0 ;;
*) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
test -r "$as_dir/$0" && as_myself=$as_dir/$0 && break
done
IFS=$as_save_IFS
;;
esac
# We did not find ourselves, most probably we were run as `sh COMMAND'
# in which case we are not to be found in the path.
if test "x$as_myself" = x; then
as_myself=$0
fi
if test ! -f "$as_myself"; then
$as_echo "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
exit 1
fi
# Unset variables that we do not need and which cause bugs (e.g. in
# pre-3.0 UWIN ksh). But do not cause bugs in bash 2.01; the "|| exit 1"
# suppresses any "Segmentation fault" message there. '((' could
# trigger a bug in pdksh 5.2.14.
for as_var in BASH_ENV ENV MAIL MAILPATH
do eval test x\${$as_var+set} = xset \
&& ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
done
PS1='$ '
PS2='> '
PS4='+ '
# NLS nuisances.
LC_ALL=C
export LC_ALL
LANGUAGE=C
export LANGUAGE
# CDPATH.
(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
if test "x$CONFIG_SHELL" = x; then
as_bourne_compatible="if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then :
emulate sh
NULLCMD=:
# Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which
# is contrary to our usage. Disable this feature.
alias -g '\${1+\"\$@\"}'='\"\$@\"'
setopt NO_GLOB_SUBST
else
case \`(set -o) 2>/dev/null\` in #(
*posix*) :
set -o posix ;; #(
*) :
;;
esac
fi
"
as_required="as_fn_return () { (exit \$1); }
as_fn_success () { as_fn_return 0; }
as_fn_failure () { as_fn_return 1; }
as_fn_ret_success () { return 0; }
as_fn_ret_failure () { return 1; }
exitcode=0
as_fn_success || { exitcode=1; echo as_fn_success failed.; }
as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; }
as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; }
as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; }
if ( set x; as_fn_ret_success y && test x = \"\$1\" ); then :
else
exitcode=1; echo positional parameters were not saved.
fi
test x\$exitcode = x0 || exit 1"
as_suggested=" as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO
as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO
eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" &&
test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1"
if (eval "$as_required") 2>/dev/null; then :
as_have_required=yes
else
as_have_required=no
fi
if test x$as_have_required = xyes && (eval "$as_suggested") 2>/dev/null; then :
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
as_found=false
for as_dir in /bin$PATH_SEPARATOR/usr/bin$PATH_SEPARATOR$PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
as_found=:
case $as_dir in #(
/*)
for as_base in sh bash ksh sh5; do
# Try only shells that exist, to save several forks.
as_shell=$as_dir/$as_base
if { test -f "$as_shell" || test -f "$as_shell.exe"; } &&
{ $as_echo "$as_bourne_compatible""$as_required" | as_run=a "$as_shell"; } 2>/dev/null; then :
CONFIG_SHELL=$as_shell as_have_required=yes
if { $as_echo "$as_bourne_compatible""$as_suggested" | as_run=a "$as_shell"; } 2>/dev/null; then :
break 2
fi
fi
done;;
esac
as_found=false
done
$as_found || { if { test -f "$SHELL" || test -f "$SHELL.exe"; } &&
{ $as_echo "$as_bourne_compatible""$as_required" | as_run=a "$SHELL"; } 2>/dev/null; then :
CONFIG_SHELL=$SHELL as_have_required=yes
fi; }
IFS=$as_save_IFS
if test "x$CONFIG_SHELL" != x; then :
# We cannot yet assume a decent shell, so we have to provide a
# neutralization value for shells without unset; and this also
# works around shells that cannot unset nonexistent variables.
# Preserve -v and -x to the replacement shell.
BASH_ENV=/dev/null
ENV=/dev/null
(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
export CONFIG_SHELL
case $- in # ((((
*v*x* | *x*v* ) as_opts=-vx ;;
*v* ) as_opts=-v ;;
*x* ) as_opts=-x ;;
* ) as_opts= ;;
esac
exec "$CONFIG_SHELL" $as_opts "$as_myself" ${1+"$@"}
fi
if test x$as_have_required = xno; then :
$as_echo "$0: This script requires a shell more modern than all"
$as_echo "$0: the shells that I found on your system."
if test x${ZSH_VERSION+set} = xset ; then
$as_echo "$0: In particular, zsh $ZSH_VERSION has bugs and should"
$as_echo "$0: be upgraded to zsh 4.3.4 or later."
else
$as_echo "$0: Please tell bug-autoconf@gnu.org and hahn@feynarts.de
$0: about your system, including any error possibly output
$0: before this message. Then install a modern shell, or
$0: manually run the script under such a shell if you do
$0: have one."
fi
exit 1
fi
fi
fi
SHELL=${CONFIG_SHELL-/bin/sh}
export SHELL
# Unset more variables known to interfere with behavior of common tools.
CLICOLOR_FORCE= GREP_OPTIONS=
unset CLICOLOR_FORCE GREP_OPTIONS
## --------------------- ##
## M4sh Shell Functions. ##
## --------------------- ##
# as_fn_unset VAR
# ---------------
# Portably unset VAR.
as_fn_unset ()
{
{ eval $1=; unset $1;}
}
as_unset=as_fn_unset
# as_fn_set_status STATUS
# -----------------------
# Set $? to STATUS, without forking.
as_fn_set_status ()
{
return $1
} # as_fn_set_status
# as_fn_exit STATUS
# -----------------
# Exit the shell with STATUS, even in a "trap 0" or "set -e" context.
as_fn_exit ()
{
set +e
as_fn_set_status $1
exit $1
} # as_fn_exit
# as_fn_mkdir_p
# -------------
# Create "$as_dir" as a directory, including parents if necessary.
as_fn_mkdir_p ()
{
case $as_dir in #(
-*) as_dir=./$as_dir;;
esac
test -d "$as_dir" || eval $as_mkdir_p || {
as_dirs=
while :; do
case $as_dir in #(
*\'*) as_qdir=`$as_echo "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'(
*) as_qdir=$as_dir;;
esac
as_dirs="'$as_qdir' $as_dirs"
as_dir=`$as_dirname -- "$as_dir" ||
$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
X"$as_dir" : 'X\(//\)[^/]' \| \
X"$as_dir" : 'X\(//\)$' \| \
X"$as_dir" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X"$as_dir" |
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
s//\1/
q
}
/^X\(\/\/\)[^/].*/{
s//\1/
q
}
/^X\(\/\/\)$/{
s//\1/
q
}
/^X\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
test -d "$as_dir" && break
done
test -z "$as_dirs" || eval "mkdir $as_dirs"
} || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir"
} # as_fn_mkdir_p
# as_fn_append VAR VALUE
# ----------------------
# Append the text in VALUE to the end of the definition contained in VAR. Take
# advantage of any shell optimizations that allow amortized linear growth over
# repeated appends, instead of the typical quadratic growth present in naive
# implementations.
if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null; then :
eval 'as_fn_append ()
{
eval $1+=\$2
}'
else
as_fn_append ()
{
eval $1=\$$1\$2
}
fi # as_fn_append
# as_fn_arith ARG...
# ------------------
# Perform arithmetic evaluation on the ARGs, and store the result in the
# global $as_val. Take advantage of shells that can avoid forks. The arguments
# must be portable across $(()) and expr.
if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null; then :
eval 'as_fn_arith ()
{
as_val=$(( $* ))
}'
else
as_fn_arith ()
{
as_val=`expr "$@" || test $? -eq 1`
}
fi # as_fn_arith
# as_fn_error STATUS ERROR [LINENO LOG_FD]
# ----------------------------------------
# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are
# provided, also output the error to LOG_FD, referencing LINENO. Then exit the
# script with STATUS, using 1 if that was 0.
as_fn_error ()
{
as_status=$1; test $as_status -eq 0 && as_status=1
if test "$4"; then
as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
$as_echo "$as_me:${as_lineno-$LINENO}: error: $2" >&$4
fi
$as_echo "$as_me: error: $2" >&2
as_fn_exit $as_status
} # as_fn_error
if expr a : '\(a\)' >/dev/null 2>&1 &&
test "X`expr 00001 : '.*\(...\)'`" = X001; then
as_expr=expr
else
as_expr=false
fi
if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then
as_basename=basename
else
as_basename=false
fi
if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then
as_dirname=dirname
else
as_dirname=false
fi
as_me=`$as_basename -- "$0" ||
$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \
X"$0" : 'X\(//\)$' \| \
X"$0" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X/"$0" |
sed '/^.*\/\([^/][^/]*\)\/*$/{
s//\1/
q
}
/^X\/\(\/\/\)$/{
s//\1/
q
}
/^X\/\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
# Avoid depending upon Character Ranges.
as_cr_letters='abcdefghijklmnopqrstuvwxyz'
as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
as_cr_Letters=$as_cr_letters$as_cr_LETTERS
as_cr_digits='0123456789'
as_cr_alnum=$as_cr_Letters$as_cr_digits
as_lineno_1=$LINENO as_lineno_1a=$LINENO
as_lineno_2=$LINENO as_lineno_2a=$LINENO
eval 'test "x$as_lineno_1'$as_run'" != "x$as_lineno_2'$as_run'" &&
test "x`expr $as_lineno_1'$as_run' + 1`" = "x$as_lineno_2'$as_run'"' || {
# Blame Lee E. McMahon (1931-1989) for sed's syntax. :-)
sed -n '
p
/[$]LINENO/=
' <$as_myself |
sed '
s/[$]LINENO.*/&-/
t lineno
b
:lineno
N
:loop
s/[$]LINENO\([^'$as_cr_alnum'_].*\n\)\(.*\)/\2\1\2/
t loop
s/-\n.*//
' >$as_me.lineno &&
chmod +x "$as_me.lineno" ||
{ $as_echo "$as_me: error: cannot create $as_me.lineno; rerun with a POSIX shell" >&2; as_fn_exit 1; }
# Don't try to exec as it changes $[0], causing all sort of problems
# (the dirname of $[0] is not the place where we might find the
# original and so on. Autoconf is especially sensitive to this).
. "./$as_me.lineno"
# Exit status is that of the last command.
exit
}
ECHO_C= ECHO_N= ECHO_T=
case `echo -n x` in #(((((
-n*)
case `echo 'xy\c'` in
*c*) ECHO_T=' ';; # ECHO_T is single tab character.
xy) ECHO_C='\c';;
*) echo `echo ksh88 bug on AIX 6.1` > /dev/null
ECHO_T=' ';;
esac;;
*)
ECHO_N='-n';;
esac
rm -f conf$$ conf$$.exe conf$$.file
if test -d conf$$.dir; then
rm -f conf$$.dir/conf$$.file
else
rm -f conf$$.dir
mkdir conf$$.dir 2>/dev/null
fi
if (echo >conf$$.file) 2>/dev/null; then
if ln -s conf$$.file conf$$ 2>/dev/null; then
as_ln_s='ln -s'
# ... but there are two gotchas:
# 1) On MSYS, both `ln -s file dir' and `ln file dir' fail.
# 2) DJGPP < 2.04 has no symlinks; `ln -s' creates a wrapper executable.
# In both cases, we have to default to `cp -p'.
ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe ||
as_ln_s='cp -p'
elif ln conf$$.file conf$$ 2>/dev/null; then
as_ln_s=ln
else
as_ln_s='cp -p'
fi
else
as_ln_s='cp -p'
fi
rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file
rmdir conf$$.dir 2>/dev/null
if mkdir -p . 2>/dev/null; then
as_mkdir_p='mkdir -p "$as_dir"'
else
test -d ./-p && rmdir ./-p
as_mkdir_p=false
fi
if test -x / >/dev/null 2>&1; then
as_test_x='test -x'
else
if ls -dL / >/dev/null 2>&1; then
as_ls_L_option=L
else
as_ls_L_option=
fi
as_test_x='
eval sh -c '\''
if test -d "$1"; then
test -d "$1/.";
else
case $1 in #(
-*)set "./$1";;
esac;
case `ls -ld'$as_ls_L_option' "$1" 2>/dev/null` in #((
???[sx]*):;;*)false;;esac;fi
'\'' sh
'
fi
as_executable_p=$as_test_x
# Sed expression to map a string onto a valid CPP name.
as_tr_cpp="eval sed 'y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g'"
# Sed expression to map a string onto a valid variable name.
as_tr_sh="eval sed 'y%*+%pp%;s%[^_$as_cr_alnum]%_%g'"
test -n "$DJDIR" || exec 7<&0 &1
# Name of the host.
# hostname on some systems (SVR3.2, old GNU/Linux) returns a bogus exit status,
# so uname gets run too.
ac_hostname=`(hostname || uname -n) 2>/dev/null | sed 1q`
#
# Initializations.
#
ac_default_prefix=/usr/local
ac_clean_files=
ac_config_libobj_dir=.
LIBOBJS=
cross_compiling=no
subdirs=
MFLAGS=
MAKEFLAGS=
# Identity of this package.
PACKAGE_NAME='Cuba'
PACKAGE_TARNAME='cuba'
PACKAGE_VERSION='3.0'
PACKAGE_STRING='Cuba 3.0'
PACKAGE_BUGREPORT='hahn@feynarts.de'
PACKAGE_URL=''
ac_unique_file="cuba.h"
ac_subst_vars='LTLIBOBJS
LIBOBJS
DEMO_FORTRAN_DEFAULT
TOOLS_DEFAULT
HAVE_QMAKE
MATH_DEFAULT
INSTALL_DATA
INSTALL_SCRIPT
INSTALL_PROGRAM
RANLIB
ac_ct_F77
FFLAGS
F77
OBJEXT
EXEEXT
ac_ct_CC
CPPFLAGS
LDFLAGS
CFLAGS
CC
MCFLAGS
target_alias
host_alias
build_alias
LIBS
ECHO_T
ECHO_N
ECHO_C
DEFS
mandir
localedir
libdir
psdir
pdfdir
dvidir
htmldir
infodir
docdir
oldincludedir
includedir
localstatedir
sharedstatedir
sysconfdir
datadir
datarootdir
libexecdir
sbindir
bindir
program_transform_name
prefix
exec_prefix
PACKAGE_URL
PACKAGE_BUGREPORT
PACKAGE_STRING
PACKAGE_VERSION
PACKAGE_TARNAME
PACKAGE_NAME
PATH_SEPARATOR
SHELL'
ac_subst_files=''
ac_user_opts='
enable_option_checking
with_maxdim
with_maxcomp
'
ac_precious_vars='build_alias
host_alias
target_alias
MCFLAGS
CC
CFLAGS
LDFLAGS
LIBS
CPPFLAGS
F77
FFLAGS'
# Initialize some variables set by options.
ac_init_help=
ac_init_version=false
ac_unrecognized_opts=
ac_unrecognized_sep=
# The variables have the same names as the options, with
# dashes changed to underlines.
cache_file=/dev/null
exec_prefix=NONE
no_create=
no_recursion=
prefix=NONE
program_prefix=NONE
program_suffix=NONE
program_transform_name=s,x,x,
silent=
site=
srcdir=
verbose=
x_includes=NONE
x_libraries=NONE
# Installation directory options.
# These are left unexpanded so users can "make install exec_prefix=/foo"
# and all the variables that are supposed to be based on exec_prefix
# by default will actually change.
# Use braces instead of parens because sh, perl, etc. also accept them.
# (The list follows the same order as the GNU Coding Standards.)
bindir='${exec_prefix}/bin'
sbindir='${exec_prefix}/sbin'
libexecdir='${exec_prefix}/libexec'
datarootdir='${prefix}/share'
datadir='${datarootdir}'
sysconfdir='${prefix}/etc'
sharedstatedir='${prefix}/com'
localstatedir='${prefix}/var'
includedir='${prefix}/include'
oldincludedir='/usr/include'
docdir='${datarootdir}/doc/${PACKAGE_TARNAME}'
infodir='${datarootdir}/info'
htmldir='${docdir}'
dvidir='${docdir}'
pdfdir='${docdir}'
psdir='${docdir}'
libdir='${exec_prefix}/lib'
localedir='${datarootdir}/locale'
mandir='${datarootdir}/man'
ac_prev=
ac_dashdash=
for ac_option
do
# If the previous option needs an argument, assign it.
if test -n "$ac_prev"; then
eval $ac_prev=\$ac_option
ac_prev=
continue
fi
case $ac_option in
*=?*) ac_optarg=`expr "X$ac_option" : '[^=]*=\(.*\)'` ;;
*=) ac_optarg= ;;
*) ac_optarg=yes ;;
esac
# Accept the important Cygnus configure options, so we can diagnose typos.
case $ac_dashdash$ac_option in
--)
ac_dashdash=yes ;;
-bindir | --bindir | --bindi | --bind | --bin | --bi)
ac_prev=bindir ;;
-bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*)
bindir=$ac_optarg ;;
-build | --build | --buil | --bui | --bu)
ac_prev=build_alias ;;
-build=* | --build=* | --buil=* | --bui=* | --bu=*)
build_alias=$ac_optarg ;;
-cache-file | --cache-file | --cache-fil | --cache-fi \
| --cache-f | --cache- | --cache | --cach | --cac | --ca | --c)
ac_prev=cache_file ;;
-cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \
| --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*)
cache_file=$ac_optarg ;;
--config-cache | -C)
cache_file=config.cache ;;
-datadir | --datadir | --datadi | --datad)
ac_prev=datadir ;;
-datadir=* | --datadir=* | --datadi=* | --datad=*)
datadir=$ac_optarg ;;
-datarootdir | --datarootdir | --datarootdi | --datarootd | --dataroot \
| --dataroo | --dataro | --datar)
ac_prev=datarootdir ;;
-datarootdir=* | --datarootdir=* | --datarootdi=* | --datarootd=* \
| --dataroot=* | --dataroo=* | --dataro=* | --datar=*)
datarootdir=$ac_optarg ;;
-disable-* | --disable-*)
ac_useropt=`expr "x$ac_option" : 'x-*disable-\(.*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid feature name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"enable_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--disable-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval enable_$ac_useropt=no ;;
-docdir | --docdir | --docdi | --doc | --do)
ac_prev=docdir ;;
-docdir=* | --docdir=* | --docdi=* | --doc=* | --do=*)
docdir=$ac_optarg ;;
-dvidir | --dvidir | --dvidi | --dvid | --dvi | --dv)
ac_prev=dvidir ;;
-dvidir=* | --dvidir=* | --dvidi=* | --dvid=* | --dvi=* | --dv=*)
dvidir=$ac_optarg ;;
-enable-* | --enable-*)
ac_useropt=`expr "x$ac_option" : 'x-*enable-\([^=]*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid feature name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"enable_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--enable-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval enable_$ac_useropt=\$ac_optarg ;;
-exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \
| --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \
| --exec | --exe | --ex)
ac_prev=exec_prefix ;;
-exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \
| --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \
| --exec=* | --exe=* | --ex=*)
exec_prefix=$ac_optarg ;;
-gas | --gas | --ga | --g)
# Obsolete; use --with-gas.
with_gas=yes ;;
-help | --help | --hel | --he | -h)
ac_init_help=long ;;
-help=r* | --help=r* | --hel=r* | --he=r* | -hr*)
ac_init_help=recursive ;;
-help=s* | --help=s* | --hel=s* | --he=s* | -hs*)
ac_init_help=short ;;
-host | --host | --hos | --ho)
ac_prev=host_alias ;;
-host=* | --host=* | --hos=* | --ho=*)
host_alias=$ac_optarg ;;
-htmldir | --htmldir | --htmldi | --htmld | --html | --htm | --ht)
ac_prev=htmldir ;;
-htmldir=* | --htmldir=* | --htmldi=* | --htmld=* | --html=* | --htm=* \
| --ht=*)
htmldir=$ac_optarg ;;
-includedir | --includedir | --includedi | --included | --include \
| --includ | --inclu | --incl | --inc)
ac_prev=includedir ;;
-includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \
| --includ=* | --inclu=* | --incl=* | --inc=*)
includedir=$ac_optarg ;;
-infodir | --infodir | --infodi | --infod | --info | --inf)
ac_prev=infodir ;;
-infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*)
infodir=$ac_optarg ;;
-libdir | --libdir | --libdi | --libd)
ac_prev=libdir ;;
-libdir=* | --libdir=* | --libdi=* | --libd=*)
libdir=$ac_optarg ;;
-libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \
| --libexe | --libex | --libe)
ac_prev=libexecdir ;;
-libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \
| --libexe=* | --libex=* | --libe=*)
libexecdir=$ac_optarg ;;
-localedir | --localedir | --localedi | --localed | --locale)
ac_prev=localedir ;;
-localedir=* | --localedir=* | --localedi=* | --localed=* | --locale=*)
localedir=$ac_optarg ;;
-localstatedir | --localstatedir | --localstatedi | --localstated \
| --localstate | --localstat | --localsta | --localst | --locals)
ac_prev=localstatedir ;;
-localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \
| --localstate=* | --localstat=* | --localsta=* | --localst=* | --locals=*)
localstatedir=$ac_optarg ;;
-mandir | --mandir | --mandi | --mand | --man | --ma | --m)
ac_prev=mandir ;;
-mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*)
mandir=$ac_optarg ;;
-nfp | --nfp | --nf)
# Obsolete; use --without-fp.
with_fp=no ;;
-no-create | --no-create | --no-creat | --no-crea | --no-cre \
| --no-cr | --no-c | -n)
no_create=yes ;;
-no-recursion | --no-recursion | --no-recursio | --no-recursi \
| --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r)
no_recursion=yes ;;
-oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \
| --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \
| --oldin | --oldi | --old | --ol | --o)
ac_prev=oldincludedir ;;
-oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \
| --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \
| --oldin=* | --oldi=* | --old=* | --ol=* | --o=*)
oldincludedir=$ac_optarg ;;
-prefix | --prefix | --prefi | --pref | --pre | --pr | --p)
ac_prev=prefix ;;
-prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*)
prefix=$ac_optarg ;;
-program-prefix | --program-prefix | --program-prefi | --program-pref \
| --program-pre | --program-pr | --program-p)
ac_prev=program_prefix ;;
-program-prefix=* | --program-prefix=* | --program-prefi=* \
| --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*)
program_prefix=$ac_optarg ;;
-program-suffix | --program-suffix | --program-suffi | --program-suff \
| --program-suf | --program-su | --program-s)
ac_prev=program_suffix ;;
-program-suffix=* | --program-suffix=* | --program-suffi=* \
| --program-suff=* | --program-suf=* | --program-su=* | --program-s=*)
program_suffix=$ac_optarg ;;
-program-transform-name | --program-transform-name \
| --program-transform-nam | --program-transform-na \
| --program-transform-n | --program-transform- \
| --program-transform | --program-transfor \
| --program-transfo | --program-transf \
| --program-trans | --program-tran \
| --progr-tra | --program-tr | --program-t)
ac_prev=program_transform_name ;;
-program-transform-name=* | --program-transform-name=* \
| --program-transform-nam=* | --program-transform-na=* \
| --program-transform-n=* | --program-transform-=* \
| --program-transform=* | --program-transfor=* \
| --program-transfo=* | --program-transf=* \
| --program-trans=* | --program-tran=* \
| --progr-tra=* | --program-tr=* | --program-t=*)
program_transform_name=$ac_optarg ;;
-pdfdir | --pdfdir | --pdfdi | --pdfd | --pdf | --pd)
ac_prev=pdfdir ;;
-pdfdir=* | --pdfdir=* | --pdfdi=* | --pdfd=* | --pdf=* | --pd=*)
pdfdir=$ac_optarg ;;
-psdir | --psdir | --psdi | --psd | --ps)
ac_prev=psdir ;;
-psdir=* | --psdir=* | --psdi=* | --psd=* | --ps=*)
psdir=$ac_optarg ;;
-q | -quiet | --quiet | --quie | --qui | --qu | --q \
| -silent | --silent | --silen | --sile | --sil)
silent=yes ;;
-sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb)
ac_prev=sbindir ;;
-sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \
| --sbi=* | --sb=*)
sbindir=$ac_optarg ;;
-sharedstatedir | --sharedstatedir | --sharedstatedi \
| --sharedstated | --sharedstate | --sharedstat | --sharedsta \
| --sharedst | --shareds | --shared | --share | --shar \
| --sha | --sh)
ac_prev=sharedstatedir ;;
-sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \
| --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \
| --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \
| --sha=* | --sh=*)
sharedstatedir=$ac_optarg ;;
-site | --site | --sit)
ac_prev=site ;;
-site=* | --site=* | --sit=*)
site=$ac_optarg ;;
-srcdir | --srcdir | --srcdi | --srcd | --src | --sr)
ac_prev=srcdir ;;
-srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*)
srcdir=$ac_optarg ;;
-sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \
| --syscon | --sysco | --sysc | --sys | --sy)
ac_prev=sysconfdir ;;
-sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \
| --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*)
sysconfdir=$ac_optarg ;;
-target | --target | --targe | --targ | --tar | --ta | --t)
ac_prev=target_alias ;;
-target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*)
target_alias=$ac_optarg ;;
-v | -verbose | --verbose | --verbos | --verbo | --verb)
verbose=yes ;;
-version | --version | --versio | --versi | --vers | -V)
ac_init_version=: ;;
-with-* | --with-*)
ac_useropt=`expr "x$ac_option" : 'x-*with-\([^=]*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid package name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"with_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--with-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval with_$ac_useropt=\$ac_optarg ;;
-without-* | --without-*)
ac_useropt=`expr "x$ac_option" : 'x-*without-\(.*\)'`
# Reject names that are not valid shell variable names.
expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null &&
as_fn_error $? "invalid package name: $ac_useropt"
ac_useropt_orig=$ac_useropt
ac_useropt=`$as_echo "$ac_useropt" | sed 's/[-+.]/_/g'`
case $ac_user_opts in
*"
"with_$ac_useropt"
"*) ;;
*) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--without-$ac_useropt_orig"
ac_unrecognized_sep=', ';;
esac
eval with_$ac_useropt=no ;;
--x)
# Obsolete; use --with-x.
with_x=yes ;;
-x-includes | --x-includes | --x-include | --x-includ | --x-inclu \
| --x-incl | --x-inc | --x-in | --x-i)
ac_prev=x_includes ;;
-x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \
| --x-incl=* | --x-inc=* | --x-in=* | --x-i=*)
x_includes=$ac_optarg ;;
-x-libraries | --x-libraries | --x-librarie | --x-librari \
| --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l)
ac_prev=x_libraries ;;
-x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \
| --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*)
x_libraries=$ac_optarg ;;
-*) as_fn_error $? "unrecognized option: \`$ac_option'
Try \`$0 --help' for more information"
;;
*=*)
ac_envvar=`expr "x$ac_option" : 'x\([^=]*\)='`
# Reject names that are not valid shell variable names.
case $ac_envvar in #(
'' | [0-9]* | *[!_$as_cr_alnum]* )
as_fn_error $? "invalid variable name: \`$ac_envvar'" ;;
esac
eval $ac_envvar=\$ac_optarg
export $ac_envvar ;;
*)
# FIXME: should be removed in autoconf 3.0.
$as_echo "$as_me: WARNING: you should use --build, --host, --target" >&2
expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null &&
$as_echo "$as_me: WARNING: invalid host type: $ac_option" >&2
: "${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option}"
;;
esac
done
if test -n "$ac_prev"; then
ac_option=--`echo $ac_prev | sed 's/_/-/g'`
as_fn_error $? "missing argument to $ac_option"
fi
if test -n "$ac_unrecognized_opts"; then
case $enable_option_checking in
no) ;;
fatal) as_fn_error $? "unrecognized options: $ac_unrecognized_opts" ;;
*) $as_echo "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2 ;;
esac
fi
# Check all directory arguments for consistency.
for ac_var in exec_prefix prefix bindir sbindir libexecdir datarootdir \
datadir sysconfdir sharedstatedir localstatedir includedir \
oldincludedir docdir infodir htmldir dvidir pdfdir psdir \
libdir localedir mandir
do
eval ac_val=\$$ac_var
# Remove trailing slashes.
case $ac_val in
*/ )
ac_val=`expr "X$ac_val" : 'X\(.*[^/]\)' \| "X$ac_val" : 'X\(.*\)'`
eval $ac_var=\$ac_val;;
esac
# Be sure to have absolute directory names.
case $ac_val in
[\\/$]* | ?:[\\/]* ) continue;;
NONE | '' ) case $ac_var in *prefix ) continue;; esac;;
esac
as_fn_error $? "expected an absolute directory name for --$ac_var: $ac_val"
done
# There might be people who depend on the old broken behavior: `$host'
# used to hold the argument of --host etc.
# FIXME: To remove some day.
build=$build_alias
host=$host_alias
target=$target_alias
# FIXME: To remove some day.
if test "x$host_alias" != x; then
if test "x$build_alias" = x; then
cross_compiling=maybe
$as_echo "$as_me: WARNING: if you wanted to set the --build type, don't use --host.
If a cross compiler is detected then cross compile mode will be used" >&2
elif test "x$build_alias" != "x$host_alias"; then
cross_compiling=yes
fi
fi
ac_tool_prefix=
test -n "$host_alias" && ac_tool_prefix=$host_alias-
test "$silent" = yes && exec 6>/dev/null
ac_pwd=`pwd` && test -n "$ac_pwd" &&
ac_ls_di=`ls -di .` &&
ac_pwd_ls_di=`cd "$ac_pwd" && ls -di .` ||
as_fn_error $? "working directory cannot be determined"
test "X$ac_ls_di" = "X$ac_pwd_ls_di" ||
as_fn_error $? "pwd does not report name of working directory"
# Find the source files, if location was not specified.
if test -z "$srcdir"; then
ac_srcdir_defaulted=yes
# Try the directory containing this script, then the parent directory.
ac_confdir=`$as_dirname -- "$as_myself" ||
$as_expr X"$as_myself" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
X"$as_myself" : 'X\(//\)[^/]' \| \
X"$as_myself" : 'X\(//\)$' \| \
X"$as_myself" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X"$as_myself" |
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
s//\1/
q
}
/^X\(\/\/\)[^/].*/{
s//\1/
q
}
/^X\(\/\/\)$/{
s//\1/
q
}
/^X\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
srcdir=$ac_confdir
if test ! -r "$srcdir/$ac_unique_file"; then
srcdir=..
fi
else
ac_srcdir_defaulted=no
fi
if test ! -r "$srcdir/$ac_unique_file"; then
test "$ac_srcdir_defaulted" = yes && srcdir="$ac_confdir or .."
as_fn_error $? "cannot find sources ($ac_unique_file) in $srcdir"
fi
ac_msg="sources are in $srcdir, but \`cd $srcdir' does not work"
ac_abs_confdir=`(
cd "$srcdir" && test -r "./$ac_unique_file" || as_fn_error $? "$ac_msg"
pwd)`
# When building in place, set srcdir=.
if test "$ac_abs_confdir" = "$ac_pwd"; then
srcdir=.
fi
# Remove unnecessary trailing slashes from srcdir.
# Double slashes in file names in object file debugging info
# mess up M-x gdb in Emacs.
case $srcdir in
*/) srcdir=`expr "X$srcdir" : 'X\(.*[^/]\)' \| "X$srcdir" : 'X\(.*\)'`;;
esac
for ac_var in $ac_precious_vars; do
eval ac_env_${ac_var}_set=\${${ac_var}+set}
eval ac_env_${ac_var}_value=\$${ac_var}
eval ac_cv_env_${ac_var}_set=\${${ac_var}+set}
eval ac_cv_env_${ac_var}_value=\$${ac_var}
done
#
# Report the --help message.
#
if test "$ac_init_help" = "long"; then
# Omit some internal or obsolete options to make the list less imposing.
# This message is too long to be a string in the A/UX 3.1 sh.
cat <<_ACEOF
\`configure' configures Cuba 3.0 to adapt to many kinds of systems.
Usage: $0 [OPTION]... [VAR=VALUE]...
To assign environment variables (e.g., CC, CFLAGS...), specify them as
VAR=VALUE. See below for descriptions of some of the useful variables.
Defaults for the options are specified in brackets.
Configuration:
-h, --help display this help and exit
--help=short display options specific to this package
--help=recursive display the short help of all the included packages
-V, --version display version information and exit
-q, --quiet, --silent do not print \`checking ...' messages
--cache-file=FILE cache test results in FILE [disabled]
-C, --config-cache alias for \`--cache-file=config.cache'
-n, --no-create do not create output files
--srcdir=DIR find the sources in DIR [configure dir or \`..']
Installation directories:
--prefix=PREFIX install architecture-independent files in PREFIX
[$ac_default_prefix]
--exec-prefix=EPREFIX install architecture-dependent files in EPREFIX
[PREFIX]
By default, \`make install' will install all the files in
\`$ac_default_prefix/bin', \`$ac_default_prefix/lib' etc. You can specify
an installation prefix other than \`$ac_default_prefix' using \`--prefix',
for instance \`--prefix=\$HOME'.
For better control, use the options below.
Fine tuning of the installation directories:
--bindir=DIR user executables [EPREFIX/bin]
--sbindir=DIR system admin executables [EPREFIX/sbin]
--libexecdir=DIR program executables [EPREFIX/libexec]
--sysconfdir=DIR read-only single-machine data [PREFIX/etc]
--sharedstatedir=DIR modifiable architecture-independent data [PREFIX/com]
--localstatedir=DIR modifiable single-machine data [PREFIX/var]
--libdir=DIR object code libraries [EPREFIX/lib]
--includedir=DIR C header files [PREFIX/include]
--oldincludedir=DIR C header files for non-gcc [/usr/include]
--datarootdir=DIR read-only arch.-independent data root [PREFIX/share]
--datadir=DIR read-only architecture-independent data [DATAROOTDIR]
--infodir=DIR info documentation [DATAROOTDIR/info]
--localedir=DIR locale-dependent data [DATAROOTDIR/locale]
--mandir=DIR man documentation [DATAROOTDIR/man]
--docdir=DIR documentation root [DATAROOTDIR/doc/cuba]
--htmldir=DIR html documentation [DOCDIR]
--dvidir=DIR dvi documentation [DOCDIR]
--pdfdir=DIR pdf documentation [DOCDIR]
--psdir=DIR ps documentation [DOCDIR]
_ACEOF
cat <<\_ACEOF
_ACEOF
fi
if test -n "$ac_init_help"; then
case $ac_init_help in
short | recursive ) echo "Configuration of Cuba 3.0:";;
esac
cat <<\_ACEOF
Optional Packages:
--with-PACKAGE[=ARG] use PACKAGE [ARG=yes]
--without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no)
--with-maxdim=N the maximum dimension for integration, if
variable-size array are not supported
--with-maxcomp=N the maximum number of components of the integrand,
if variable-size array are not supported
Some influential environment variables:
MCFLAGS MathLink C compiler flags
CC C compiler command
CFLAGS C compiler flags
LDFLAGS linker flags, e.g. -L if you have libraries in a
nonstandard directory
LIBS libraries to pass to the linker, e.g. -l
CPPFLAGS (Objective) C/C++ preprocessor flags, e.g. -I if
you have headers in a nonstandard directory
F77 Fortran 77 compiler command
FFLAGS Fortran 77 compiler flags
Use these variables to override the choices made by `configure' or to help
it to find libraries and programs with nonstandard names/locations.
Report bugs to .
_ACEOF
ac_status=$?
fi
if test "$ac_init_help" = "recursive"; then
# If there are subdirs, report their specific --help.
for ac_dir in : $ac_subdirs_all; do test "x$ac_dir" = x: && continue
test -d "$ac_dir" ||
{ cd "$srcdir" && ac_pwd=`pwd` && srcdir=. && test -d "$ac_dir"; } ||
continue
ac_builddir=.
case "$ac_dir" in
.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;;
*)
ac_dir_suffix=/`$as_echo "$ac_dir" | sed 's|^\.[\\/]||'`
# A ".." for each directory in $ac_dir_suffix.
ac_top_builddir_sub=`$as_echo "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'`
case $ac_top_builddir_sub in
"") ac_top_builddir_sub=. ac_top_build_prefix= ;;
*) ac_top_build_prefix=$ac_top_builddir_sub/ ;;
esac ;;
esac
ac_abs_top_builddir=$ac_pwd
ac_abs_builddir=$ac_pwd$ac_dir_suffix
# for backward compatibility:
ac_top_builddir=$ac_top_build_prefix
case $srcdir in
.) # We are building in place.
ac_srcdir=.
ac_top_srcdir=$ac_top_builddir_sub
ac_abs_top_srcdir=$ac_pwd ;;
[\\/]* | ?:[\\/]* ) # Absolute name.
ac_srcdir=$srcdir$ac_dir_suffix;
ac_top_srcdir=$srcdir
ac_abs_top_srcdir=$srcdir ;;
*) # Relative name.
ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix
ac_top_srcdir=$ac_top_build_prefix$srcdir
ac_abs_top_srcdir=$ac_pwd/$srcdir ;;
esac
ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix
cd "$ac_dir" || { ac_status=$?; continue; }
# Check for guested configure.
if test -f "$ac_srcdir/configure.gnu"; then
echo &&
$SHELL "$ac_srcdir/configure.gnu" --help=recursive
elif test -f "$ac_srcdir/configure"; then
echo &&
$SHELL "$ac_srcdir/configure" --help=recursive
else
$as_echo "$as_me: WARNING: no configuration information is in $ac_dir" >&2
fi || ac_status=$?
cd "$ac_pwd" || { ac_status=$?; break; }
done
fi
test -n "$ac_init_help" && exit $ac_status
if $ac_init_version; then
cat <<\_ACEOF
Cuba configure 3.0
generated by GNU Autoconf 2.68
Copyright (C) 2010 Free Software Foundation, Inc.
This configure script is free software; the Free Software Foundation
gives unlimited permission to copy, distribute and modify it.
_ACEOF
exit
fi
## ------------------------ ##
## Autoconf initialization. ##
## ------------------------ ##
# ac_fn_c_try_compile LINENO
# --------------------------
# Try to compile conftest.$ac_ext, and return whether this succeeded.
ac_fn_c_try_compile ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
rm -f conftest.$ac_objext
if { { ac_try="$ac_compile"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_compile") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
grep -v '^ *+' conftest.err >conftest.er1
cat conftest.er1 >&5
mv -f conftest.er1 conftest.err
fi
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } && {
test -z "$ac_c_werror_flag" ||
test ! -s conftest.err
} && test -s conftest.$ac_objext; then :
ac_retval=0
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=1
fi
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_c_try_compile
# ac_fn_f77_try_compile LINENO
# ----------------------------
# Try to compile conftest.$ac_ext, and return whether this succeeded.
ac_fn_f77_try_compile ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
rm -f conftest.$ac_objext
if { { ac_try="$ac_compile"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_compile") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
grep -v '^ *+' conftest.err >conftest.er1
cat conftest.er1 >&5
mv -f conftest.er1 conftest.err
fi
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } && {
test -z "$ac_f77_werror_flag" ||
test ! -s conftest.err
} && test -s conftest.$ac_objext; then :
ac_retval=0
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=1
fi
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_f77_try_compile
# ac_fn_c_try_link LINENO
# -----------------------
# Try to link conftest.$ac_ext, and return whether this succeeded.
ac_fn_c_try_link ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
rm -f conftest.$ac_objext conftest$ac_exeext
if { { ac_try="$ac_link"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_link") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
grep -v '^ *+' conftest.err >conftest.er1
cat conftest.er1 >&5
mv -f conftest.er1 conftest.err
fi
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; } && {
test -z "$ac_c_werror_flag" ||
test ! -s conftest.err
} && test -s conftest$ac_exeext && {
test "$cross_compiling" = yes ||
$as_test_x conftest$ac_exeext
}; then :
ac_retval=0
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
ac_retval=1
fi
# Delete the IPA/IPO (Inter Procedural Analysis/Optimization) information
# created by the PGI compiler (conftest_ipa8_conftest.oo), as it would
# interfere with the next link command; also delete a directory that is
# left behind by Apple's compiler. We do this before executing the actions.
rm -rf conftest.dSYM conftest_ipa8_conftest.oo
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
as_fn_set_status $ac_retval
} # ac_fn_c_try_link
# ac_fn_c_check_func LINENO FUNC VAR
# ----------------------------------
# Tests whether FUNC exists, setting the cache variable VAR accordingly
ac_fn_c_check_func ()
{
as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5
$as_echo_n "checking for $2... " >&6; }
if eval \${$3+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
/* Define $2 to an innocuous variant, in case declares $2.
For example, HP-UX 11i declares gettimeofday. */
#define $2 innocuous_$2
/* System header to define __stub macros and hopefully few prototypes,
which can conflict with char $2 (); below.
Prefer to if __STDC__ is defined, since
exists even on freestanding compilers. */
#ifdef __STDC__
# include
#else
# include
#endif
#undef $2
/* Override any GCC internal prototype to avoid an error.
Use char because int might match the return type of a GCC
builtin and then its argument prototype would still apply. */
#ifdef __cplusplus
extern "C"
#endif
char $2 ();
/* The GNU C library defines this for functions which it implements
to always fail with ENOSYS. Some functions are actually named
something starting with __ and the normal name is an alias. */
#if defined __stub_$2 || defined __stub___$2
choke me
#endif
int
main ()
{
return $2 ();
;
return 0;
}
_ACEOF
if ac_fn_c_try_link "$LINENO"; then :
eval "$3=yes"
else
eval "$3=no"
fi
rm -f core conftest.err conftest.$ac_objext \
conftest$ac_exeext conftest.$ac_ext
fi
eval ac_res=\$$3
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5
$as_echo "$ac_res" >&6; }
eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno
} # ac_fn_c_check_func
cat >config.log <<_ACEOF
This file contains any messages produced by compilers while
running configure, to aid debugging if configure makes a mistake.
It was created by Cuba $as_me 3.0, which was
generated by GNU Autoconf 2.68. Invocation command line was
$ $0 $@
_ACEOF
exec 5>>config.log
{
cat <<_ASUNAME
## --------- ##
## Platform. ##
## --------- ##
hostname = `(hostname || uname -n) 2>/dev/null | sed 1q`
uname -m = `(uname -m) 2>/dev/null || echo unknown`
uname -r = `(uname -r) 2>/dev/null || echo unknown`
uname -s = `(uname -s) 2>/dev/null || echo unknown`
uname -v = `(uname -v) 2>/dev/null || echo unknown`
/usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null || echo unknown`
/bin/uname -X = `(/bin/uname -X) 2>/dev/null || echo unknown`
/bin/arch = `(/bin/arch) 2>/dev/null || echo unknown`
/usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null || echo unknown`
/usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null || echo unknown`
/usr/bin/hostinfo = `(/usr/bin/hostinfo) 2>/dev/null || echo unknown`
/bin/machine = `(/bin/machine) 2>/dev/null || echo unknown`
/usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null || echo unknown`
/bin/universe = `(/bin/universe) 2>/dev/null || echo unknown`
_ASUNAME
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
$as_echo "PATH: $as_dir"
done
IFS=$as_save_IFS
} >&5
cat >&5 <<_ACEOF
## ----------- ##
## Core tests. ##
## ----------- ##
_ACEOF
# Keep a trace of the command line.
# Strip out --no-create and --no-recursion so they do not pile up.
# Strip out --silent because we don't want to record it for future runs.
# Also quote any args containing shell meta-characters.
# Make two passes to allow for proper duplicate-argument suppression.
ac_configure_args=
ac_configure_args0=
ac_configure_args1=
ac_must_keep_next=false
for ac_pass in 1 2
do
for ac_arg
do
case $ac_arg in
-no-create | --no-c* | -n | -no-recursion | --no-r*) continue ;;
-q | -quiet | --quiet | --quie | --qui | --qu | --q \
| -silent | --silent | --silen | --sile | --sil)
continue ;;
*\'*)
ac_arg=`$as_echo "$ac_arg" | sed "s/'/'\\\\\\\\''/g"` ;;
esac
case $ac_pass in
1) as_fn_append ac_configure_args0 " '$ac_arg'" ;;
2)
as_fn_append ac_configure_args1 " '$ac_arg'"
if test $ac_must_keep_next = true; then
ac_must_keep_next=false # Got value, back to normal.
else
case $ac_arg in
*=* | --config-cache | -C | -disable-* | --disable-* \
| -enable-* | --enable-* | -gas | --g* | -nfp | --nf* \
| -q | -quiet | --q* | -silent | --sil* | -v | -verb* \
| -with-* | --with-* | -without-* | --without-* | --x)
case "$ac_configure_args0 " in
"$ac_configure_args1"*" '$ac_arg' "* ) continue ;;
esac
;;
-* ) ac_must_keep_next=true ;;
esac
fi
as_fn_append ac_configure_args " '$ac_arg'"
;;
esac
done
done
{ ac_configure_args0=; unset ac_configure_args0;}
{ ac_configure_args1=; unset ac_configure_args1;}
# When interrupted or exit'd, cleanup temporary files, and complete
# config.log. We remove comments because anyway the quotes in there
# would cause problems or look ugly.
# WARNING: Use '\'' to represent an apostrophe within the trap.
# WARNING: Do not start the trap code with a newline, due to a FreeBSD 4.0 bug.
trap 'exit_status=$?
# Save into config.log some information that might help in debugging.
{
echo
$as_echo "## ---------------- ##
## Cache variables. ##
## ---------------- ##"
echo
# The following way of writing the cache mishandles newlines in values,
(
for ac_var in `(set) 2>&1 | sed -n '\''s/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'\''`; do
eval ac_val=\$$ac_var
case $ac_val in #(
*${as_nl}*)
case $ac_var in #(
*_cv_*) { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5
$as_echo "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;;
esac
case $ac_var in #(
_ | IFS | as_nl) ;; #(
BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #(
*) { eval $ac_var=; unset $ac_var;} ;;
esac ;;
esac
done
(set) 2>&1 |
case $as_nl`(ac_space='\'' '\''; set) 2>&1` in #(
*${as_nl}ac_space=\ *)
sed -n \
"s/'\''/'\''\\\\'\'''\''/g;
s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\''\\2'\''/p"
;; #(
*)
sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p"
;;
esac |
sort
)
echo
$as_echo "## ----------------- ##
## Output variables. ##
## ----------------- ##"
echo
for ac_var in $ac_subst_vars
do
eval ac_val=\$$ac_var
case $ac_val in
*\'\''*) ac_val=`$as_echo "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;;
esac
$as_echo "$ac_var='\''$ac_val'\''"
done | sort
echo
if test -n "$ac_subst_files"; then
$as_echo "## ------------------- ##
## File substitutions. ##
## ------------------- ##"
echo
for ac_var in $ac_subst_files
do
eval ac_val=\$$ac_var
case $ac_val in
*\'\''*) ac_val=`$as_echo "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;;
esac
$as_echo "$ac_var='\''$ac_val'\''"
done | sort
echo
fi
if test -s confdefs.h; then
$as_echo "## ----------- ##
## confdefs.h. ##
## ----------- ##"
echo
cat confdefs.h
echo
fi
test "$ac_signal" != 0 &&
$as_echo "$as_me: caught signal $ac_signal"
$as_echo "$as_me: exit $exit_status"
} >&5
rm -f core *.core core.conftest.* &&
rm -f -r conftest* confdefs* conf$$* $ac_clean_files &&
exit $exit_status
' 0
for ac_signal in 1 2 13 15; do
trap 'ac_signal='$ac_signal'; as_fn_exit 1' $ac_signal
done
ac_signal=0
# confdefs.h avoids OS command line length limits that DEFS can exceed.
rm -f -r conftest* confdefs.h
$as_echo "/* confdefs.h */" > confdefs.h
# Predefined preprocessor variables.
cat >>confdefs.h <<_ACEOF
#define PACKAGE_NAME "$PACKAGE_NAME"
_ACEOF
cat >>confdefs.h <<_ACEOF
#define PACKAGE_TARNAME "$PACKAGE_TARNAME"
_ACEOF
cat >>confdefs.h <<_ACEOF
#define PACKAGE_VERSION "$PACKAGE_VERSION"
_ACEOF
cat >>confdefs.h <<_ACEOF
#define PACKAGE_STRING "$PACKAGE_STRING"
_ACEOF
cat >>confdefs.h <<_ACEOF
#define PACKAGE_BUGREPORT "$PACKAGE_BUGREPORT"
_ACEOF
cat >>confdefs.h <<_ACEOF
#define PACKAGE_URL "$PACKAGE_URL"
_ACEOF
# Let the site file select an alternate cache file if it wants to.
# Prefer an explicitly selected file to automatically selected ones.
ac_site_file1=NONE
ac_site_file2=NONE
if test -n "$CONFIG_SITE"; then
# We do not want a PATH search for config.site.
case $CONFIG_SITE in #((
-*) ac_site_file1=./$CONFIG_SITE;;
*/*) ac_site_file1=$CONFIG_SITE;;
*) ac_site_file1=./$CONFIG_SITE;;
esac
elif test "x$prefix" != xNONE; then
ac_site_file1=$prefix/share/config.site
ac_site_file2=$prefix/etc/config.site
else
ac_site_file1=$ac_default_prefix/share/config.site
ac_site_file2=$ac_default_prefix/etc/config.site
fi
for ac_site_file in "$ac_site_file1" "$ac_site_file2"
do
test "x$ac_site_file" = xNONE && continue
if test /dev/null != "$ac_site_file" && test -r "$ac_site_file"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: loading site script $ac_site_file" >&5
$as_echo "$as_me: loading site script $ac_site_file" >&6;}
sed 's/^/| /' "$ac_site_file" >&5
. "$ac_site_file" \
|| { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
as_fn_error $? "failed to load site script $ac_site_file
See \`config.log' for more details" "$LINENO" 5; }
fi
done
if test -r "$cache_file"; then
# Some versions of bash will fail to source /dev/null (special files
# actually), so we avoid doing that. DJGPP emulates it as a regular file.
if test /dev/null != "$cache_file" && test -f "$cache_file"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: loading cache $cache_file" >&5
$as_echo "$as_me: loading cache $cache_file" >&6;}
case $cache_file in
[\\/]* | ?:[\\/]* ) . "$cache_file";;
*) . "./$cache_file";;
esac
fi
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: creating cache $cache_file" >&5
$as_echo "$as_me: creating cache $cache_file" >&6;}
>$cache_file
fi
# Check that the precious variables saved in the cache have kept the same
# value.
ac_cache_corrupted=false
for ac_var in $ac_precious_vars; do
eval ac_old_set=\$ac_cv_env_${ac_var}_set
eval ac_new_set=\$ac_env_${ac_var}_set
eval ac_old_val=\$ac_cv_env_${ac_var}_value
eval ac_new_val=\$ac_env_${ac_var}_value
case $ac_old_set,$ac_new_set in
set,)
{ $as_echo "$as_me:${as_lineno-$LINENO}: error: \`$ac_var' was set to \`$ac_old_val' in the previous run" >&5
$as_echo "$as_me: error: \`$ac_var' was set to \`$ac_old_val' in the previous run" >&2;}
ac_cache_corrupted=: ;;
,set)
{ $as_echo "$as_me:${as_lineno-$LINENO}: error: \`$ac_var' was not set in the previous run" >&5
$as_echo "$as_me: error: \`$ac_var' was not set in the previous run" >&2;}
ac_cache_corrupted=: ;;
,);;
*)
if test "x$ac_old_val" != "x$ac_new_val"; then
# differences in whitespace do not lead to failure.
ac_old_val_w=`echo x $ac_old_val`
ac_new_val_w=`echo x $ac_new_val`
if test "$ac_old_val_w" != "$ac_new_val_w"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: error: \`$ac_var' has changed since the previous run:" >&5
$as_echo "$as_me: error: \`$ac_var' has changed since the previous run:" >&2;}
ac_cache_corrupted=:
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: warning: ignoring whitespace changes in \`$ac_var' since the previous run:" >&5
$as_echo "$as_me: warning: ignoring whitespace changes in \`$ac_var' since the previous run:" >&2;}
eval $ac_var=\$ac_old_val
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: former value: \`$ac_old_val'" >&5
$as_echo "$as_me: former value: \`$ac_old_val'" >&2;}
{ $as_echo "$as_me:${as_lineno-$LINENO}: current value: \`$ac_new_val'" >&5
$as_echo "$as_me: current value: \`$ac_new_val'" >&2;}
fi;;
esac
# Pass precious variables to config.status.
if test "$ac_new_set" = set; then
case $ac_new_val in
*\'*) ac_arg=$ac_var=`$as_echo "$ac_new_val" | sed "s/'/'\\\\\\\\''/g"` ;;
*) ac_arg=$ac_var=$ac_new_val ;;
esac
case " $ac_configure_args " in
*" '$ac_arg' "*) ;; # Avoid dups. Use of quotes ensures accuracy.
*) as_fn_append ac_configure_args " '$ac_arg'" ;;
esac
fi
done
if $ac_cache_corrupted; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
{ $as_echo "$as_me:${as_lineno-$LINENO}: error: changes in the environment can compromise the build" >&5
$as_echo "$as_me: error: changes in the environment can compromise the build" >&2;}
as_fn_error $? "run \`make distclean' and/or \`rm $cache_file' and start over" "$LINENO" 5
fi
## -------------------- ##
## Main body of script. ##
## -------------------- ##
ac_ext=c
ac_cpp='$CPP $CPPFLAGS'
ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
ac_compiler_gnu=$ac_cv_c_compiler_gnu
LIBS=-lm
USER_CFLAGS="$CFLAGS"
ac_ext=c
ac_cpp='$CPP $CPPFLAGS'
ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
ac_compiler_gnu=$ac_cv_c_compiler_gnu
if test -n "$ac_tool_prefix"; then
# Extract the first word of "${ac_tool_prefix}gcc", so it can be a program name with args.
set dummy ${ac_tool_prefix}gcc; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_CC+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$CC"; then
ac_cv_prog_CC="$CC" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_CC="${ac_tool_prefix}gcc"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
CC=$ac_cv_prog_CC
if test -n "$CC"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
$as_echo "$CC" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
fi
if test -z "$ac_cv_prog_CC"; then
ac_ct_CC=$CC
# Extract the first word of "gcc", so it can be a program name with args.
set dummy gcc; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_ac_ct_CC+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$ac_ct_CC"; then
ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_ac_ct_CC="gcc"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
ac_ct_CC=$ac_cv_prog_ac_ct_CC
if test -n "$ac_ct_CC"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5
$as_echo "$ac_ct_CC" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
if test "x$ac_ct_CC" = x; then
CC=""
else
case $cross_compiling:$ac_tool_warned in
yes:)
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
ac_tool_warned=yes ;;
esac
CC=$ac_ct_CC
fi
else
CC="$ac_cv_prog_CC"
fi
if test -z "$CC"; then
if test -n "$ac_tool_prefix"; then
# Extract the first word of "${ac_tool_prefix}cc", so it can be a program name with args.
set dummy ${ac_tool_prefix}cc; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_CC+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$CC"; then
ac_cv_prog_CC="$CC" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_CC="${ac_tool_prefix}cc"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
CC=$ac_cv_prog_CC
if test -n "$CC"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
$as_echo "$CC" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
fi
fi
if test -z "$CC"; then
# Extract the first word of "cc", so it can be a program name with args.
set dummy cc; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_CC+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$CC"; then
ac_cv_prog_CC="$CC" # Let the user override the test.
else
ac_prog_rejected=no
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
if test "$as_dir/$ac_word$ac_exec_ext" = "/usr/ucb/cc"; then
ac_prog_rejected=yes
continue
fi
ac_cv_prog_CC="cc"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
if test $ac_prog_rejected = yes; then
# We found a bogon in the path, so make sure we never use it.
set dummy $ac_cv_prog_CC
shift
if test $# != 0; then
# We chose a different compiler from the bogus one.
# However, it has the same basename, so the bogon will be chosen
# first if we set CC to just the basename; use the full file name.
shift
ac_cv_prog_CC="$as_dir/$ac_word${1+' '}$@"
fi
fi
fi
fi
CC=$ac_cv_prog_CC
if test -n "$CC"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
$as_echo "$CC" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
fi
if test -z "$CC"; then
if test -n "$ac_tool_prefix"; then
for ac_prog in cl.exe
do
# Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
set dummy $ac_tool_prefix$ac_prog; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_CC+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$CC"; then
ac_cv_prog_CC="$CC" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_CC="$ac_tool_prefix$ac_prog"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
CC=$ac_cv_prog_CC
if test -n "$CC"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $CC" >&5
$as_echo "$CC" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
test -n "$CC" && break
done
fi
if test -z "$CC"; then
ac_ct_CC=$CC
for ac_prog in cl.exe
do
# Extract the first word of "$ac_prog", so it can be a program name with args.
set dummy $ac_prog; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_ac_ct_CC+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$ac_ct_CC"; then
ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_ac_ct_CC="$ac_prog"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
ac_ct_CC=$ac_cv_prog_ac_ct_CC
if test -n "$ac_ct_CC"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5
$as_echo "$ac_ct_CC" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
test -n "$ac_ct_CC" && break
done
if test "x$ac_ct_CC" = x; then
CC=""
else
case $cross_compiling:$ac_tool_warned in
yes:)
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
ac_tool_warned=yes ;;
esac
CC=$ac_ct_CC
fi
fi
fi
test -z "$CC" && { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
as_fn_error $? "no acceptable C compiler found in \$PATH
See \`config.log' for more details" "$LINENO" 5; }
# Provide some information about the compiler.
$as_echo "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5
set X $ac_compile
ac_compiler=$2
for ac_option in --version -v -V -qversion; do
{ { ac_try="$ac_compiler $ac_option >&5"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_compiler $ac_option >&5") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
sed '10a\
... rest of stderr output deleted ...
10q' conftest.err >conftest.er1
cat conftest.er1 >&5
fi
rm -f conftest.er1 conftest.err
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }
done
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
;
return 0;
}
_ACEOF
ac_clean_files_save=$ac_clean_files
ac_clean_files="$ac_clean_files a.out a.out.dSYM a.exe b.out"
# Try to create an executable without -o first, disregard a.out.
# It will help us diagnose broken compilers, and finding out an intuition
# of exeext.
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the C compiler works" >&5
$as_echo_n "checking whether the C compiler works... " >&6; }
ac_link_default=`$as_echo "$ac_link" | sed 's/ -o *conftest[^ ]*//'`
# The possible output files:
ac_files="a.out conftest.exe conftest a.exe a_out.exe b.out conftest.*"
ac_rmfiles=
for ac_file in $ac_files
do
case $ac_file in
*.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;;
* ) ac_rmfiles="$ac_rmfiles $ac_file";;
esac
done
rm -f $ac_rmfiles
if { { ac_try="$ac_link_default"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_link_default") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }; then :
# Autoconf-2.13 could set the ac_cv_exeext variable to `no'.
# So ignore a value of `no', otherwise this would lead to `EXEEXT = no'
# in a Makefile. We should not override ac_cv_exeext if it was cached,
# so that the user can short-circuit this test for compilers unknown to
# Autoconf.
for ac_file in $ac_files ''
do
test -f "$ac_file" || continue
case $ac_file in
*.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj )
;;
[ab].out )
# We found the default executable, but exeext='' is most
# certainly right.
break;;
*.* )
if test "${ac_cv_exeext+set}" = set && test "$ac_cv_exeext" != no;
then :; else
ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'`
fi
# We set ac_cv_exeext here because the later test for it is not
# safe: cross compilers may not add the suffix if given an `-o'
# argument, so we may need to know it at that point already.
# Even if this section looks crufty: it has the advantage of
# actually working.
break;;
* )
break;;
esac
done
test "$ac_cv_exeext" = no && ac_cv_exeext=
else
ac_file=''
fi
if test -z "$ac_file"; then :
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
{ { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
as_fn_error 77 "C compiler cannot create executables
See \`config.log' for more details" "$LINENO" 5; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
$as_echo "yes" >&6; }
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for C compiler default output file name" >&5
$as_echo_n "checking for C compiler default output file name... " >&6; }
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_file" >&5
$as_echo "$ac_file" >&6; }
ac_exeext=$ac_cv_exeext
rm -f -r a.out a.out.dSYM a.exe conftest$ac_cv_exeext b.out
ac_clean_files=$ac_clean_files_save
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for suffix of executables" >&5
$as_echo_n "checking for suffix of executables... " >&6; }
if { { ac_try="$ac_link"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_link") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }; then :
# If both `conftest.exe' and `conftest' are `present' (well, observable)
# catch `conftest.exe'. For instance with Cygwin, `ls conftest' will
# work properly (i.e., refer to `conftest.exe'), while it won't with
# `rm'.
for ac_file in conftest.exe conftest conftest.*; do
test -f "$ac_file" || continue
case $ac_file in
*.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;;
*.* ) ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'`
break;;
* ) break;;
esac
done
else
{ { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
as_fn_error $? "cannot compute suffix of executables: cannot compile and link
See \`config.log' for more details" "$LINENO" 5; }
fi
rm -f conftest conftest$ac_cv_exeext
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_exeext" >&5
$as_echo "$ac_cv_exeext" >&6; }
rm -f conftest.$ac_ext
EXEEXT=$ac_cv_exeext
ac_exeext=$EXEEXT
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
#include
int
main ()
{
FILE *f = fopen ("conftest.out", "w");
return ferror (f) || fclose (f) != 0;
;
return 0;
}
_ACEOF
ac_clean_files="$ac_clean_files conftest.out"
# Check that the compiler produces executables we can run. If not, either
# the compiler is broken, or we cross compile.
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are cross compiling" >&5
$as_echo_n "checking whether we are cross compiling... " >&6; }
if test "$cross_compiling" != yes; then
{ { ac_try="$ac_link"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_link") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }
if { ac_try='./conftest$ac_cv_exeext'
{ { case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_try") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }; }; then
cross_compiling=no
else
if test "$cross_compiling" = maybe; then
cross_compiling=yes
else
{ { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
as_fn_error $? "cannot run C compiled programs.
If you meant to cross compile, use \`--host'.
See \`config.log' for more details" "$LINENO" 5; }
fi
fi
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $cross_compiling" >&5
$as_echo "$cross_compiling" >&6; }
rm -f conftest.$ac_ext conftest$ac_cv_exeext conftest.out
ac_clean_files=$ac_clean_files_save
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for suffix of object files" >&5
$as_echo_n "checking for suffix of object files... " >&6; }
if ${ac_cv_objext+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
;
return 0;
}
_ACEOF
rm -f conftest.o conftest.obj
if { { ac_try="$ac_compile"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_compile") 2>&5
ac_status=$?
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }; then :
for ac_file in conftest.o conftest.obj conftest.*; do
test -f "$ac_file" || continue;
case $ac_file in
*.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM ) ;;
*) ac_cv_objext=`expr "$ac_file" : '.*\.\(.*\)'`
break;;
esac
done
else
$as_echo "$as_me: failed program was:" >&5
sed 's/^/| /' conftest.$ac_ext >&5
{ { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
$as_echo "$as_me: error: in \`$ac_pwd':" >&2;}
as_fn_error $? "cannot compute suffix of object files: cannot compile
See \`config.log' for more details" "$LINENO" 5; }
fi
rm -f conftest.$ac_cv_objext conftest.$ac_ext
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_objext" >&5
$as_echo "$ac_cv_objext" >&6; }
OBJEXT=$ac_cv_objext
ac_objext=$OBJEXT
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using the GNU C compiler" >&5
$as_echo_n "checking whether we are using the GNU C compiler... " >&6; }
if ${ac_cv_c_compiler_gnu+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
#ifndef __GNUC__
choke me
#endif
;
return 0;
}
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
ac_compiler_gnu=yes
else
ac_compiler_gnu=no
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
ac_cv_c_compiler_gnu=$ac_compiler_gnu
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_compiler_gnu" >&5
$as_echo "$ac_cv_c_compiler_gnu" >&6; }
if test $ac_compiler_gnu = yes; then
GCC=yes
else
GCC=
fi
ac_test_CFLAGS=${CFLAGS+set}
ac_save_CFLAGS=$CFLAGS
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5
$as_echo_n "checking whether $CC accepts -g... " >&6; }
if ${ac_cv_prog_cc_g+:} false; then :
$as_echo_n "(cached) " >&6
else
ac_save_c_werror_flag=$ac_c_werror_flag
ac_c_werror_flag=yes
ac_cv_prog_cc_g=no
CFLAGS="-g"
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
;
return 0;
}
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
ac_cv_prog_cc_g=yes
else
CFLAGS=""
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
;
return 0;
}
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
else
ac_c_werror_flag=$ac_save_c_werror_flag
CFLAGS="-g"
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
;
return 0;
}
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
ac_cv_prog_cc_g=yes
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
ac_c_werror_flag=$ac_save_c_werror_flag
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_g" >&5
$as_echo "$ac_cv_prog_cc_g" >&6; }
if test "$ac_test_CFLAGS" = set; then
CFLAGS=$ac_save_CFLAGS
elif test $ac_cv_prog_cc_g = yes; then
if test "$GCC" = yes; then
CFLAGS="-g -O2"
else
CFLAGS="-g"
fi
else
if test "$GCC" = yes; then
CFLAGS="-O2"
else
CFLAGS=
fi
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $CC option to accept ISO C89" >&5
$as_echo_n "checking for $CC option to accept ISO C89... " >&6; }
if ${ac_cv_prog_cc_c89+:} false; then :
$as_echo_n "(cached) " >&6
else
ac_cv_prog_cc_c89=no
ac_save_CC=$CC
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
#include
#include
#include
#include
/* Most of the following tests are stolen from RCS 5.7's src/conf.sh. */
struct buf { int x; };
FILE * (*rcsopen) (struct buf *, struct stat *, int);
static char *e (p, i)
char **p;
int i;
{
return p[i];
}
static char *f (char * (*g) (char **, int), char **p, ...)
{
char *s;
va_list v;
va_start (v,p);
s = g (p, va_arg (v,int));
va_end (v);
return s;
}
/* OSF 4.0 Compaq cc is some sort of almost-ANSI by default. It has
function prototypes and stuff, but not '\xHH' hex character constants.
These don't provoke an error unfortunately, instead are silently treated
as 'x'. The following induces an error, until -std is added to get
proper ANSI mode. Curiously '\x00'!='x' always comes out true, for an
array size at least. It's necessary to write '\x00'==0 to get something
that's true only with -std. */
int osf4_cc_array ['\x00' == 0 ? 1 : -1];
/* IBM C 6 for AIX is almost-ANSI by default, but it replaces macro parameters
inside strings and character constants. */
#define FOO(x) 'x'
int xlc6_cc_array[FOO(a) == 'x' ? 1 : -1];
int test (int i, double x);
struct s1 {int (*f) (int a);};
struct s2 {int (*f) (double a);};
int pairnames (int, char **, FILE *(*)(struct buf *, struct stat *, int), int, int);
int argc;
char **argv;
int
main ()
{
return f (e, argv, 0) != argv[0] || f (e, argv, 1) != argv[1];
;
return 0;
}
_ACEOF
for ac_arg in '' -qlanglvl=extc89 -qlanglvl=ansi -std \
-Ae "-Aa -D_HPUX_SOURCE" "-Xc -D__EXTENSIONS__"
do
CC="$ac_save_CC $ac_arg"
if ac_fn_c_try_compile "$LINENO"; then :
ac_cv_prog_cc_c89=$ac_arg
fi
rm -f core conftest.err conftest.$ac_objext
test "x$ac_cv_prog_cc_c89" != "xno" && break
done
rm -f conftest.$ac_ext
CC=$ac_save_CC
fi
# AC_CACHE_VAL
case "x$ac_cv_prog_cc_c89" in
x)
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: none needed" >&5
$as_echo "none needed" >&6; } ;;
xno)
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5
$as_echo "unsupported" >&6; } ;;
*)
CC="$CC $ac_cv_prog_cc_c89"
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c89" >&5
$as_echo "$ac_cv_prog_cc_c89" >&6; } ;;
esac
if test "x$ac_cv_prog_cc_c89" != xno; then :
fi
ac_ext=c
ac_cpp='$CPP $CPPFLAGS'
ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
ac_compiler_gnu=$ac_cv_c_compiler_gnu
ac_ext=f
ac_compile='$F77 -c $FFLAGS conftest.$ac_ext >&5'
ac_link='$F77 -o conftest$ac_exeext $FFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
ac_compiler_gnu=$ac_cv_f77_compiler_gnu
if test -n "$ac_tool_prefix"; then
for ac_prog in g77 xlf f77 frt pgf77 cf77 fort77 fl32 af77 xlf90 f90 pgf90 pghpf epcf90 gfortran g95 xlf95 f95 fort ifort ifc efc pgfortran pgf95 lf95 ftn
do
# Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args.
set dummy $ac_tool_prefix$ac_prog; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_F77+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$F77"; then
ac_cv_prog_F77="$F77" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_F77="$ac_tool_prefix$ac_prog"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
F77=$ac_cv_prog_F77
if test -n "$F77"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $F77" >&5
$as_echo "$F77" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
test -n "$F77" && break
done
fi
if test -z "$F77"; then
ac_ct_F77=$F77
for ac_prog in g77 xlf f77 frt pgf77 cf77 fort77 fl32 af77 xlf90 f90 pgf90 pghpf epcf90 gfortran g95 xlf95 f95 fort ifort ifc efc pgfortran pgf95 lf95 ftn
do
# Extract the first word of "$ac_prog", so it can be a program name with args.
set dummy $ac_prog; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_ac_ct_F77+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$ac_ct_F77"; then
ac_cv_prog_ac_ct_F77="$ac_ct_F77" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_ac_ct_F77="$ac_prog"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
ac_ct_F77=$ac_cv_prog_ac_ct_F77
if test -n "$ac_ct_F77"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_F77" >&5
$as_echo "$ac_ct_F77" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
test -n "$ac_ct_F77" && break
done
if test "x$ac_ct_F77" = x; then
F77=""
else
case $cross_compiling:$ac_tool_warned in
yes:)
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
ac_tool_warned=yes ;;
esac
F77=$ac_ct_F77
fi
fi
# Provide some information about the compiler.
$as_echo "$as_me:${as_lineno-$LINENO}: checking for Fortran 77 compiler version" >&5
set X $ac_compile
ac_compiler=$2
for ac_option in --version -v -V -qversion; do
{ { ac_try="$ac_compiler $ac_option >&5"
case "(($ac_try" in
*\"* | *\`* | *\\*) ac_try_echo=\$ac_try;;
*) ac_try_echo=$ac_try;;
esac
eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\""
$as_echo "$ac_try_echo"; } >&5
(eval "$ac_compiler $ac_option >&5") 2>conftest.err
ac_status=$?
if test -s conftest.err; then
sed '10a\
... rest of stderr output deleted ...
10q' conftest.err >conftest.er1
cat conftest.er1 >&5
fi
rm -f conftest.er1 conftest.err
$as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5
test $ac_status = 0; }
done
rm -f a.out
# If we don't use `.F' as extension, the preprocessor is not run on the
# input file. (Note that this only needs to work for GNU compilers.)
ac_save_ext=$ac_ext
ac_ext=F
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using the GNU Fortran 77 compiler" >&5
$as_echo_n "checking whether we are using the GNU Fortran 77 compiler... " >&6; }
if ${ac_cv_f77_compiler_gnu+:} false; then :
$as_echo_n "(cached) " >&6
else
cat > conftest.$ac_ext <<_ACEOF
program main
#ifndef __GNUC__
choke me
#endif
end
_ACEOF
if ac_fn_f77_try_compile "$LINENO"; then :
ac_compiler_gnu=yes
else
ac_compiler_gnu=no
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
ac_cv_f77_compiler_gnu=$ac_compiler_gnu
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_f77_compiler_gnu" >&5
$as_echo "$ac_cv_f77_compiler_gnu" >&6; }
ac_ext=$ac_save_ext
ac_test_FFLAGS=${FFLAGS+set}
ac_save_FFLAGS=$FFLAGS
FFLAGS=
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $F77 accepts -g" >&5
$as_echo_n "checking whether $F77 accepts -g... " >&6; }
if ${ac_cv_prog_f77_g+:} false; then :
$as_echo_n "(cached) " >&6
else
FFLAGS=-g
cat > conftest.$ac_ext <<_ACEOF
program main
end
_ACEOF
if ac_fn_f77_try_compile "$LINENO"; then :
ac_cv_prog_f77_g=yes
else
ac_cv_prog_f77_g=no
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_f77_g" >&5
$as_echo "$ac_cv_prog_f77_g" >&6; }
if test "$ac_test_FFLAGS" = set; then
FFLAGS=$ac_save_FFLAGS
elif test $ac_cv_prog_f77_g = yes; then
if test "x$ac_cv_f77_compiler_gnu" = xyes; then
FFLAGS="-g -O2"
else
FFLAGS="-g"
fi
else
if test "x$ac_cv_f77_compiler_gnu" = xyes; then
FFLAGS="-O2"
else
FFLAGS=
fi
fi
if test $ac_compiler_gnu = yes; then
G77=yes
else
G77=
fi
ac_ext=c
ac_cpp='$CPP $CPPFLAGS'
ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5'
ac_compiler_gnu=$ac_cv_c_compiler_gnu
if test -n "$ac_tool_prefix"; then
# Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args.
set dummy ${ac_tool_prefix}ranlib; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_RANLIB+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$RANLIB"; then
ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
RANLIB=$ac_cv_prog_RANLIB
if test -n "$RANLIB"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5
$as_echo "$RANLIB" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
fi
if test -z "$ac_cv_prog_RANLIB"; then
ac_ct_RANLIB=$RANLIB
# Extract the first word of "ranlib", so it can be a program name with args.
set dummy ranlib; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_ac_ct_RANLIB+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$ac_ct_RANLIB"; then
ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_ac_ct_RANLIB="ranlib"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB
if test -n "$ac_ct_RANLIB"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5
$as_echo "$ac_ct_RANLIB" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
if test "x$ac_ct_RANLIB" = x; then
RANLIB=":"
else
case $cross_compiling:$ac_tool_warned in
yes:)
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5
$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;}
ac_tool_warned=yes ;;
esac
RANLIB=$ac_ct_RANLIB
fi
else
RANLIB="$ac_cv_prog_RANLIB"
fi
ac_aux_dir=
for ac_dir in "$srcdir" "$srcdir/.." "$srcdir/../.."; do
if test -f "$ac_dir/install-sh"; then
ac_aux_dir=$ac_dir
ac_install_sh="$ac_aux_dir/install-sh -c"
break
elif test -f "$ac_dir/install.sh"; then
ac_aux_dir=$ac_dir
ac_install_sh="$ac_aux_dir/install.sh -c"
break
elif test -f "$ac_dir/shtool"; then
ac_aux_dir=$ac_dir
ac_install_sh="$ac_aux_dir/shtool install -c"
break
fi
done
if test -z "$ac_aux_dir"; then
as_fn_error $? "cannot find install-sh, install.sh, or shtool in \"$srcdir\" \"$srcdir/..\" \"$srcdir/../..\"" "$LINENO" 5
fi
# These three variables are undocumented and unsupported,
# and are intended to be withdrawn in a future Autoconf release.
# They can cause serious problems if a builder's source tree is in a directory
# whose full name contains unusual characters.
ac_config_guess="$SHELL $ac_aux_dir/config.guess" # Please don't use this var.
ac_config_sub="$SHELL $ac_aux_dir/config.sub" # Please don't use this var.
ac_configure="$SHELL $ac_aux_dir/configure" # Please don't use this var.
# Find a good install program. We prefer a C program (faster),
# so one script is as good as another. But avoid the broken or
# incompatible versions:
# SysV /etc/install, /usr/sbin/install
# SunOS /usr/etc/install
# IRIX /sbin/install
# AIX /bin/install
# AmigaOS /C/install, which installs bootblocks on floppy discs
# AIX 4 /usr/bin/installbsd, which doesn't work without a -g flag
# AFS /usr/afsws/bin/install, which mishandles nonexistent args
# SVR4 /usr/ucb/install, which tries to use the nonexistent group "staff"
# OS/2's system install, which has a completely different semantic
# ./install, which can be erroneously created by make from ./install.sh.
# Reject install programs that cannot install multiple files.
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for a BSD-compatible install" >&5
$as_echo_n "checking for a BSD-compatible install... " >&6; }
if test -z "$INSTALL"; then
if ${ac_cv_path_install+:} false; then :
$as_echo_n "(cached) " >&6
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
# Account for people who put trailing slashes in PATH elements.
case $as_dir/ in #((
./ | .// | /[cC]/* | \
/etc/* | /usr/sbin/* | /usr/etc/* | /sbin/* | /usr/afsws/bin/* | \
?:[\\/]os2[\\/]install[\\/]* | ?:[\\/]OS2[\\/]INSTALL[\\/]* | \
/usr/ucb/* ) ;;
*)
# OSF1 and SCO ODT 3.0 have their own names for install.
# Don't use installbsd from OSF since it installs stuff as root
# by default.
for ac_prog in ginstall scoinst install; do
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_prog$ac_exec_ext" && $as_test_x "$as_dir/$ac_prog$ac_exec_ext"; }; then
if test $ac_prog = install &&
grep dspmsg "$as_dir/$ac_prog$ac_exec_ext" >/dev/null 2>&1; then
# AIX install. It has an incompatible calling convention.
:
elif test $ac_prog = install &&
grep pwplus "$as_dir/$ac_prog$ac_exec_ext" >/dev/null 2>&1; then
# program-specific install script used by HP pwplus--don't use.
:
else
rm -rf conftest.one conftest.two conftest.dir
echo one > conftest.one
echo two > conftest.two
mkdir conftest.dir
if "$as_dir/$ac_prog$ac_exec_ext" -c conftest.one conftest.two "`pwd`/conftest.dir" &&
test -s conftest.one && test -s conftest.two &&
test -s conftest.dir/conftest.one &&
test -s conftest.dir/conftest.two
then
ac_cv_path_install="$as_dir/$ac_prog$ac_exec_ext -c"
break 3
fi
fi
fi
done
done
;;
esac
done
IFS=$as_save_IFS
rm -rf conftest.one conftest.two conftest.dir
fi
if test "${ac_cv_path_install+set}" = set; then
INSTALL=$ac_cv_path_install
else
# As a last resort, use the slow shell script. Don't cache a
# value for INSTALL within a source directory, because that will
# break other packages using the cache if that directory is
# removed, or if the value is a relative name.
INSTALL=$ac_install_sh
fi
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $INSTALL" >&5
$as_echo "$INSTALL" >&6; }
# Use test -z because SunOS4 sh mishandles braces in ${var-val}.
# It thinks the first close brace ends the variable substitution.
test -z "$INSTALL_PROGRAM" && INSTALL_PROGRAM='${INSTALL}'
test -z "$INSTALL_SCRIPT" && INSTALL_SCRIPT='${INSTALL}'
test -z "$INSTALL_DATA" && INSTALL_DATA='${INSTALL} -m 644'
if test "$GCC" = yes; then :
case `$CC --version 2>&1 < /dev/null` in #(
*LLVM*) :
opt=-O3 ;; #(
*gcc*4.2* | *gcc*4.4.3*) :
opt=-O0 ;; #(
*) :
opt=-O3 ;;
esac
CFLAGS=${USER_CFLAGS:-$opt -fomit-frame-pointer -ffast-math}
else
CFLAGS=${USER_CFLAGS:--O}
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for an ANSI C-conforming const" >&5
$as_echo_n "checking for an ANSI C-conforming const... " >&6; }
if ${ac_cv_c_const+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
int
main ()
{
/* FIXME: Include the comments suggested by Paul. */
#ifndef __cplusplus
/* Ultrix mips cc rejects this. */
typedef int charset[2];
const charset cs;
/* SunOS 4.1.1 cc rejects this. */
char const *const *pcpcc;
char **ppc;
/* NEC SVR4.0.2 mips cc rejects this. */
struct point {int x, y;};
static struct point const zero = {0,0};
/* AIX XL C 1.02.0.0 rejects this.
It does not let you subtract one const X* pointer from another in
an arm of an if-expression whose if-part is not a constant
expression */
const char *g = "string";
pcpcc = &g + (g ? g-g : 0);
/* HPUX 7.0 cc rejects these. */
++pcpcc;
ppc = (char**) pcpcc;
pcpcc = (char const *const *) ppc;
{ /* SCO 3.2v4 cc rejects this. */
char *t;
char const *s = 0 ? (char *) 0 : (char const *) 0;
*t++ = 0;
if (s) return 0;
}
{ /* Someone thinks the Sun supposedly-ANSI compiler will reject this. */
int x[] = {25, 17};
const int *foo = &x[0];
++foo;
}
{ /* Sun SC1.0 ANSI compiler rejects this -- but not the above. */
typedef const int *iptr;
iptr p = 0;
++p;
}
{ /* AIX XL C 1.02.0.0 rejects this saying
"k.c", line 2.27: 1506-025 (S) Operand must be a modifiable lvalue. */
struct s { int j; const int *ap[3]; };
struct s *b; b->j = 5;
}
{ /* ULTRIX-32 V3.1 (Rev 9) vcc rejects this */
const int foo = 10;
if (!foo) return 0;
}
return !cs[0] && !zero.x;
#endif
;
return 0;
}
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
ac_cv_c_const=yes
else
ac_cv_c_const=no
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_const" >&5
$as_echo "$ac_cv_c_const" >&6; }
if test $ac_cv_c_const = no; then
$as_echo "#define const /**/" >>confdefs.h
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for inline" >&5
$as_echo_n "checking for inline... " >&6; }
if ${ac_cv_c_inline+:} false; then :
$as_echo_n "(cached) " >&6
else
ac_cv_c_inline=no
for ac_kw in inline __inline__ __inline; do
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
#ifndef __cplusplus
typedef int foo_t;
static $ac_kw foo_t static_foo () {return 0; }
$ac_kw foo_t foo () {return 0; }
#endif
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
ac_cv_c_inline=$ac_kw
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
test "$ac_cv_c_inline" != no && break
done
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_inline" >&5
$as_echo "$ac_cv_c_inline" >&6; }
case $ac_cv_c_inline in
inline | yes) ;;
*)
case $ac_cv_c_inline in
no) ac_val=;;
*) ac_val=$ac_cv_c_inline;;
esac
cat >>confdefs.h <<_ACEOF
#ifndef __cplusplus
#define inline $ac_val
#endif
_ACEOF
;;
esac
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for long double with more range or precision than double" >&5
$as_echo_n "checking for long double with more range or precision than double... " >&6; }
if ${ac_cv_type_long_double_wider+:} false; then :
$as_echo_n "(cached) " >&6
else
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
#include
long double const a[] =
{
0.0L, DBL_MIN, DBL_MAX, DBL_EPSILON,
LDBL_MIN, LDBL_MAX, LDBL_EPSILON
};
long double
f (long double x)
{
return ((x + (unsigned long int) 10) * (-1 / x) + a[0]
+ (x ? f (x) : 'c'));
}
int
main ()
{
static int test_array [1 - 2 * !((0 < ((DBL_MAX_EXP < LDBL_MAX_EXP)
+ (DBL_MANT_DIG < LDBL_MANT_DIG)
- (LDBL_MAX_EXP < DBL_MAX_EXP)
- (LDBL_MANT_DIG < DBL_MANT_DIG)))
&& (int) LDBL_EPSILON == 0
)];
test_array [0] = 0
;
return 0;
}
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
ac_cv_type_long_double_wider=yes
else
ac_cv_type_long_double_wider=no
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_type_long_double_wider" >&5
$as_echo "$ac_cv_type_long_double_wider" >&6; }
if test $ac_cv_type_long_double_wider = yes; then
$as_echo "#define HAVE_LONG_DOUBLE_WIDER 1" >>confdefs.h
fi
ac_cv_c_long_double=$ac_cv_type_long_double_wider
if test $ac_cv_c_long_double = yes; then
$as_echo "#define HAVE_LONG_DOUBLE 1" >>confdefs.h
fi
for ac_func in powl
do :
ac_fn_c_check_func "$LINENO" "powl" "ac_cv_func_powl"
if test "x$ac_cv_func_powl" = xyes; then :
cat >>confdefs.h <<_ACEOF
#define HAVE_POWL 1
_ACEOF
fi
done
for ac_func in erf
do :
ac_fn_c_check_func "$LINENO" "erf" "ac_cv_func_erf"
if test "x$ac_cv_func_erf" = xyes; then :
cat >>confdefs.h <<_ACEOF
#define HAVE_ERF 1
_ACEOF
fi
done
for ac_func in getloadavg
do :
ac_fn_c_check_func "$LINENO" "getloadavg" "ac_cv_func_getloadavg"
if test "x$ac_cv_func_getloadavg" = xyes; then :
cat >>confdefs.h <<_ACEOF
#define HAVE_GETLOADAVG 1
_ACEOF
fi
done
MAXDIM=${MAXDIM:-16}
# Check whether --with-maxdim was given.
if test "${with_maxdim+set}" = set; then :
withval=$with_maxdim; MAXDIM=$withval
fi
MAXCOMP=${MAXCOMP:-4}
# Check whether --with-maxcomp was given.
if test "${with_maxcomp+set}" = set; then :
withval=$with_maxcomp; MAXCOMP=$withval
fi
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for variable-size arrays" >&5
$as_echo_n "checking for variable-size arrays... " >&6; }
cat confdefs.h - <<_ACEOF >conftest.$ac_ext
/* end confdefs.h. */
_ACEOF
if ac_fn_c_try_compile "$LINENO"; then :
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
$as_echo "yes" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no, using MAXDIM=$MAXDIM and MAXCOMP=$MAXCOMP" >&5
$as_echo "no, using MAXDIM=$MAXDIM and MAXCOMP=$MAXCOMP" >&6; }
cat >>confdefs.h <<_ACEOF
#define NDIM $MAXDIM
_ACEOF
cat >>confdefs.h <<_ACEOF
#define NCOMP $MAXCOMP
_ACEOF
fi
rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for MathLink" >&5
$as_echo_n "checking for MathLink... " >&6; }
cat > conftest.tm << _EOF_
:Begin:
:Function: inc
:Pattern: Inci_Integer
:Arguments: {i}
:ArgumentTypes: {Integer}
:ReturnType: Integer
:End:
#include "mathlink.h"
static int inc(const int i) { return i + 1; }
int main(int argc, char **argv) {
return MLMain(argc, argv);
}
_EOF_
FCC="$srcdir/tools/fcc"
rm -f conftest$EXEEXT
REALCC="$CC" CC="$FCC" CXX="$FCC" PATH="$PATH:$srcdir/tools" \
mcc $MCFLAGS $CFLAGS -o conftest$EXEEXT conftest.tm > /dev/null 2>&1
if test -x conftest$EXEEXT; then :
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5
$as_echo "yes" >&6; }
MATH_DEFAULT=math
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
for ac_prog in qmake
do
# Extract the first word of "$ac_prog", so it can be a program name with args.
set dummy $ac_prog; ac_word=$2
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
$as_echo_n "checking for $ac_word... " >&6; }
if ${ac_cv_prog_HAVE_QMAKE+:} false; then :
$as_echo_n "(cached) " >&6
else
if test -n "$HAVE_QMAKE"; then
ac_cv_prog_HAVE_QMAKE="$HAVE_QMAKE" # Let the user override the test.
else
as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
for ac_exec_ext in '' $ac_executable_extensions; do
if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then
ac_cv_prog_HAVE_QMAKE="$ac_prog"
$as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5
break 2
fi
done
done
IFS=$as_save_IFS
fi
fi
HAVE_QMAKE=$ac_cv_prog_HAVE_QMAKE
if test -n "$HAVE_QMAKE"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $HAVE_QMAKE" >&5
$as_echo "$HAVE_QMAKE" >&6; }
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
$as_echo "no" >&6; }
fi
test -n "$HAVE_QMAKE" && break
done
test -n "$HAVE_QMAKE" && TOOLS_DEFAULT=tools
test -n "$F77" && DEMO_FORTRAN_DEFAULT=demo-fortran
ac_config_headers="$ac_config_headers config.h"
ac_config_files="$ac_config_files makefile"
cat >confcache <<\_ACEOF
# This file is a shell script that caches the results of configure
# tests run on this system so they can be shared between configure
# scripts and configure runs, see configure's option --config-cache.
# It is not useful on other systems. If it contains results you don't
# want to keep, you may remove or edit it.
#
# config.status only pays attention to the cache file if you give it
# the --recheck option to rerun configure.
#
# `ac_cv_env_foo' variables (set or unset) will be overridden when
# loading this file, other *unset* `ac_cv_foo' will be assigned the
# following values.
_ACEOF
# The following way of writing the cache mishandles newlines in values,
# but we know of no workaround that is simple, portable, and efficient.
# So, we kill variables containing newlines.
# Ultrix sh set writes to stderr and can't be redirected directly,
# and sets the high bit in the cache file unless we assign to the vars.
(
for ac_var in `(set) 2>&1 | sed -n 's/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'`; do
eval ac_val=\$$ac_var
case $ac_val in #(
*${as_nl}*)
case $ac_var in #(
*_cv_*) { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5
$as_echo "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;;
esac
case $ac_var in #(
_ | IFS | as_nl) ;; #(
BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #(
*) { eval $ac_var=; unset $ac_var;} ;;
esac ;;
esac
done
(set) 2>&1 |
case $as_nl`(ac_space=' '; set) 2>&1` in #(
*${as_nl}ac_space=\ *)
# `set' does not quote correctly, so add quotes: double-quote
# substitution turns \\\\ into \\, and sed turns \\ into \.
sed -n \
"s/'/'\\\\''/g;
s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\\2'/p"
;; #(
*)
# `set' quotes correctly as required by POSIX, so do not add quotes.
sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p"
;;
esac |
sort
) |
sed '
/^ac_cv_env_/b end
t clear
:clear
s/^\([^=]*\)=\(.*[{}].*\)$/test "${\1+set}" = set || &/
t end
s/^\([^=]*\)=\(.*\)$/\1=${\1=\2}/
:end' >>confcache
if diff "$cache_file" confcache >/dev/null 2>&1; then :; else
if test -w "$cache_file"; then
if test "x$cache_file" != "x/dev/null"; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: updating cache $cache_file" >&5
$as_echo "$as_me: updating cache $cache_file" >&6;}
if test ! -f "$cache_file" || test -h "$cache_file"; then
cat confcache >"$cache_file"
else
case $cache_file in #(
*/* | ?:*)
mv -f confcache "$cache_file"$$ &&
mv -f "$cache_file"$$ "$cache_file" ;; #(
*)
mv -f confcache "$cache_file" ;;
esac
fi
fi
else
{ $as_echo "$as_me:${as_lineno-$LINENO}: not updating unwritable cache $cache_file" >&5
$as_echo "$as_me: not updating unwritable cache $cache_file" >&6;}
fi
fi
rm -f confcache
test "x$prefix" = xNONE && prefix=$ac_default_prefix
# Let make expand exec_prefix.
test "x$exec_prefix" = xNONE && exec_prefix='${prefix}'
DEFS=-DHAVE_CONFIG_H
ac_libobjs=
ac_ltlibobjs=
U=
for ac_i in : $LIBOBJS; do test "x$ac_i" = x: && continue
# 1. Remove the extension, and $U if already installed.
ac_script='s/\$U\././;s/\.o$//;s/\.obj$//'
ac_i=`$as_echo "$ac_i" | sed "$ac_script"`
# 2. Prepend LIBOBJDIR. When used with automake>=1.10 LIBOBJDIR
# will be set to the directory where LIBOBJS objects are built.
as_fn_append ac_libobjs " \${LIBOBJDIR}$ac_i\$U.$ac_objext"
as_fn_append ac_ltlibobjs " \${LIBOBJDIR}$ac_i"'$U.lo'
done
LIBOBJS=$ac_libobjs
LTLIBOBJS=$ac_ltlibobjs
: "${CONFIG_STATUS=./config.status}"
ac_write_fail=0
ac_clean_files_save=$ac_clean_files
ac_clean_files="$ac_clean_files $CONFIG_STATUS"
{ $as_echo "$as_me:${as_lineno-$LINENO}: creating $CONFIG_STATUS" >&5
$as_echo "$as_me: creating $CONFIG_STATUS" >&6;}
as_write_fail=0
cat >$CONFIG_STATUS <<_ASEOF || as_write_fail=1
#! $SHELL
# Generated by $as_me.
# Run this file to recreate the current configuration.
# Compiler output produced by configure, useful for debugging
# configure, is in config.log if it exists.
debug=false
ac_cs_recheck=false
ac_cs_silent=false
SHELL=\${CONFIG_SHELL-$SHELL}
export SHELL
_ASEOF
cat >>$CONFIG_STATUS <<\_ASEOF || as_write_fail=1
## -------------------- ##
## M4sh Initialization. ##
## -------------------- ##
# Be more Bourne compatible
DUALCASE=1; export DUALCASE # for MKS sh
if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
emulate sh
NULLCMD=:
# Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
# is contrary to our usage. Disable this feature.
alias -g '${1+"$@"}'='"$@"'
setopt NO_GLOB_SUBST
else
case `(set -o) 2>/dev/null` in #(
*posix*) :
set -o posix ;; #(
*) :
;;
esac
fi
as_nl='
'
export as_nl
# Printing a long string crashes Solaris 7 /usr/bin/printf.
as_echo='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo
as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo$as_echo
# Prefer a ksh shell builtin over an external printf program on Solaris,
# but without wasting forks for bash or zsh.
if test -z "$BASH_VERSION$ZSH_VERSION" \
&& (test "X`print -r -- $as_echo`" = "X$as_echo") 2>/dev/null; then
as_echo='print -r --'
as_echo_n='print -rn --'
elif (test "X`printf %s $as_echo`" = "X$as_echo") 2>/dev/null; then
as_echo='printf %s\n'
as_echo_n='printf %s'
else
if test "X`(/usr/ucb/echo -n -n $as_echo) 2>/dev/null`" = "X-n $as_echo"; then
as_echo_body='eval /usr/ucb/echo -n "$1$as_nl"'
as_echo_n='/usr/ucb/echo -n'
else
as_echo_body='eval expr "X$1" : "X\\(.*\\)"'
as_echo_n_body='eval
arg=$1;
case $arg in #(
*"$as_nl"*)
expr "X$arg" : "X\\(.*\\)$as_nl";
arg=`expr "X$arg" : ".*$as_nl\\(.*\\)"`;;
esac;
expr "X$arg" : "X\\(.*\\)" | tr -d "$as_nl"
'
export as_echo_n_body
as_echo_n='sh -c $as_echo_n_body as_echo'
fi
export as_echo_body
as_echo='sh -c $as_echo_body as_echo'
fi
# The user is always right.
if test "${PATH_SEPARATOR+set}" != set; then
PATH_SEPARATOR=:
(PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
(PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
PATH_SEPARATOR=';'
}
fi
# IFS
# We need space, tab and new line, in precisely that order. Quoting is
# there to prevent editors from complaining about space-tab.
# (If _AS_PATH_WALK were called with IFS unset, it would disable word
# splitting by setting IFS to empty value.)
IFS=" "" $as_nl"
# Find who we are. Look in the path if we contain no directory separator.
as_myself=
case $0 in #((
*[\\/]* ) as_myself=$0 ;;
*) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
for as_dir in $PATH
do
IFS=$as_save_IFS
test -z "$as_dir" && as_dir=.
test -r "$as_dir/$0" && as_myself=$as_dir/$0 && break
done
IFS=$as_save_IFS
;;
esac
# We did not find ourselves, most probably we were run as `sh COMMAND'
# in which case we are not to be found in the path.
if test "x$as_myself" = x; then
as_myself=$0
fi
if test ! -f "$as_myself"; then
$as_echo "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
exit 1
fi
# Unset variables that we do not need and which cause bugs (e.g. in
# pre-3.0 UWIN ksh). But do not cause bugs in bash 2.01; the "|| exit 1"
# suppresses any "Segmentation fault" message there. '((' could
# trigger a bug in pdksh 5.2.14.
for as_var in BASH_ENV ENV MAIL MAILPATH
do eval test x\${$as_var+set} = xset \
&& ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
done
PS1='$ '
PS2='> '
PS4='+ '
# NLS nuisances.
LC_ALL=C
export LC_ALL
LANGUAGE=C
export LANGUAGE
# CDPATH.
(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
# as_fn_error STATUS ERROR [LINENO LOG_FD]
# ----------------------------------------
# Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are
# provided, also output the error to LOG_FD, referencing LINENO. Then exit the
# script with STATUS, using 1 if that was 0.
as_fn_error ()
{
as_status=$1; test $as_status -eq 0 && as_status=1
if test "$4"; then
as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack
$as_echo "$as_me:${as_lineno-$LINENO}: error: $2" >&$4
fi
$as_echo "$as_me: error: $2" >&2
as_fn_exit $as_status
} # as_fn_error
# as_fn_set_status STATUS
# -----------------------
# Set $? to STATUS, without forking.
as_fn_set_status ()
{
return $1
} # as_fn_set_status
# as_fn_exit STATUS
# -----------------
# Exit the shell with STATUS, even in a "trap 0" or "set -e" context.
as_fn_exit ()
{
set +e
as_fn_set_status $1
exit $1
} # as_fn_exit
# as_fn_unset VAR
# ---------------
# Portably unset VAR.
as_fn_unset ()
{
{ eval $1=; unset $1;}
}
as_unset=as_fn_unset
# as_fn_append VAR VALUE
# ----------------------
# Append the text in VALUE to the end of the definition contained in VAR. Take
# advantage of any shell optimizations that allow amortized linear growth over
# repeated appends, instead of the typical quadratic growth present in naive
# implementations.
if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null; then :
eval 'as_fn_append ()
{
eval $1+=\$2
}'
else
as_fn_append ()
{
eval $1=\$$1\$2
}
fi # as_fn_append
# as_fn_arith ARG...
# ------------------
# Perform arithmetic evaluation on the ARGs, and store the result in the
# global $as_val. Take advantage of shells that can avoid forks. The arguments
# must be portable across $(()) and expr.
if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null; then :
eval 'as_fn_arith ()
{
as_val=$(( $* ))
}'
else
as_fn_arith ()
{
as_val=`expr "$@" || test $? -eq 1`
}
fi # as_fn_arith
if expr a : '\(a\)' >/dev/null 2>&1 &&
test "X`expr 00001 : '.*\(...\)'`" = X001; then
as_expr=expr
else
as_expr=false
fi
if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then
as_basename=basename
else
as_basename=false
fi
if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then
as_dirname=dirname
else
as_dirname=false
fi
as_me=`$as_basename -- "$0" ||
$as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \
X"$0" : 'X\(//\)$' \| \
X"$0" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X/"$0" |
sed '/^.*\/\([^/][^/]*\)\/*$/{
s//\1/
q
}
/^X\/\(\/\/\)$/{
s//\1/
q
}
/^X\/\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
# Avoid depending upon Character Ranges.
as_cr_letters='abcdefghijklmnopqrstuvwxyz'
as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
as_cr_Letters=$as_cr_letters$as_cr_LETTERS
as_cr_digits='0123456789'
as_cr_alnum=$as_cr_Letters$as_cr_digits
ECHO_C= ECHO_N= ECHO_T=
case `echo -n x` in #(((((
-n*)
case `echo 'xy\c'` in
*c*) ECHO_T=' ';; # ECHO_T is single tab character.
xy) ECHO_C='\c';;
*) echo `echo ksh88 bug on AIX 6.1` > /dev/null
ECHO_T=' ';;
esac;;
*)
ECHO_N='-n';;
esac
rm -f conf$$ conf$$.exe conf$$.file
if test -d conf$$.dir; then
rm -f conf$$.dir/conf$$.file
else
rm -f conf$$.dir
mkdir conf$$.dir 2>/dev/null
fi
if (echo >conf$$.file) 2>/dev/null; then
if ln -s conf$$.file conf$$ 2>/dev/null; then
as_ln_s='ln -s'
# ... but there are two gotchas:
# 1) On MSYS, both `ln -s file dir' and `ln file dir' fail.
# 2) DJGPP < 2.04 has no symlinks; `ln -s' creates a wrapper executable.
# In both cases, we have to default to `cp -p'.
ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe ||
as_ln_s='cp -p'
elif ln conf$$.file conf$$ 2>/dev/null; then
as_ln_s=ln
else
as_ln_s='cp -p'
fi
else
as_ln_s='cp -p'
fi
rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file
rmdir conf$$.dir 2>/dev/null
# as_fn_mkdir_p
# -------------
# Create "$as_dir" as a directory, including parents if necessary.
as_fn_mkdir_p ()
{
case $as_dir in #(
-*) as_dir=./$as_dir;;
esac
test -d "$as_dir" || eval $as_mkdir_p || {
as_dirs=
while :; do
case $as_dir in #(
*\'*) as_qdir=`$as_echo "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'(
*) as_qdir=$as_dir;;
esac
as_dirs="'$as_qdir' $as_dirs"
as_dir=`$as_dirname -- "$as_dir" ||
$as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
X"$as_dir" : 'X\(//\)[^/]' \| \
X"$as_dir" : 'X\(//\)$' \| \
X"$as_dir" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X"$as_dir" |
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
s//\1/
q
}
/^X\(\/\/\)[^/].*/{
s//\1/
q
}
/^X\(\/\/\)$/{
s//\1/
q
}
/^X\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
test -d "$as_dir" && break
done
test -z "$as_dirs" || eval "mkdir $as_dirs"
} || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir"
} # as_fn_mkdir_p
if mkdir -p . 2>/dev/null; then
as_mkdir_p='mkdir -p "$as_dir"'
else
test -d ./-p && rmdir ./-p
as_mkdir_p=false
fi
if test -x / >/dev/null 2>&1; then
as_test_x='test -x'
else
if ls -dL / >/dev/null 2>&1; then
as_ls_L_option=L
else
as_ls_L_option=
fi
as_test_x='
eval sh -c '\''
if test -d "$1"; then
test -d "$1/.";
else
case $1 in #(
-*)set "./$1";;
esac;
case `ls -ld'$as_ls_L_option' "$1" 2>/dev/null` in #((
???[sx]*):;;*)false;;esac;fi
'\'' sh
'
fi
as_executable_p=$as_test_x
# Sed expression to map a string onto a valid CPP name.
as_tr_cpp="eval sed 'y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g'"
# Sed expression to map a string onto a valid variable name.
as_tr_sh="eval sed 'y%*+%pp%;s%[^_$as_cr_alnum]%_%g'"
exec 6>&1
## ----------------------------------- ##
## Main body of $CONFIG_STATUS script. ##
## ----------------------------------- ##
_ASEOF
test $as_write_fail = 0 && chmod +x $CONFIG_STATUS || ac_write_fail=1
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
# Save the log message, to keep $0 and so on meaningful, and to
# report actual input values of CONFIG_FILES etc. instead of their
# values after options handling.
ac_log="
This file was extended by Cuba $as_me 3.0, which was
generated by GNU Autoconf 2.68. Invocation command line was
CONFIG_FILES = $CONFIG_FILES
CONFIG_HEADERS = $CONFIG_HEADERS
CONFIG_LINKS = $CONFIG_LINKS
CONFIG_COMMANDS = $CONFIG_COMMANDS
$ $0 $@
on `(hostname || uname -n) 2>/dev/null | sed 1q`
"
_ACEOF
case $ac_config_files in *"
"*) set x $ac_config_files; shift; ac_config_files=$*;;
esac
case $ac_config_headers in *"
"*) set x $ac_config_headers; shift; ac_config_headers=$*;;
esac
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
# Files that config.status was made for.
config_files="$ac_config_files"
config_headers="$ac_config_headers"
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
ac_cs_usage="\
\`$as_me' instantiates files and other configuration actions
from templates according to the current configuration. Unless the files
and actions are specified as TAGs, all are instantiated by default.
Usage: $0 [OPTION]... [TAG]...
-h, --help print this help, then exit
-V, --version print version number and configuration settings, then exit
--config print configuration, then exit
-q, --quiet, --silent
do not print progress messages
-d, --debug don't remove temporary files
--recheck update $as_me by reconfiguring in the same conditions
--file=FILE[:TEMPLATE]
instantiate the configuration file FILE
--header=FILE[:TEMPLATE]
instantiate the configuration header FILE
Configuration files:
$config_files
Configuration headers:
$config_headers
Report bugs to ."
_ACEOF
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`"
ac_cs_version="\\
Cuba config.status 3.0
configured by $0, generated by GNU Autoconf 2.68,
with options \\"\$ac_cs_config\\"
Copyright (C) 2010 Free Software Foundation, Inc.
This config.status script is free software; the Free Software Foundation
gives unlimited permission to copy, distribute and modify it."
ac_pwd='$ac_pwd'
srcdir='$srcdir'
INSTALL='$INSTALL'
test -n "\$AWK" || AWK=awk
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
# The default lists apply if the user does not specify any file.
ac_need_defaults=:
while test $# != 0
do
case $1 in
--*=?*)
ac_option=`expr "X$1" : 'X\([^=]*\)='`
ac_optarg=`expr "X$1" : 'X[^=]*=\(.*\)'`
ac_shift=:
;;
--*=)
ac_option=`expr "X$1" : 'X\([^=]*\)='`
ac_optarg=
ac_shift=:
;;
*)
ac_option=$1
ac_optarg=$2
ac_shift=shift
;;
esac
case $ac_option in
# Handling of the options.
-recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r)
ac_cs_recheck=: ;;
--version | --versio | --versi | --vers | --ver | --ve | --v | -V )
$as_echo "$ac_cs_version"; exit ;;
--config | --confi | --conf | --con | --co | --c )
$as_echo "$ac_cs_config"; exit ;;
--debug | --debu | --deb | --de | --d | -d )
debug=: ;;
--file | --fil | --fi | --f )
$ac_shift
case $ac_optarg in
*\'*) ac_optarg=`$as_echo "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;;
'') as_fn_error $? "missing file argument" ;;
esac
as_fn_append CONFIG_FILES " '$ac_optarg'"
ac_need_defaults=false;;
--header | --heade | --head | --hea )
$ac_shift
case $ac_optarg in
*\'*) ac_optarg=`$as_echo "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;;
esac
as_fn_append CONFIG_HEADERS " '$ac_optarg'"
ac_need_defaults=false;;
--he | --h)
# Conflict between --help and --header
as_fn_error $? "ambiguous option: \`$1'
Try \`$0 --help' for more information.";;
--help | --hel | -h )
$as_echo "$ac_cs_usage"; exit ;;
-q | -quiet | --quiet | --quie | --qui | --qu | --q \
| -silent | --silent | --silen | --sile | --sil | --si | --s)
ac_cs_silent=: ;;
# This is an error.
-*) as_fn_error $? "unrecognized option: \`$1'
Try \`$0 --help' for more information." ;;
*) as_fn_append ac_config_targets " $1"
ac_need_defaults=false ;;
esac
shift
done
ac_configure_extra_args=
if $ac_cs_silent; then
exec 6>/dev/null
ac_configure_extra_args="$ac_configure_extra_args --silent"
fi
_ACEOF
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
if \$ac_cs_recheck; then
set X '$SHELL' '$0' $ac_configure_args \$ac_configure_extra_args --no-create --no-recursion
shift
\$as_echo "running CONFIG_SHELL=$SHELL \$*" >&6
CONFIG_SHELL='$SHELL'
export CONFIG_SHELL
exec "\$@"
fi
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
exec 5>>config.log
{
echo
sed 'h;s/./-/g;s/^.../## /;s/...$/ ##/;p;x;p;x' <<_ASBOX
## Running $as_me. ##
_ASBOX
$as_echo "$ac_log"
} >&5
_ACEOF
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
# Handling of arguments.
for ac_config_target in $ac_config_targets
do
case $ac_config_target in
"config.h") CONFIG_HEADERS="$CONFIG_HEADERS config.h" ;;
"makefile") CONFIG_FILES="$CONFIG_FILES makefile" ;;
*) as_fn_error $? "invalid argument: \`$ac_config_target'" "$LINENO" 5;;
esac
done
# If the user did not use the arguments to specify the items to instantiate,
# then the envvar interface is used. Set only those that are not.
# We use the long form for the default assignment because of an extremely
# bizarre bug on SunOS 4.1.3.
if $ac_need_defaults; then
test "${CONFIG_FILES+set}" = set || CONFIG_FILES=$config_files
test "${CONFIG_HEADERS+set}" = set || CONFIG_HEADERS=$config_headers
fi
# Have a temporary directory for convenience. Make it in the build tree
# simply because there is no reason against having it here, and in addition,
# creating and moving files from /tmp can sometimes cause problems.
# Hook for its removal unless debugging.
# Note that there is a small window in which the directory will not be cleaned:
# after its creation but before its name has been assigned to `$tmp'.
$debug ||
{
tmp= ac_tmp=
trap 'exit_status=$?
: "${ac_tmp:=$tmp}"
{ test ! -d "$ac_tmp" || rm -fr "$ac_tmp"; } && exit $exit_status
' 0
trap 'as_fn_exit 1' 1 2 13 15
}
# Create a (secure) tmp directory for tmp files.
{
tmp=`(umask 077 && mktemp -d "./confXXXXXX") 2>/dev/null` &&
test -d "$tmp"
} ||
{
tmp=./conf$$-$RANDOM
(umask 077 && mkdir "$tmp")
} || as_fn_error $? "cannot create a temporary directory in ." "$LINENO" 5
ac_tmp=$tmp
# Set up the scripts for CONFIG_FILES section.
# No need to generate them if there are no CONFIG_FILES.
# This happens for instance with `./config.status config.h'.
if test -n "$CONFIG_FILES"; then
ac_cr=`echo X | tr X '\015'`
# On cygwin, bash can eat \r inside `` if the user requested igncr.
# But we know of no other shell where ac_cr would be empty at this
# point, so we can use a bashism as a fallback.
if test "x$ac_cr" = x; then
eval ac_cr=\$\'\\r\'
fi
ac_cs_awk_cr=`$AWK 'BEGIN { print "a\rb" }' /dev/null`
if test "$ac_cs_awk_cr" = "a${ac_cr}b"; then
ac_cs_awk_cr='\\r'
else
ac_cs_awk_cr=$ac_cr
fi
echo 'BEGIN {' >"$ac_tmp/subs1.awk" &&
_ACEOF
{
echo "cat >conf$$subs.awk <<_ACEOF" &&
echo "$ac_subst_vars" | sed 's/.*/&!$&$ac_delim/' &&
echo "_ACEOF"
} >conf$$subs.sh ||
as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5
ac_delim_num=`echo "$ac_subst_vars" | grep -c '^'`
ac_delim='%!_!# '
for ac_last_try in false false false false false :; do
. ./conf$$subs.sh ||
as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5
ac_delim_n=`sed -n "s/.*$ac_delim\$/X/p" conf$$subs.awk | grep -c X`
if test $ac_delim_n = $ac_delim_num; then
break
elif $ac_last_try; then
as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5
else
ac_delim="$ac_delim!$ac_delim _$ac_delim!! "
fi
done
rm -f conf$$subs.sh
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
cat >>"\$ac_tmp/subs1.awk" <<\\_ACAWK &&
_ACEOF
sed -n '
h
s/^/S["/; s/!.*/"]=/
p
g
s/^[^!]*!//
:repl
t repl
s/'"$ac_delim"'$//
t delim
:nl
h
s/\(.\{148\}\)..*/\1/
t more1
s/["\\]/\\&/g; s/^/"/; s/$/\\n"\\/
p
n
b repl
:more1
s/["\\]/\\&/g; s/^/"/; s/$/"\\/
p
g
s/.\{148\}//
t nl
:delim
h
s/\(.\{148\}\)..*/\1/
t more2
s/["\\]/\\&/g; s/^/"/; s/$/"/
p
b
:more2
s/["\\]/\\&/g; s/^/"/; s/$/"\\/
p
g
s/.\{148\}//
t delim
' >$CONFIG_STATUS || ac_write_fail=1
rm -f conf$$subs.awk
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
_ACAWK
cat >>"\$ac_tmp/subs1.awk" <<_ACAWK &&
for (key in S) S_is_set[key] = 1
FS = ""
}
{
line = $ 0
nfields = split(line, field, "@")
substed = 0
len = length(field[1])
for (i = 2; i < nfields; i++) {
key = field[i]
keylen = length(key)
if (S_is_set[key]) {
value = S[key]
line = substr(line, 1, len) "" value "" substr(line, len + keylen + 3)
len += length(value) + length(field[++i])
substed = 1
} else
len += 1 + keylen
}
print line
}
_ACAWK
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
if sed "s/$ac_cr//" < /dev/null > /dev/null 2>&1; then
sed "s/$ac_cr\$//; s/$ac_cr/$ac_cs_awk_cr/g"
else
cat
fi < "$ac_tmp/subs1.awk" > "$ac_tmp/subs.awk" \
|| as_fn_error $? "could not setup config files machinery" "$LINENO" 5
_ACEOF
# VPATH may cause trouble with some makes, so we remove sole $(srcdir),
# ${srcdir} and @srcdir@ entries from VPATH if srcdir is ".", strip leading and
# trailing colons and then remove the whole line if VPATH becomes empty
# (actually we leave an empty line to preserve line numbers).
if test "x$srcdir" = x.; then
ac_vpsub='/^[ ]*VPATH[ ]*=[ ]*/{
h
s///
s/^/:/
s/[ ]*$/:/
s/:\$(srcdir):/:/g
s/:\${srcdir}:/:/g
s/:@srcdir@:/:/g
s/^:*//
s/:*$//
x
s/\(=[ ]*\).*/\1/
G
s/\n//
s/^[^=]*=[ ]*$//
}'
fi
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
fi # test -n "$CONFIG_FILES"
# Set up the scripts for CONFIG_HEADERS section.
# No need to generate them if there are no CONFIG_HEADERS.
# This happens for instance with `./config.status Makefile'.
if test -n "$CONFIG_HEADERS"; then
cat >"$ac_tmp/defines.awk" <<\_ACAWK ||
BEGIN {
_ACEOF
# Transform confdefs.h into an awk script `defines.awk', embedded as
# here-document in config.status, that substitutes the proper values into
# config.h.in to produce config.h.
# Create a delimiter string that does not exist in confdefs.h, to ease
# handling of long lines.
ac_delim='%!_!# '
for ac_last_try in false false :; do
ac_tt=`sed -n "/$ac_delim/p" confdefs.h`
if test -z "$ac_tt"; then
break
elif $ac_last_try; then
as_fn_error $? "could not make $CONFIG_HEADERS" "$LINENO" 5
else
ac_delim="$ac_delim!$ac_delim _$ac_delim!! "
fi
done
# For the awk script, D is an array of macro values keyed by name,
# likewise P contains macro parameters if any. Preserve backslash
# newline sequences.
ac_word_re=[_$as_cr_Letters][_$as_cr_alnum]*
sed -n '
s/.\{148\}/&'"$ac_delim"'/g
t rset
:rset
s/^[ ]*#[ ]*define[ ][ ]*/ /
t def
d
:def
s/\\$//
t bsnl
s/["\\]/\\&/g
s/^ \('"$ac_word_re"'\)\(([^()]*)\)[ ]*\(.*\)/P["\1"]="\2"\
D["\1"]=" \3"/p
s/^ \('"$ac_word_re"'\)[ ]*\(.*\)/D["\1"]=" \2"/p
d
:bsnl
s/["\\]/\\&/g
s/^ \('"$ac_word_re"'\)\(([^()]*)\)[ ]*\(.*\)/P["\1"]="\2"\
D["\1"]=" \3\\\\\\n"\\/p
t cont
s/^ \('"$ac_word_re"'\)[ ]*\(.*\)/D["\1"]=" \2\\\\\\n"\\/p
t cont
d
:cont
n
s/.\{148\}/&'"$ac_delim"'/g
t clear
:clear
s/\\$//
t bsnlc
s/["\\]/\\&/g; s/^/"/; s/$/"/p
d
:bsnlc
s/["\\]/\\&/g; s/^/"/; s/$/\\\\\\n"\\/p
b cont
' >$CONFIG_STATUS || ac_write_fail=1
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
for (key in D) D_is_set[key] = 1
FS = ""
}
/^[\t ]*#[\t ]*(define|undef)[\t ]+$ac_word_re([\t (]|\$)/ {
line = \$ 0
split(line, arg, " ")
if (arg[1] == "#") {
defundef = arg[2]
mac1 = arg[3]
} else {
defundef = substr(arg[1], 2)
mac1 = arg[2]
}
split(mac1, mac2, "(") #)
macro = mac2[1]
prefix = substr(line, 1, index(line, defundef) - 1)
if (D_is_set[macro]) {
# Preserve the white space surrounding the "#".
print prefix "define", macro P[macro] D[macro]
next
} else {
# Replace #undef with comments. This is necessary, for example,
# in the case of _POSIX_SOURCE, which is predefined and required
# on some systems where configure will not decide to define it.
if (defundef == "undef") {
print "/*", prefix defundef, macro, "*/"
next
}
}
}
{ print }
_ACAWK
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
as_fn_error $? "could not setup config headers machinery" "$LINENO" 5
fi # test -n "$CONFIG_HEADERS"
eval set X " :F $CONFIG_FILES :H $CONFIG_HEADERS "
shift
for ac_tag
do
case $ac_tag in
:[FHLC]) ac_mode=$ac_tag; continue;;
esac
case $ac_mode$ac_tag in
:[FHL]*:*);;
:L* | :C*:*) as_fn_error $? "invalid tag \`$ac_tag'" "$LINENO" 5;;
:[FH]-) ac_tag=-:-;;
:[FH]*) ac_tag=$ac_tag:$ac_tag.in;;
esac
ac_save_IFS=$IFS
IFS=:
set x $ac_tag
IFS=$ac_save_IFS
shift
ac_file=$1
shift
case $ac_mode in
:L) ac_source=$1;;
:[FH])
ac_file_inputs=
for ac_f
do
case $ac_f in
-) ac_f="$ac_tmp/stdin";;
*) # Look for the file first in the build tree, then in the source tree
# (if the path is not absolute). The absolute path cannot be DOS-style,
# because $ac_f cannot contain `:'.
test -f "$ac_f" ||
case $ac_f in
[\\/$]*) false;;
*) test -f "$srcdir/$ac_f" && ac_f="$srcdir/$ac_f";;
esac ||
as_fn_error 1 "cannot find input file: \`$ac_f'" "$LINENO" 5;;
esac
case $ac_f in *\'*) ac_f=`$as_echo "$ac_f" | sed "s/'/'\\\\\\\\''/g"`;; esac
as_fn_append ac_file_inputs " '$ac_f'"
done
# Let's still pretend it is `configure' which instantiates (i.e., don't
# use $as_me), people would be surprised to read:
# /* config.h. Generated by config.status. */
configure_input='Generated from '`
$as_echo "$*" | sed 's|^[^:]*/||;s|:[^:]*/|, |g'
`' by configure.'
if test x"$ac_file" != x-; then
configure_input="$ac_file. $configure_input"
{ $as_echo "$as_me:${as_lineno-$LINENO}: creating $ac_file" >&5
$as_echo "$as_me: creating $ac_file" >&6;}
fi
# Neutralize special characters interpreted by sed in replacement strings.
case $configure_input in #(
*\&* | *\|* | *\\* )
ac_sed_conf_input=`$as_echo "$configure_input" |
sed 's/[\\\\&|]/\\\\&/g'`;; #(
*) ac_sed_conf_input=$configure_input;;
esac
case $ac_tag in
*:-:* | *:-) cat >"$ac_tmp/stdin" \
|| as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;;
esac
;;
esac
ac_dir=`$as_dirname -- "$ac_file" ||
$as_expr X"$ac_file" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
X"$ac_file" : 'X\(//\)[^/]' \| \
X"$ac_file" : 'X\(//\)$' \| \
X"$ac_file" : 'X\(/\)' \| . 2>/dev/null ||
$as_echo X"$ac_file" |
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
s//\1/
q
}
/^X\(\/\/\)[^/].*/{
s//\1/
q
}
/^X\(\/\/\)$/{
s//\1/
q
}
/^X\(\/\).*/{
s//\1/
q
}
s/.*/./; q'`
as_dir="$ac_dir"; as_fn_mkdir_p
ac_builddir=.
case "$ac_dir" in
.) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;;
*)
ac_dir_suffix=/`$as_echo "$ac_dir" | sed 's|^\.[\\/]||'`
# A ".." for each directory in $ac_dir_suffix.
ac_top_builddir_sub=`$as_echo "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'`
case $ac_top_builddir_sub in
"") ac_top_builddir_sub=. ac_top_build_prefix= ;;
*) ac_top_build_prefix=$ac_top_builddir_sub/ ;;
esac ;;
esac
ac_abs_top_builddir=$ac_pwd
ac_abs_builddir=$ac_pwd$ac_dir_suffix
# for backward compatibility:
ac_top_builddir=$ac_top_build_prefix
case $srcdir in
.) # We are building in place.
ac_srcdir=.
ac_top_srcdir=$ac_top_builddir_sub
ac_abs_top_srcdir=$ac_pwd ;;
[\\/]* | ?:[\\/]* ) # Absolute name.
ac_srcdir=$srcdir$ac_dir_suffix;
ac_top_srcdir=$srcdir
ac_abs_top_srcdir=$srcdir ;;
*) # Relative name.
ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix
ac_top_srcdir=$ac_top_build_prefix$srcdir
ac_abs_top_srcdir=$ac_pwd/$srcdir ;;
esac
ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix
case $ac_mode in
:F)
#
# CONFIG_FILE
#
case $INSTALL in
[\\/$]* | ?:[\\/]* ) ac_INSTALL=$INSTALL ;;
*) ac_INSTALL=$ac_top_build_prefix$INSTALL ;;
esac
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
# If the template does not know about datarootdir, expand it.
# FIXME: This hack should be removed a few years after 2.60.
ac_datarootdir_hack=; ac_datarootdir_seen=
ac_sed_dataroot='
/datarootdir/ {
p
q
}
/@datadir@/p
/@docdir@/p
/@infodir@/p
/@localedir@/p
/@mandir@/p'
case `eval "sed -n \"\$ac_sed_dataroot\" $ac_file_inputs"` in
*datarootdir*) ac_datarootdir_seen=yes;;
*@datadir@*|*@docdir@*|*@infodir@*|*@localedir@*|*@mandir@*)
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&5
$as_echo "$as_me: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&2;}
_ACEOF
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
ac_datarootdir_hack='
s&@datadir@&$datadir&g
s&@docdir@&$docdir&g
s&@infodir@&$infodir&g
s&@localedir@&$localedir&g
s&@mandir@&$mandir&g
s&\\\${datarootdir}&$datarootdir&g' ;;
esac
_ACEOF
# Neutralize VPATH when `$srcdir' = `.'.
# Shell code in configure.ac might set extrasub.
# FIXME: do we really want to maintain this feature?
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
ac_sed_extra="$ac_vpsub
$extrasub
_ACEOF
cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
:t
/@[a-zA-Z_][a-zA-Z_0-9]*@/!b
s|@configure_input@|$ac_sed_conf_input|;t t
s&@top_builddir@&$ac_top_builddir_sub&;t t
s&@top_build_prefix@&$ac_top_build_prefix&;t t
s&@srcdir@&$ac_srcdir&;t t
s&@abs_srcdir@&$ac_abs_srcdir&;t t
s&@top_srcdir@&$ac_top_srcdir&;t t
s&@abs_top_srcdir@&$ac_abs_top_srcdir&;t t
s&@builddir@&$ac_builddir&;t t
s&@abs_builddir@&$ac_abs_builddir&;t t
s&@abs_top_builddir@&$ac_abs_top_builddir&;t t
s&@INSTALL@&$ac_INSTALL&;t t
$ac_datarootdir_hack
"
eval sed \"\$ac_sed_extra\" "$ac_file_inputs" | $AWK -f "$ac_tmp/subs.awk" \
>$ac_tmp/out || as_fn_error $? "could not create $ac_file" "$LINENO" 5
test -z "$ac_datarootdir_hack$ac_datarootdir_seen" &&
{ ac_out=`sed -n '/\${datarootdir}/p' "$ac_tmp/out"`; test -n "$ac_out"; } &&
{ ac_out=`sed -n '/^[ ]*datarootdir[ ]*:*=/p' \
"$ac_tmp/out"`; test -z "$ac_out"; } &&
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file contains a reference to the variable \`datarootdir'
which seems to be undefined. Please make sure it is defined" >&5
$as_echo "$as_me: WARNING: $ac_file contains a reference to the variable \`datarootdir'
which seems to be undefined. Please make sure it is defined" >&2;}
rm -f "$ac_tmp/stdin"
case $ac_file in
-) cat "$ac_tmp/out" && rm -f "$ac_tmp/out";;
*) rm -f "$ac_file" && mv "$ac_tmp/out" "$ac_file";;
esac \
|| as_fn_error $? "could not create $ac_file" "$LINENO" 5
;;
:H)
#
# CONFIG_HEADER
#
if test x"$ac_file" != x-; then
{
$as_echo "/* $configure_input */" \
&& eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs"
} >"$ac_tmp/config.h" \
|| as_fn_error $? "could not create $ac_file" "$LINENO" 5
if diff "$ac_file" "$ac_tmp/config.h" >/dev/null 2>&1; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: $ac_file is unchanged" >&5
$as_echo "$as_me: $ac_file is unchanged" >&6;}
else
rm -f "$ac_file"
mv "$ac_tmp/config.h" "$ac_file" \
|| as_fn_error $? "could not create $ac_file" "$LINENO" 5
fi
else
$as_echo "/* $configure_input */" \
&& eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" \
|| as_fn_error $? "could not create -" "$LINENO" 5
fi
;;
esac
done # for ac_tag
as_fn_exit 0
_ACEOF
ac_clean_files=$ac_clean_files_save
test $ac_write_fail = 0 ||
as_fn_error $? "write failure creating $CONFIG_STATUS" "$LINENO" 5
# configure is writing to config.log, and then calls config.status.
# config.status does its own redirection, appending to config.log.
# Unfortunately, on DOS this fails, as config.log is still kept open
# by configure, so config.status won't be able to write to it; its
# output is simply discarded. So we exec the FD to /dev/null,
# effectively closing config.log, so it can be properly (re)opened and
# appended to by config.status. When coming back to configure, we
# need to make the FD available again.
if test "$no_create" != yes; then
ac_cs_success=:
ac_config_status_args=
test "$silent" = yes &&
ac_config_status_args="$ac_config_status_args --quiet"
exec 5>/dev/null
$SHELL $CONFIG_STATUS $ac_config_status_args || ac_cs_success=false
exec 5>>config.log
# Use ||, not &&, to avoid exiting from the if with $? = 1, which
# would make configure fail if this is the last instruction.
$ac_cs_success || as_fn_exit 1
fi
if test -n "$ac_unrecognized_opts" && test "$enable_option_checking" != no; then
{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: unrecognized options: $ac_unrecognized_opts" >&5
$as_echo "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2;}
fi
Cuba-3.0/configure.ac 0000644 0000000 0000000 00000004432 11663151330 013214 0 ustar root root # Process this file with autoconf to produce a configure script.
AC_PREREQ(2.59)
AC_INIT([Cuba], [3.0], [hahn@feynarts.de])
AC_CONFIG_SRCDIR([cuba.h])
LIBS=-lm
USER_CFLAGS="$CFLAGS"
AC_ARG_VAR(MCFLAGS, [MathLink C compiler flags])
AC_PROG_CC
AC_PROG_F77
AC_PROG_RANLIB
AC_PROG_INSTALL
AS_IF([test "$GCC" = yes],
[AS_CASE([`$CC --version 2>&1 < /dev/null`],
[*LLVM*], [opt=-O3],
[*gcc*4.2* | *gcc*4.4.3*], [opt=-O0],
[opt=-O3])
CFLAGS=${USER_CFLAGS:-$opt -fomit-frame-pointer -ffast-math}],
[CFLAGS=${USER_CFLAGS:--O}])
AC_C_CONST
AC_C_INLINE
AC_C_LONG_DOUBLE
AC_CHECK_FUNCS([powl])
AC_CHECK_FUNCS([erf])
AC_CHECK_FUNCS([getloadavg])
MAXDIM=${MAXDIM:-16}
AC_ARG_WITH(maxdim,
[AS_HELP_STRING([--with-maxdim=N],
[the maximum dimension for integration,
if variable-size array are not supported])],
[MAXDIM=$withval])
MAXCOMP=${MAXCOMP:-4}
AC_ARG_WITH(maxcomp,
[AS_HELP_STRING([--with-maxcomp=N],
[the maximum number of components of the integrand,
if variable-size array are not supported])],
[MAXCOMP=$withval])
AC_MSG_CHECKING([for variable-size arrays])
AC_COMPILE_IFELSE([AC_LANG_SOURCE(,[[
void test(int n) {
char s[n];
}
]])],
[AC_MSG_RESULT([yes])],
[AC_MSG_RESULT([no, using MAXDIM=$MAXDIM and MAXCOMP=$MAXCOMP])
AC_DEFINE_UNQUOTED([NDIM], [$MAXDIM], [Maximum number of components])
AC_DEFINE_UNQUOTED([NCOMP], [$MAXCOMP], [Maximum number of dimensions])]
)
AC_MSG_CHECKING([for MathLink])
cat > conftest.tm << _EOF_
:Begin:
:Function: inc
:Pattern: Inc[i_Integer]
:Arguments: {i}
:ArgumentTypes: {Integer}
:ReturnType: Integer
:End:
#include "mathlink.h"
static int inc(const int i) { return i + 1; }
int main(int argc, char **argv) {
return MLMain(argc, argv);
}
_EOF_
FCC="$srcdir/tools/fcc"
rm -f conftest$EXEEXT
REALCC="$CC" CC="$FCC" CXX="$FCC" PATH="$PATH:$srcdir/tools" \
mcc $MCFLAGS $CFLAGS -o conftest$EXEEXT conftest.tm > /dev/null 2>&1
AS_IF([test -x conftest$EXEEXT],
[AC_MSG_RESULT([yes])
MATH_DEFAULT=math],
[AC_MSG_RESULT([no])])
AC_SUBST([MATH_DEFAULT])
AC_CHECK_PROGS([HAVE_QMAKE], [qmake])
test -n "$HAVE_QMAKE" && TOOLS_DEFAULT=tools
AC_SUBST([TOOLS_DEFAULT])
test -n "$F77" && DEMO_FORTRAN_DEFAULT=demo-fortran
AC_SUBST([DEMO_FORTRAN_DEFAULT])
AC_CONFIG_HEADERS([config.h])
AC_CONFIG_FILES([makefile])
AC_OUTPUT
Cuba-3.0/cuba.h 0000644 0000000 0000000 00000010000 11406073510 011773 0 ustar root root /*
cuba.h
Prototypes for the Cuba library
this file is part of Cuba
last modified 16 Jun 10 th
*/
#ifdef __cplusplus
extern "C" {
#endif
/* NB: Divonne actually passes a fifth argument, a const int *
which points to the integration phase. This is used only
rarely and most users are confused by the warnings the
compiler emits if the `correct' prototype is used. Thus,
if you need to access this argument, use an explicit cast
to integrand_t when invoking Divonne. */
typedef int (*integrand_t)(const int *ndim, const double x[],
const int *ncomp, double f[], void *userdata);
typedef void (*peakfinder_t)(const int *ndim, const double b[],
int *n, double x[]);
void Vegas(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int seed,
const int mineval, const int maxeval,
const int nstart, const int nincrease, const int nbatch,
const int gridno, const char *statefile,
int *neval, int *fail,
double integral[], double error[], double prob[]);
void llVegas(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int seed,
const long long int mineval, const long long int maxeval,
const long long int nstart, const long long int nincrease,
const long long int nbatch,
const int gridno, const char *statefile,
long long int *neval, int *fail,
double integral[], double error[], double prob[]);
void Suave(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int seed,
const int mineval, const int maxeval,
const int nnew, const double flatness,
int *nregions, int *neval, int *fail,
double integral[], double error[], double prob[]);
void llSuave(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int seed,
const long long int mineval, const long long int maxeval,
const long long int nnew, const double flatness,
int *nregions, long long int *neval, int *fail,
double integral[], double error[], double prob[]);
void Divonne(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int seed,
const int mineval, const int maxeval,
const int key1, const int key2, const int key3, const int maxpass,
const double border, const double maxchisq, const double mindeviation,
const int ngiven, const int ldxgiven, double xgiven[],
const int nextra, peakfinder_t peakfinder,
int *nregions, int *neval, int *fail,
double integral[], double error[], double prob[]);
void llDivonne(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int seed,
const long long int mineval, const long long int maxeval,
const int key1, const int key2, const int key3, const int maxpass,
const double border, const double maxchisq, const double mindeviation,
const long long int ngiven, const int ldxgiven, double xgiven[],
const long long int nextra,
void (*peakfinder)(const int *, const double [], int *, double []),
int *nregions, long long int *neval, int *fail,
double integral[], double error[], double prob[]);
void Cuhre(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags, const int mineval, const int maxeval,
const int key,
int *nregions, int *neval, int *fail,
double integral[], double error[], double prob[]);
void llCuhre(const int ndim, const int ncomp,
integrand_t integrand, void *userdata,
const double epsrel, const double epsabs,
const int flags,
const long long int mineval, const long long int maxeval,
const int key,
int *nregions, long long int *neval, int *fail,
double integral[], double error[], double prob[]);
#ifdef __cplusplus
}
#endif
Cuba-3.0/cuba.pdf 0000644 0000000 0000000 00000677504 11621250436 012354 0 ustar root root %PDF-1.4
%Çì¢
5 0 obj
<>
stream
xœµ\Is\Gr¾óWàØm³ k_t›ÅcäðHð\4:€ t¨A@$1CÿuçRKÖ{Õ\Fv(H6 êeee~¹Wë§ µè …ÿ•¯ïŸ½ø6^ܾ{¦.þnŸýôLÓ‚‹òÏõýÅï/aQ‚KVY_\¾~Æ/ë çÃâÒE4zQáâòþÙ÷»oöfÉ9¥°û¯ýÁð_¿îýÎÀ Uþ8øókù~þáò?ž ò.Ú.>(sqy”îö‡°(eÌîÕÞÁíÂîqð@>F&úØ–Üõ_¼»¬ÿµ¼Û‹oátÚ-Öƒç9Xkå.6-ŽwÿÃþ ’2y÷g²)D·{ Ÿ’ó6î®èYô¹Ð3’žÓKJ
¥D´~ÝÃj‰6ÁkkàMov'dYYåüîØ?¾Ä}C)ÆÝÛýÁ-1*…ÛÁG¯’|öhià;ÅÝkó¢Mz÷À+3½Ž{8Áýިņà,L_™ 9xßÉ23&ÁqoÄbÁã=-6>YPÁïœÛ½«ßíõb¬‚ r5¹ôª=~LÊ‹³·80’ ŸÙøíšyâòšV8ã‚ ÷° )¯³\KÛÙ B„Ž©lÁn™@°u3\pÕ Š·Êy£šœà™:^ô’½'¼€æ@{ ?»ä†ÿK@½pÄÝ‚øAy¦Ý¿£\ƒâW¨òdƒGðƒiF§r‚êG²*Ÿ–sË¢#g¦üÍÞ.!hï%‘_ÐÈR Ù ðÆeÁ|Á"«:•¥ÉDzIÐd ,»äòîGz=Y__O Ö?·!É X‰Áš^P…zwŸŸuxhY¢Òp0QãáéÿìA¤àoêJ¢Z±ìwžïö 5^L¥rÇÛ;fc™Deãb²$ªâ¾¢ B¥=lêRCJE9D ËÝkÀÒ[q–.žÛ.³WÀ| @ V¿Åßdð($t‹ê֢߅Nà9¾Ê²D 'ؽ`[úGÕÕº}Š =Y ÂÓBÈþ‘Õ›DòþÍ wB|ƒ«'sÇ«’¸õç` goH)IÛ¢g"Ê?† ÀD@NN,þß5¬?Í$útSèËCÜé¾Òl¤¨ÓðTHFwN;…b³nˆ`r x
†_¢Ûƒè'F°{{…Âà×À#hÚ²¯eŠCP=hŸ!¸ ³ˆ‚—H§„BÐ)¹ ÁúË ¨ŒöjôB•zá%1ÅRä™ìŠV%BÕioÀƒ|…T‰.Âó 7‘c.?x؃ÍdØv÷8&½vƒ¿A#°yèûøÙÏø,’áÚ{/§
D·Æeâ9þ®9 î œYj? ©‡½çmpÛ–œ<={Í\d õºIãeÆÁ“@ظ…g¼Ù6ç ‡Ÿ³×†6F6{É9¿ðÔ3’Îã ¥mx@W¥‹[¿ÃŒèlíqk<®ÉÀ!9¾J ÷xßö8Ê ÙWyˆë|‰d_[ŽZÄ›JI4ñΡo³´äMD,Q¸(r—„\H@*5ÉàÚ‡ºþHÇ(¼ †¥n‰¥¯àaV¤¯¿í³jÛ]± ªí€ÕºlˆÅï ©ïJÀÏ2tp]2¤Ñ?îeÿ@w/¦’7E3èç‹bÚËšàyÕ¥dÔÎyÔf…Bß=SXé ‚ð g†¸ßÀe8 å{|J§@a‘æ™kR¼¯nÓÏ(—¶æ<ä!Ú}T5M+EI ¯Ü§H»€òsåÎxK[ÉËèh)8
DI ÄÁƃMkÿ°qÑ“þÛ/
ø4 –â«´‹ó®3³u86÷ ß"0*ûP!Á@[È W $SâÆÍÄGtcÅ×p³S‘K$¯/ ÂÚ†ÊaÐv!ÄÖÍ|ŒÖ><³Q¿Å²-O¶´+ÙÿÍ)ø[ùj|Hï·3£sP* ßÞ®„¶¾óž ZT
oõ™S–ô<Ä€ÄrüŒN±[¯1 ó]_¿°Â)ÒV…$£J‚ +ÿÛ½VJ“ô>‚Þú®¨K‹•Aj'¶a…3 £U¨…™b¨âü³œwƘœ©ü³=IJQÔHPC”æâ‘Âvê.s+ébÊYn`³jÚ2¸®4‘T•ìþ¾ëïPç6¢(J[Y'Ÿ:ÙÆéÏå#
îö[QYw2ßcÓÌ 'Ï„ÜG8 X¦Ã*·õ+°¶=ñÓl)6¨Å<½n´„ YfØ{lµ·(¸ßoÚ µsa‚]'‚½]ÔŽ/8|?;M)ï¡ ÓRˆÍ›Ôs²öëÓs<7âÖËÇÌŒQ>t©ëz0\Ð:¥fÎ2Ôð ž_HrÓ@ÒwmïR¤ë¢ŸT6tYvŽŽ¥ l*‹ÇÂÐ?«€Xi
ê³…ª?an>@#aÔ+D¤ˆé`SËÕu©ÅØBÇÝlÖÄí 6BÕ§Ó‡=V(–Ÿ÷®¥XÑN¤üïš<Wy·é8[ÂÄNÝF - ‡éF*CêE[½5#2çj‹B §÷Ü`÷Ø°¨|{-Zo¤Œ±w•”4bÌ´3L¢§|Z%hø¨±S+ov…c7Êã»7¼ŸÙè{¿Ç¬Ð²íÚ•f(s!À+úž£,¼Iñ`”5ã•„™òZ¾¿/XÉC1¾4‡c¢ôÈ:µX=tWßtc ”#.)% ë"íbßH¼$Üö†j(ø zéàÙ ‘öÌARšö©Î¤c|øm'<¾ã̧A?5$ غe&¢ŒBÂäv}Añq+Ûlª/ ßv êfõV°U8)NakWŒYHm«£º„o:Ò…‹öwÓÅò8“f/ /x·˜˜³¤4m¯3ŸÉŦà!„wq@
µ¬6ÜJÚ;½ßÚS˜C9ó8Xù+O 2ÃLûDm4u“ècTè”1Sr Ãjð‹Ž Õ wÄL‡’+£Áàá¼8!ˆóü)@VW¥ý½hXÿ€•>X>–¯ÂU7ã8 tdªô‹¸¸øŸý$:Û
\VIÏ]§9?l
át4¹« œ€¡Ð>öÝÀyÈz°9
±¤¶ý±æטN'Ië5>ÅÜÒJ“ØŒ:èãÌ:F Ó’V˜˜E^‹”é†UðY`2"´X ª–1úì꿹c•8ê›0=ì`Q\t3Ã;¶L쵘Þå,,wÞ.ÑHß¼´pæ2 €S/aˆj"Nr¾EÞ.
.]€Rd2Oýµmœ/¥ÆË ˜ mã†%yÎ6¤«u‚óz6ç$RFïX‡v Hƒöë\¡)i£Æ`;†nÁ¶r†˜ÂxpgF4þ 3=õm ?z±‘s« t ² 9Ötlíq£.¤þÈ ¦Ø2sÄf6ÆçEÜ6U1½ŽqæIñ¤lšyoœ·÷€õl6D[BzñÔ/ Ñ$+ü÷ÌCEE½›:@;Î]ÜÕ™H EL,MìjºÇ! cB
9z Q0RVŠ¹ÄqV²ÍŠ`‰Ã•`Ï{ó9:«úX¼–X TFV[bÁSÏ .ôP܉ªJ¼'‡ì›œÈñ)Á³Q‘€µs<¬^ˆÄ |é ‹™éžN½‚+FÎ%ܤTÚØ8 ú8/Ĥa– þ*²MÝã ¬Ÿ~«Óøt`üŠ{²FÅÝßöP›{¼z´)î‘Ö&ˆc4¬Ù Hô»NôI
k¬ ¤z{£“ɸ q,=<¸ó7ë 5FèƉ•¨,šÇfe˜×$2ô Æ{’y7@}z‰Ý!ŒùCìÞ²TR´Ö;àà€ò ]åáí*ÆWfÇ4ó1‡7“tå\ü‹ où¡7»¨3Z]?Bñæë¤4ÿ_ïq¾®Bút˜O‡>_3#$ ùz´æÌ”5äéq~iãFWÙÝãL
å†7áSF#tº-ºpƒNôO•&1®ìå s0“±1zÁÛ|ó¨òŠ'úV™IKÐ[éć†ÅèÎxR€;*R4eº¸k ?.çð¤P>ð¨7x-‹hÑÇ8]uÉ…á’ÆÍ°¼*ÈOÛ´‰Ìõ<ÀÝäS¶zc¤¿³JK¿v>YÆKXÁ|~sy‹äUScˆ\¯WnÙàOý–ÍÓÔ疬Թʺ ?Ög ;:ìg÷Ëh§Sol~N~ƒWCλMÃtlÌÓAFw]qá¢è mÙ¸¥ã ÀkÙLûf“¨\ëO)9ý1â‚Èh90?)Ÿí0Š´íøц¼6Õ¿½wY ³º=ò½éЬ_ÚÙþì‡R–8w6Õ¦¯!š6O‹ùœóNÙ(ßÙeÒËy‚ŸÍ}§¶gÒ|Q©8Ÿ Î.¾k6«‰eiSš+›Ò¾”Éx÷‘» 8
~ëÔ>v{DâתW±zx:¯F`‰Ý³8…ëÁ0©Ÿ£l:›”o»‚ž
§ÅíÖâwÓdbÞ”=¸˜ÀÿJ0 ÔD:,ñ{XÖfàJ› ŸDê-òÚS ç3Õ}Ó{uüí6¯<]¯vIQÒz&ùÀ(¾S4LŽ›3”ü×Eü›> %üÚ‚ kDQ¡pÊr áz-q>©9s‚%Ÿí
uïèѽՄ7p27Ö\æù)~eÁç6ÆC‡ üØc‡ROUO%;†˜—œÈŽq#mÃn6µþ§àùÃ*µzù¢8LJlÏãªwQ²„¹üfPS6Aö/êµé`\Vn«BƒÚì«»|¿Ë`ãä‚Þ˜Ô·ý17¬©#6Tm$ú’ ½¤Ò¤KØ:ÊàÜ1͜ݔÙN4ÏMŽVwž¨â?_¨Õ1uŸ‘Cnß;„뀫MK
©•
¤£ÉM3ç,]‰û¬Þ4-Žë\W檼Ñì»Ö†/M¬‹ ôå H n¿w]2?`ÎéþÄî÷paSS3ÝL~†F”8Ñ"^!¼Ùx'rÑÞÀ4“Î]9¸GrZÿ—ú_5
êŒRRìÂ~ÉŒ¾4„_´ß´ëÏß=çk{b~þ«Ú HCõ¾ ‡[p2S¤¯½8™Ðÿ²¾¦Êâã랈À^„U;_áìŒO“å½ã¡
¦¤÷Lsmzyv]GâÇçèNéfQ¿U Úsÿvùì¯ðßÿgõ¦Xendstream
endobj
6 0 obj
4941
endobj
21 0 obj
<>
stream
xœ½]Y“ ÇqV„ÞÖ û/Ì›gln£îÃ~!Ú†C²DzC~€ø `A íábqQ‚½3ëÌêΞ™I‡nôtב•Ç—WñíNLr'ð?åŸ/~¸zôß½z%vÿ
ÿ{uõöJ¦vå /~Ø}u/Iµ“rŠÖªÝÍ÷Wùk¹ó
þ+'áv7?\=ÝÿéädÒû—=éàãþÕáZMA{k÷ÏúŸïf²Þ„¸ÿûõ†¥Ýß Ä½1ìç¿=À\N¿Qú˜~¶RÆýñÃA…ÉE³ÿ„_ûI*»ÿp¸–“QFÇýx*ôM¤sÞöÈÓûþô~¦&ký~.£Y#a×*:Ø–Þÿå Íd"¬0ïÏ·ŸË|öú Á›4–R“ƒ…}¿Ã
áÝ}‹wý϶E2éü¦z‡›„ ¾A6Y¨©ÛïZûý»þêÇÓsåŸÚô›¾Á÷8½›œ–tÑd}•nFUÂâÓc%Œ³
>üîæ߯´ÑS ¾¹¹^ÉD8Ä[ü öç,ØLÚÃ
†xÍàu[öK ÀO¾r ®É£€:¾-Õ˜@7˜ÙA Gx׆z6l ß•Zwbà.®ó6®%°BÞ
a§¿Â€4‘€|:Öì§D`W+c„ïÝdŒPyˆß ®í$°ï~þ¹L áêÊqà»Î§ä`ç*ÀÎáÝùÔØ@%\‡EÂh…ûL0”
Þua!róºÏ‘WïBzUÃz*¡mwi±° G8æH˜ã¾‘ö‡$ÓÂØþñ]’œUy„Œ|ü}Þ‡Ì/°¯¼Ÿ œüãÆ9_ÃèV¯ößâH^HÇÿ€É•3"쇩àà@žÀC›Ü…{“3ƒ¼éüKHG…tq¸Xu9KÕ^ö½Øþ'>up< 'Ÿ’ÇßM‡kà7T t à‡$<.Â9Ê*>„©ï:'ßq¤éZ‹—„ÿI›eý`:ª¾Ž
OÃT€±$lÏ\ €¸Öhd)8úàõiá’^Ÿë߀:ú Ý«,ôQÔî´_›vŽÑp iÊg,ËQøÔâ+£J…!B2½MtN±/â.˜A4ö¥0zð"’Ï 2á…Õb…Ÿ\ ±„{|Xë4ÔöuHÊÆ£z6pâlØfðÌ€¢ÀÈ
@ÞÁ‘l4ƒF…Ù°'a¶¡@:cYHü¾ø„ª›SÈ ÉöïvÙZšº…<š½hþ᧼xü}%¤|dŠYÞÕ)®bZûˆA:{Žù(“Z4ÞXÚn+šèÑŠy à`¨ÅÔÊ(P#ÚHgè µ3çïnO†™±|¸Ü“¯øT8³Dãü€@È®‡K^öè[¥w ^Rbš!EÓ…ÜÁ`Jh™Çþ5ª -¥Ï_Œ‰‰ “aw=|Ҷ̊Vƒu}pžF ©‘È "9µÌF¤ÏŸ¯4‰ £¯ã®Õjh@q~€©‹æ
„……K.YÁ~¾1ë¹hMfB!WpϜگ•Y$Ûæ ‹Ží]adß «©Gp$&ð9˜?v÷h[⇓§÷ƒS#ús‰[k„m5¼Ú-*OÐ å |v6g,§ÐI/ b1†š¿ ›Åš{ÖkW)ø,‚êÖ)©
\d–4’ãÿû§®k‚G™°À9ÄíC::åÕd0ƒq^°Ó €ìøwÔ:´pHŽ';ݳ †Í° 1h$hÕ'šy ëó#Î ÄuÜof¡Òþ
?b| d÷÷0€sÒZÍ/Þi\¢¸¼ÁHr ¼–84MW© ™åPIµˆ~þÃf[byà Tw<ˆ¬wâ"PRó©X8ÚŒ¼.üï/«×;Z<6”„ŠË‚·®34¯/Wf í Íá£$&Ä£ÛÒŽñn?< âVe]ǵ›Ž$ SsÎ\õ ƒç9{;¢þ|A׌Ê(×Tµq±ÏÛ²óÑÀ WPtp–Oe0†y‰·CÖØ剴Iµen‘œÍ/‚]íß6õÏ JäÑ
a,ÌEÛÐfqviÉD „ë8Ú‹L/ê÷Æ)‚1>¡¸•‹ÍÜ ôà½ÿ
¾!Zm䯪Ÿ§–ö¨ÀK@¢êV@.®† _ ™ämc 2ÂüaÅ ÈìÑ˵?D¦äK'Žx༄ALÀîC,:iÚ–åßd\ °F]GNL
>år† ÷ÒÚ ¼À]Ôfµþo'.™æ`´)$Y”%ö9 ÉÛ¼bÂÜ›
<õ†}$±î »ê ‚B”|²žKã¬d2}TPËDƒìø,J|Ll Uµó’ã$‡œø$£ekxêt÷b°ö= zá Ú`Ùb 9íhê€ÃêÔZQƒMk/š3±ryýF@øœ›<¿l:Ü`œÜ"mI¶ZFLÌ%;ð³Yš#$Áæ¯ÁnËκ¢-‰s ƒÁ€CÇö_œÎ_á'"Z¥Ë'–~âzþYŸò
¯êAÖ±AaÞü7€{ &e²« æ&vÓ\Ýj ²6$mˆ/¿ú¤´hl‹˜b)È1Í<®éBõ>Œi£3šµ.PG¦f*Vob,”‘×*f¾`ƒz:NÎSüôâb
\B% j1*Ö݇œo1V¤LB·[_ö04‹Wf~,B*X‚1‰X#-*+žM\3oÎ%Äqe‘ ãB‚¨cœ×
Ë¢Ñu¾T‡KAd¿SÄ)‡a(Ą́ªqiòöDõM„- *:D÷3ªÕ@Zmê i¬žCäk}I95C¼í*£-¤Üü&J›ì€úɺ±ŒV9mgüòÙêiuDŠ!‡jþǸ%ÊÇH7 W• iI|q%5óº:$ó ²¼ˆ_â9X°FFsáÆu5²5hç¬IxØp°¦§Ùøs«kv4„À‡ø ï
éüÚ˜\³B*‘ë !ì^½áÝ:Dé©T‚ÓýuŽë˜È¥åcmØê>ŒÉË* F ‘Q‰ ‰K¡NÖ¾‘¨[®
;² W¼SEÚó‰’ôâV% [C\œKø6ÀVŠz›„1I /`嘺Š^«ñ 2#eÀJ ÝLë2U}V®²B~(’ ‹xp•mÕÕ=Ë4ÀJ•Ò.ª-íÜ ¸O‘BQ‚“œÀãLj-0°”w2/‚=|½,wÊË$ÜÜŠÏ sñÉ5v$x·EkUè$|ýa¥ñ«•)Ç
½÷9’… ‹¬eqpÎYÙ_ìš‚Û’‰©¦F7{‡c4.ÊGŒ6o’¸Çí‰w»Ú Û4» ©$\
©€1Ò¿(Èû¬zÀ2¾Ò6—áù’œ\§—rác¨ 'é6„/Ì¢v FõBÛ‹;ÂÉÅQÞóƒRÍ€Ãm¬)Ãð ¹ýÓ@,ýŸøƒÂÌ(,8Aüƒ(p"WUCXœðqùâ¨/æu¸ó’žq®8§˜:Ñ ‰ä!¹ŸÂo[÷ñ¶•¬ Àöµ’jÒT4w3Ö8ˆÚo¼ûøòêÑíäÕ£Ãÿûêá O~»ûÕÕ×Ovßl^œºØB¹8æÁ6#éÃóÝ©?«(šÔ‹Gí(a£é]‰¼
O4÷$Œ´¹oaÁ;¸ Ó<¬ý2¥ Ì_Ô~YÆÂÌ6A¿ÿê€Å{
èx]c
*ŸîþëzëZþÿ sƒ½9ìí‹>Í¡D¢^v¶ *‰ RŠ`ÜDâ—¤'— êWœ±£Ýê¥K¯4r#§´è RÁoócò@Õ1šÈLû §1¼ÈÈð—0wXˆh°½¾Ye–s=5O¸W0dQæ˜Kv "Ÿ¢'Wº½ÇîÆte§ÈÒÐKãèígŠØ×u:\¶Dpµ°„Åø&©yp\Ë>Ôe¯pSTËe·²ãØÝEœóL¿-õ~T¶éƒð>©´ä.3áö9ÅI6‚,¡ñµíG¶‹“œ¤Þ}¬l©ÝÉgûŸW d¬²!„\7I”kårƒÂòºÞ\q"CTú~rÅÏwÜõK Ô£—˜äNX{Ó}#$
Ó2òÔ¶'h¿Q½Ðtë>œE\º†Mo?r †ŠÖ·QÐ(H²6Z9²-aZ¼‰µýR¯mëB,ˆÓ]jÒBFt÷y]œ´f*]Tí‡KJŽœ…lÊÓµn%â}bFYØÃ륹 /¨
L16Ü°ÐeÒušhZ®òÊcthû~”|ˆfC¹ÔóXdù³dž®®«I³ù«Î†J¯±¢1Ýbìf%fÆ–&¶ø®5>^·¾fÄ0*b«ï8*¦ ±¤0?¤Ní‚òa™à ì ,&þ3€|»øàaäƒÆOs)±.aþþ×ØHúèÛ°ÃÛf”3¬Û ð y®=¥×"]*jŠâQÝÒ—¥ö=àõàM¤û’ÉÏÃxý»É‚‡þ–Ç`q. •ÜFü·D'—ƒjðBr®«~EÆ´}}œ)?|Ö ×H|½
Ž¾ÁÃJÇ¢ó:MÊŽd >WøàPÁ·Ù€)’¤%xÁu5ΙºÆP2‡ùwäEÔS©•xÍ9
ƒRÁ‚
Y?ãíW²Ú¶üÝ‹ü²Ó¶±Éb.dŽ[° G˜ÒcÍ£}ŒÞ¯·)# _),%ŽÐèô<«Ïò@+€D âá óe³+"tz‘‡Ÿ2éðÁý+²sBšJæz7¤
mÓ‘ž÷Ž•J®TaæÇy°·PæðRJÜ9¯ÂÇ Õª“¤ü„ÂÛ“
͵*€…ŽKz¹´Ì™mñëþtùn ¬ÏК8mÍ5Zªå¨Ä&EòÍÕÿȪ‘endstream
endobj
22 0 obj
6339
endobj
40 0 obj
<>
stream
xœ½\[o%7rγb Ao>'˜ÓÛ¼³óæ A`ó[ÙE`XyÆÖôúŒ4ž‹½óïSÅK³HÏEž
ŒÅh¥n²X,~õÕ…ýËí<‰ÛÿKÿ¾|só‡¯ÝíÃû›ùößá7¿ÜˆðÀmúçå›Û½ƒ‡„¼bZŒ‘·w?ÝÄ·<$&éoÓloïÞÜ|»ûf?O‹Óóâwë›=¼b…v»õx¿?ÈÉ+gÌîÝþ &-µZvÇO{¯'åô²{±?Î;³[?ìÚªIhµûm¯ôdæÙïÈïñïn‹Ú=–ùžâÞ¸] @ÙÝ˽šàwÞîŽ?n?¦±¬‘(MœKï~Âß
‰$yX|ö
Ó[J9X,ËiåwQ*·¡ Høm ´"M=¼M ¬'¯ÿü®Œ3Ó‚˜V)È“I9ZW¿]Ùg×—Nñµ#J POô¥ïïþóFªXÀzî^µw 7ù^…Ÿälª1ÉŽ¼ÂÌ“3bW¶”ü=ý(ê}( ‡,ÉAèIGiŠ=[‹Ûg„ kʼnå<™e³í5Ý`bÚ彤:£aZÍ“5AËZà.›Ýög2ÒJlå¾,â‡òÄ÷QúIê^ øVoÂI ZÈiÑž¼°ZV[¯„³y_¬ü@ž_²Í+9/³EIgï•¡k%ÃIÖ Â$•]
y¶µ˜ð´Ê%(ûq¯ ¢–mZ|éÍ^IÅ‚Nð˜À…²æô>Y®˜”d ÷]ááäÙ$R cRT2Ö09Úª‘³Š2ôЇE~›4èæ
sïÙg{&ÀSb [ {P`»Ò†! •ÙÊN³a„¤Z/†ºUZNvYèvÁ‰R KÒdCÅÄÞÆ1•nkp,Æ4!2 ˜QïþwïÅd¬¤}Àõ€@¶²Åc™ò)/x!.1%Ýä5Ýør’Þ’NÎ꺉OçG5ƒ¥’þºŸ•³°ÇhªÚM˲l1;ÿ¦¨:ˉx(s?ûna‚x DØ÷¨ ª x› ;àhÔIL‚À Š™VzŽ:µª@å‡Î ¬ è¾êð%y{âE‚=›n qPž åJ0PApz©!‡léÏa§¬ECËaãRÁo0DgkP„Ya 8neÖ²-Çl(v¼EˆM-l\Œ fY„)3|lq7–Œ”€ÆÏžj ƒê3@‡Z.¨f
.¤ ðyÔÆux ŸSxû_KG9,¨ 6ÿö ðqÄ—Š%>ßp^ø›ŸEžþ.04#]k¨‹é«ƒN¬ªA3£ËoÒº—H^ÑEÃv®,r$"k½OÈ¢ª@€ŒÔøMÔ5õñOt`Z 7¦Ú¹ãñigOZ¸°R´Åø!ÅDEøñ™"“”ÆAx5™Š=ßSB]ÌÚ$]¡ G¢ñƒžAäšÃ °/쮑$Š/mæ3Á)¿Ü×ç®_0h–PB_Áýˆƒ=
”®9$¸.ß’Â<îÛd¸®%¢€+êÄÉÂYlÖQ”+f-œ¤&H´Ág`;ú™ãx˜aÉ©)Ïp©©SZ!?>ú†4bRsu6]'§ æ© ’s¾µþpÕFj¥}ôƒ~mJ¬$¡Äþ~z³¼ æJLŸèšú&]¸þ
'vp8»\T
5¾•å×ß¿@æ'_U™÷&èö¥cÒsÉÐÕÿgÄ£H<5"+ê#›rÏÄ€•¶1ím€œ åÊälüCCÌ4Åf–µ[že Åt†ðfÀ%J ¿>µGňh{HÕdó+KÀÕ®º« aJΨäºe›8'#ÏYoÞry˜ó¡(«œ›1YnÄ'‰õ ¶P¦KjV!³–¼Ô–œI[lZcà9ÃÖ
ª¢F´5§8ÿS&¹0ÖÚV>kņÆd€§-óEI½ß2¤ó•éS®#ð˜>цNÈ€"ä ܬýYä+¶×Yë¥Î±eEgMA¶5‘šŽ#ØÁÖ`”q!«4ª©*m''«@l{Œ“~8¶Ò\Fg*?È ?Eßë=S}ÌCÉ1p%"Âgh×ÞFiÔ^NÉÿ{Š” }9,gÒ!s´ñ§ÙàõYu-P ì¸S¬µ7EP7 'ÏlU9ª(!1åQª>¹ QÀT'/Ñ.³ãuf§Š…7pí·çúb£ZX®yn€R ?&*ÁŸœÛ3¾£KlpÈèd([zZÕhH
f{!d_7ZBá¹ÎW’¢2…ŠDØóW æl°¢>¢Jùg/—‘•æT1¥2U鮧ÃÛûÑNãÔ5h+r)€a®‘€á†`üÌB~ÞNÆ#ƒ¬Û¢pã °Y°5û‡QF¬q~(†Öád†Ÿ·BãA3 EV¯ ˜¶aûdÞv‡¹öq¿Dð€`|ßíÊXV‹1RÔ’ †øÈøU¢ŒïöYÿšµÕ:ý1|y’òRV¤Ó¥ ä²Á IÈXòÁ`na–»¯öÈ‚ä¬7mÛ¨í3ü®á*…—UEèÔ³ ôã’êÓ¡ØŒ$ËÕ Rø]Ã30ÙûËð€õWl),ˆ¥ÙƒŒ•±ÎNÂÒDM
eu]–ë ® J ÈùY¿`Ì£r!$&“`^Ò >¶« 1 ß¼°h߆~[ ±aã¨8¼ÊŠ´ æLüA‹°ó=Ú§CµÓÖ«ókfm_¾²r³%‘ÞA7VZøÓ—(
„j±’'Rò ÅÚ ³"US<× —‡lÈ}fòÛÖ”¾ÎÜUaTˆ -µêªÐ¼¥äãúÐW Ä'ˆ†c"·cjMR¹‚ÄR=l• ù˜ Êa†ÊNÿ¶¹3¦](§d…½p”„јa…pPØYÞÞýñæÝ)˜ ÇýÇUÈ6`Õöãý –-Ü‚û–X& „ÕšËáb‘#ÿMÑ5Á¿ûTYߘœ]¶š(h8;©ªžõºcŸM[ b ø Uèž$J H=S©½ŠfãaþLGçç„°ž]Àá_º3N¶?ÐÈ‹·ð:*n¥Ä™í>ˆ&Ýl8Ñ føK~´o B*àKOoÜ—e±5cìÄÁ:[QÚ¯›8¸1_
Vi`¶d„ °-‘È/âÞª ÈÀïÄ©3ê¿› Ï é½<®?G%„Ó•ŒóLf»9ß×e¶%Dš†æž¯Íh[`óBð\&†aÈF(9§G‚_|$ &0µBÊN CÜ 2FŸÁ‚Ô¡¨Z"± ÁÄÜ PPž8n5ÎA5†OzÓzϯtËB¡Zó-)Å"ŠÂ¤ÍTŒ« ô
Xù,vÏ«ò :+rÏܿ옰ûŸ³FŠà…ªÎè1ÕÌõ¸ $—ê¹¾R6Ip¦5ºnå=`>³b
±FgÈ1m˜l¶’¨©ô}Š}x1 Óà/fìƒkj¨NkÚáà½H ô$)Ó‰™½{â ±v¯|Ï[XÚ’M% y"cƒ ©Èö°ƒà ÷#%A+»ÌÍ WvÊã[Z5&|¶1$¶ºóô›5ºjG‰¿\™·£¡]V5œFÊ‚ºÝ|g M^ù6Â>Óû,<ŠÔ¢”v¶C°æ®Ý_b 3¥²‚ e… ô0}[ç4#±ÐïÞ±¤Š Ì?vØ9èƒdh¶µàM$
±8h°ž¯Æö
v ktÕ~Ä ™ :ôC– Z¢5lÙ
æÎd1ê =NS%žÈ±`á S °NñŽÏÙƒ ý4Ïî¹ÉQ “—ºÑ†mÐu+Öw$)=þ†ÓÃ9“â
RQ'¦Ð
b‚ÑÎmÖÜ´ÈF›Ç’ßIU Ù—0·b˜« }^¾ÿˆïóäb¼a€ûÂ/è_J‡Ø{q >?nFŽ}¶\<¹,ñ˜º„øòü‘¤1b\!aPøA [F. 4ÿU,š.–D^´ñ´qCY]L:¦9è'…ÄÈtÈÁÌ5Y°h6A[rAZI)¸ÉØÂp| Z*Bã´¦ê\1ÉþòÈgiì‰ …g÷õ䩈úÖ¬ ôˆgŽ7S¨›Šú"«[ J0™Š•þ d2ÛÕ¿:cú®ÜòøVù¿Ïí ¡„ºº8žŒiø¶ñ®ÔYhÐ.°—`6`vÛ¥²-³¯HZóºþÛ eœ,q’pæHþ³ÍÈäå™þ>Þ¥^ uÎ4^À!£àúACá‚m…)´ f¡èu{Ô ºcù©Šå˜r)zîÒê¢Þ
Љ™E´YÜ“ê^î |•oˆR<àèVÝ-ÎfòFðî:Á>=úC{ hÙ®'ˆúzBR>ÝŸšæRÍ(œÓ[CQ’ræÖ-²Ô8Y•‹Ó…-îêXÕ9™¨ã‚½¤èýNÝ}I9о=®æíE¿/ÉiÞüa:Ø<×uBÊEõ!ãÐÞ½ƒæž‹EÎaY×Q¿_E™u‘ì ãi5¦^_ݜˌڪê‘Çý%=ÿéÕs/€ŒKi
í’Üù–頻E¡÷|yᲫXÜ aoÛÏñ¢ù Ð OÞ5yF*0÷ °l LPœî‹r»aÊùª‘«šKò׊¯¥W± Òíyÿwì±ðÌÏ}‹À%ÆÛùÙNds¶ÆBîY÷~¿/ƒ7• òÛ¶ žÚ“Ï©É •Ð@ï ˆáZΆÖM!ÞËŸÿ {ü×úíì¸zXXZÏ k»…9„ Í g!û÷œèèfc3 VM6Ãå›A«"©s^«â! D‹ru·‘sO7¶=:E%lzº£¤WÍл[u˜œøZFºæÈ_ú…݇¨iÂ& òÙ˜ ÜÀ Àc,G÷zy36A&Š£¹ñQ]2·E~J åŠw —Ç^y¥VíK@=úº ›ªÉM܃ÀäË)Ô$3{ÝštÝiRF‘0}©E»€T›Abv ÊÖù±ˆ^”±}ÞÅ·»/š„\uŸ¢kÿ^%àEæãJ‰¢¤›m›/ ׌ª~Û튗܉IâÐU ’1OW™&¡>è!wLÊùÈXìj¦ QO°àäe®£09í3¾HVwã‘œ¹^†vÍ^÷,ŸxÑ%}Þbú‡tC5QÚ±·ÉxœRß‚äÍ{øÍ¢üaÒÆr›í;1ºN“
9ñR‡Úum HKøž¹´&PI#¼ÜÞ8öh•mro/¦†$Ù±
‡vT!ÐöÜò&¥(ÖÉ``sÛMm£p´ˆ“¡6®óri„^Î]Péí åǧÖbÛtJ!XPD6øë 3/• giOb©-õžsØ´˜’Aº‹úÇ)bíÜí’Á%¯ŸÉ—gÌô†ÐèBBú@ÒÙ¼ùçD§¬~¸›ÂãíqtÒ—Øδ ”¾ÃwÕ©È[Çþ›wÃÞß›¹ˆ„¯×ÎmÙdt]ˆO÷l—Í05 ›,ÆÝÖ Òl7Aç]enÜ gX
s›7×à \¶Øƒßž°CÌú+#@päÛw¿'ŒRW[IVu$éyn¬Êê!Äsº6Z«‚ùÜÈË[¾&/ÙTax!PÃò „[óì©Îa«Ñ¡"öwbôùëÁm%7Ò,4( ž´LM-9lÔœæÿ^5‘¶ÚTmku“gUd¦íÁk¾•|H8+ø)Ô:Ñ·ž&Ë ù~-ŒÔá~ÿ×s˜ì[óŽü “üµUòüTWLj¥ÿ¡Õà‹&• Ë•tæNv+8FÅl÷×{D>®‘Ìw!x–öJ¢ Þs'Bf¬fÀÉ©^a Ût¸M¿œóg¨CçÃç´šp¯ÄåÚé@ ùšèÊt¢½ÈMeþ’VBê„qýjü=‹ «DꜬQûró¢ˆW"®¬êAËUú§éëÒB sŒåðW:>Å>Q#xoÃÞ[¹'_åOzU]O¹–VuMQ:N¾{MSÇÒç0Tu*”>ëƒåÏÁIL«:b±cí5Å™¬=Å\ `]}íp8!OpÁÔûºnEdš ¯y¾·ünãVåë¦l{a¼ ØÌ^¿§ÍZL*gë=6».ç‚Æ ¯:‘á-‚¸ß.0«Mp|æßînþþû?åH«endstream
endobj
41 0 obj
5523
endobj
45 0 obj
<>
stream
xœÝ\I¯ ÇuÞY&«,òMîMôÚ50´Hà(°á,"?ì,8‰ºò¥HQ¤$Ç€{¾SC÷©êê¾÷>š `P ûU×pÆï Õß݉IÞ úSþ~þúÉϾôw¯¾"îþ
ÿ¿zòݙܕ¿ž¿¾û— ’êNÊ)Z«î ¾z’ß–w^á?9 w÷ðúÉo¯â”‰‡7Ç{ð³–‡G1Eo¥Œ‡—G=éàãáÝñ^NFY#ßbd“ÑþðuiD ‡§Ç{5í¬ªcŽeª4àÇ£6“b êåCç¥>ÃüOãó¿9*?)oùDó+?Ð#%\}dƒ«Skls:Þ;¡&åÔááh&íq>÷K¬èÃ$t8<Ÿß³ (SI{x‹‡q’Ú«úû`=(¦*[úö¨Aæýá=C½¡ +óòNšJšˆ†züC¸Ã÷بõfÞ¦dÏË9¿§w܌Δ11Qk Êè°ÌÉöt¢ &ÀÃÿ~øÕmÔd|„´<¼€„,û¬T²óÙ åìJ€[u€1 S}‹ ÛT¡£‰†ÏÅÆ2JV”fT£×Ît 9imùk˼tªûz¬{ 壕Áþ¯¹ÄCüœ®,Ä\ ¿>BMDòð,ŸÞçjB ùº:ÉøW4#~/Ca€5\|»¬Røë{‡ôÂHHq£IŠj4ðAÑP «ñC–Lì-L'2H'ëîî•«D qw˜E…ÆþìKB: CŒo±ï ´Óy¬Šw ;RÒXGú"±Æäá/p pN˜<¼µN>ÍlîæÑÿD; VÈñNä„™Ôµ;±Ñ{¶“ç°L€”£& ¥›(¥&âA2Z wi… »=¨£ÅÑ]R*LŒJϲ€Bîÿ &C([
˜¥²ÕVÎ&dÞíáçLJoV‹Þ«àp &5Y wê¬E}6ZÒêZ"Yçÿ Ò„µÒ”Lœt““jVz { <¤*T)oÒz z½—zRÁs7xZô}±áÌd^9£f»G ¨€Åpï¸A c'Sè§|@¯åPV^<ýšy÷ógDZÄÛÉ_-ó ;÷U¯ÊÕÂÏ '¼•ƒ-h p.p‡DT *ˆ±ôû=`°rŽ ³±= ÓÆÏQ¹º^Ÿ«eÒäâTˆ 98«„.¢_¸m·¦{…ëVòq»*à°‘j¬
t ApØ@XV¢iOÛ8œÀë]kD3¼¢Ã§C{AÓb_Îw:¤À? TR’h’5Ij¢ctYJä"Æ‚4Ѥ`à‡#ˆ«‚´ƒ%!SöøÙ
¼5<%•ÁA•™|”†ˆšE8oÖú‰×~?{ûòRƒ7™¿¯ŽÉwÈ8r¦¸åÜ#Åüžg3÷.! Rì“ÿ±®Óx5&ßlÓ<â9W
^EÑ2¬\,\ÇF4S WÙùP""BÕ\Í|Šl2ã>™ vüÛqŠha™3팪Z0³óæîHRËH¬ìåžv÷£±q¬‚ §£š`~uªRbvg¿Àz@:á3蜓C@O”t`×óµ=Ø™É!¬öpJs‰˜C5¬O”y‡Â(’Ö¼T oW—OyÏØïrt
$PÞÖ!…'4¥tÙk<Ïô˜4¦Gê¼ÎùùÌ1e€a ‰y$“#$=‹=oF‚%j )8ô{A÷p½2#¦.b¼NAqê$•u ™RÅíBt¦Ù:AÕQöÃ@9³©%ñ^ ‡ êÞ¦O]Þ¯›zA{“—š+Yc2°‘R OiUˆXBE[çcú#µî 4–ÂrùfÇnÒ„d{‚JÒèôóœ›*b¿Š>#&wwšè†H1ñüOm˜H×É}r!‘*Ždh΂RºÇ= §6Ág›L„7|L²xcðŒêÄÜà8éÈÆZ¸Å æeF+™‡"ÿš„Ìx¬Å¿‹ò¸×"7þȸÈd/ýä¹ÆÈ–¼g ó)YŽ³ux9ši= ÷]L)ÆÞ`Þ
ù
ÊC¼ÏC0Ôš&ŸžSï°ê+ù$ÜÆäSFºòÿ'lѧ”§;DT&z)Z‚i9ÍÁœßvíåH áÚëà¹ãÙØÒ 9²aâä±qÿ®D÷uʯT5öé´8ñ¢0T7»ƒ¢÷`Žé¼ñ¸p©ô0§m$×™>I×)O§,©Çehb@¬ò‰ü2ˆšûv†¦ÃÜœ¡1*Ei]†&q ~¢B Oç• q¼ü¦T¦3ÛÎÒ²2ƒ˜ƒÊûHbŸ{érI'ñá¡ËéW6&uïi܆ܞ:©ËAóNL YHÀ‚–¢ˆê ±~í 03Ì–çïAgÊŸ[Úr¶ÉY*&ÐXÅÓ‰‰ð¯&‚Îá tc‡ú{ò÷ó O‡2´‹ (¼Èu랟RNAK„ÉÏŽTQ&‚O»°^‹!Ø‘ð1„æ)>«¬R›âjdÃصè æe€£›…+„Ma€ Òó,Õ¶TK¸û°À2Gëv]c= `Ø£êõ
AÄ—1ÊölH·Lª ™TC¦¢"Õog6.Bø#åq¬Œ‰#Óìëû9DZ_Y”6áâ;½0ŸÂ=¹‘okK)6hƒÐ¶vžÔy`³Jp~²¼åáqÕs¼s×&Y^Œ Დ´‘Ðff™!I’ê\p— Æ×彈]· M.Ç b…®oÚz9ràA+G¯Éh(‡d6â'W”Q
ëuWÈŽK+0Ù5ºÚ2 Ê¢ÍøÇHóÓœK>e‘ñ1¶¾ ïÇIˆÝê
[Ø@y5™6×K‚FžŽë:I_ëëê$¥
GoÕD¸n{áYwÁ[nc rUÃÛCpôãFÂlkÞ&+(ãíˆy–°Þoè‡ÕW%‰=SÐû»wäsò#lÄB.oZ®¦ã–±¡r¿ Dk°×VÚ¯NG!ÑQµÉj¡Q0 C!*Œ
"²Ø¨à+W®ñÕMùd|:ϸ΄
§ 9áujÿZéÑ0± OŠöœšü¬ã– .bJÑäZ7ûŠT{ÖE¾îδ3ðV¹egæðŸÇ áÔ D¯1Õ_xURvNèÃùôûŒ æDÚ4c/•3ûø6"”lô|é3QŠ7ıúÂjÐhSβõyúxf‚ 0F¼ÍéeêÉ sÜušù<è©Y0•‹j¼¢e[©PŸ¢n.DxÌeÏÊzz¶ˆç9h™ãšQ0Át¹Ëœž`jÌå1Ožyý!™xXvâ™}{Ep
¤¶r'BL1<—„º1”8B§,‚ÚÈî²\Ô&:M°vìÅÆ! U.•}q%‚xÛabiÄ §“×Ë%XÜvð2¬bùm CP=V³€î)ý\ObÂZ×n~[hi¸O,šblšÙîë†nhëdÆñùŒ™ˆ5Æy•Q±·àО«Å™6éT<œ×ÛyO&åT¯”zGÊv1¾˜3©»j[†Ý ©Fº“Å,y›•IéÇùH¬ZÛ›£›%˜…Šç&Û°¨Ê(Ÿ{_§Á’¥Žœkñ@ZR ˜H Ëce¹~ ,VªôPxøwìR`eò…ÔÙhÌCTt¹´ &lp^ž’zà¼R'M™Wx ,ï¼ æ–%õ³ÙDzr. °îrtQÒ?¿5=åN?¾jvbx‹uÕ¤x
pùÍ®RDjz
bœƒ†doG&¡^ŽJ•@7ÂÐÜx³òçÚcäzÓmnä¤)ÇaŸR\QíÜD¶ _î ö™»É’zë¦ ãÓþ]ƒ½ „Ë¿ÿ%‰[J:}…EveÎ÷GŠÌy²šF†Â%3ôâå•ÜÐz—FäÆ(sû;.ü-.zïõ±›¥Îô§£±!] ü[B¢@ªCrÔ>ûF)U%Di¸»õü÷™<Ò›žd ÉÃ&MIíºËKúM(µ×#rÉs>¥%Õ†Þü õbHåÅ°®F}VÑÅýcæ»k Ô$ é´0"ߊùtíÊä½×cা ¤¾B¶½ /ª¸¬‚sW Saîærz)tÁ+‹¯wÊá㊬bMÕÏI÷¬×c»ódïW“;Ú¬ü\jøsyíOX _±£Žƒ´ÒC> <öW—b
·5(ßö6u7R¿ÞSü°ÓA“ËY±VN-î;µ?·ìгѡj‰dëPèt‡J-q¤ñ„8Ù}Èaîý§ùrÅàœK@ ã®F㯥f³D_3œ][é /3« ‚ Ò&nZã /§Þ. £n2K›}Ò"¹¸yø?̵‹YÏTtsÐó¨‘Λ¼b¹ñâ»6†Mmâx·‰ÏwÜO+×>ó6 ²êožßQÂtÔï1¨Öí+s9-:
š¢cÇg˜‰ösW–Ïp•üý‚¨Í…ÜÜWT&ÑI6}|îÒ¹½‘.7e`¿“½(§EõuÉðÕ•ÂÜÉÅ‹¬ßn#Åc¤J7l–wÞÐC“rgãN_©¢v)éÀK˜i{>5t
ì‚z$xFyñVW+ÅÎE|˜ áúÆØÃAc‡ÌÅš¶±ÃÉaë&¡ËëzƒJ‡*}{DY?íð"h›¹¬
d,1Ø\»¶bÕ÷–»ˆ{ÍøIO›æ¤QRn¥° Ö²‘k…-)¤EWí'ÂæJ"nôõ
ö Þ‘ô=Õ†÷…¬ûñ»ÄÞ¥ ö¼^i,K9î$(6¾³¿áØUòÝÕGŽ%<µŽåzý Hàs «0îœ_ 0S–ÏÑeŒ&éèn•ºgöD¦VÖ·œ¤Y6®ºæ1FþqZàí FFy=´ "ÛŽFŒv[Lêv¥}Iä²;[%Ù=öàCi KSÔ˜Ñi/Í0W˜\ñ
_i.›]]°Af/F™ùc&©o>BWy±YçºÄ¯ibLcÆ|qåÊ„^0µ2*Ü _߉Íw€.ò¦o}üÚž_Òíb 6&cŽÎ«e#0Kߥ2z,õK÷õ÷gŒë£ u öþn ·Þ¡Ù•‡wYXh ¥ªxlÚ?Ç7üØãKE>ÖVÉpÁûR%´×9}S?†²vú'æs¾ÎÓ%ÿ¥€MŒ]wçÁÕ6JD7YÓãcö͉U,g›ÌÎ/¼íë}8!…!k€Ý X~1OÞÚBöð±¹¼»ïš|Av‡+ë\üæ_¤ Ùf {MSÒÈÉíu×S•B+7u‹J½M#/‹€F”ì=îs誩3Töß/¢^KµSدûzdϵnû‚J»m@-·iœÏ¥ÿš®A¸(5å©E߯¸¾s)g3ËЂ2wdhTŒ5œˆª2d‚ßwY2äŠÏ…öò žPuŽ%„.• ®ì +Ýպ휋¨#‚KE±•è¹™r|9q~\óÑ€j&ÀìëÍÄEÇk¬DøîÚ6LO†"‰~(„åMÓäd)•òù.")½þ×”—Á…D— ƒï.Ñæ(Š»\²Y”N¸ôdí @lj}Œ êC-Þ-U˜”rtÍ.:tR£€‘Ÿµ;þ¿mç`'5ýUð~#9d]6rJ_î1 C5ø–Ž¾ýTž‚ˆYeüP¥jçjG—(ù¾ÙÉ$¸¡h+¶•¢RÏ,Ȳæ2ZeÒ·ùd]PËt¼÷嫵!$P›f}§ßG ªìTˆó7YwBÜHâ]¢B( àrBÂ,ðÿónœÝ§Ûqã»Ød[圔èë’í1eúŽ® Z‰rRWÊ5÷µð–ÆüWâ¢Èå5„
\.Øü¯ŽôEW¥]åÎþƒuy(§C¯³ )RùK³ a£Â÷ ’ÐÅGX+bÒÞ‚ð˜tà Þ~¬ÉÒ&´jÅoëÁZMó<ˆ:3PÙ7 Õà¸ÔM®ûQ|ïÚ~äΧµ ÆZÚÕ{S×î1>m?¿æÕcð§)÷íúAœÅH¿S¬Úþ
¦GµÅ ~'
€üØ;Ȩmþè/»›ð¯OþþyEaÙendstream
endobj
46 0 obj
5378
endobj
52 0 obj
<>
stream
xœí]Y¯\Çqöó âçÈ@/ž‰9‡½/1ô9J¢À"‰HˆD‘9òÕ½-/ùí©êµúœ:gæR”c!k4Óku_U÷ýv'&¹ø¿òïÇß\ÝÿÔïž½º»ž]}{%Sƒ]ù×ãov >€FRí¤œ¢µj÷à««Ü[B#9©°óJNÂí |sõùþûƒ™´·ÊïŸ Ä½1ìŸ ô¤ƒû—‡£œŒ2:ÂwGüŒÞ?: Õ —Ý__ã×0êþ d½5ô×o°§LÜ¿èƒ_çÑ]Ï ü®ÙÑ5G=™ påžÀ:€|ð°”ÜXŇ…”ØØOÂGw°ÚÛŸG1i+¼öeô"~ÒJh Hmÿ:ïÔYádÛJ° ×RMVý~+•
Ž6¨”1îO7
$öZÒqo±™„1ülHa ²Ò og‘‰et b Uœ¤–õW\ÊãÚŽŒ}úî
¬HÛ4¸ŠÁI’ƒ¦ëÿ
—cHM¿.+ÑÚ§!„Ÿ¼ß¿é#äU9£ÈRžà\@}ØPF“Òñì¦oÚ—·‹ù±Sæ&cõþ~ÿ=Ï L]”ÖAK˜4NÊ©ºcB?5xR§BÞ8JØUÀ¹úvçLH.ÕÑÀ”(¸s ) —öáÇW÷?þýîõË7O¯îÿ×N^ÝÿWü¿ÿã·ð¯ÿi÷‹«>Þ}²ê½ÍY¼7ÃÕÎ9 &({og‰zGË|ðAعà‚ÆŽ âZÔœá ËîÈÑàKצFÙýú ‡+¬dyŒ ÝùÿËùä\ÿ åÜ€ÇËš¨sì8c6öÀ E'xiÅŠVÐV; ¶~n ½ƒµ
ZáoÀù"+öÀ“ú³×² q® Ý…b% Ïþ ¾^ ‹þ9xdã²ì\€‹N¥2¤XuW‘uÅO$>5§ûñôá£K~÷-—–Ë©DmV¦` <'PlªüŽQÓm ó›ƒV>†ý—d% ÷{áFœ›Œ]
¯ ö˜¬âcÊk²&nŒ.
`a ðŸ9ïû»
îis`Ðx"ÛºÁmG ±¦1ôË!Bî$€¶`＿ûÆpÔg=îÞ² '‘Õ4lΫ¦½ò 1!TLïÕÃöçÄA…ɘ®b¦j UÌ›ê6¢ˆäÌÕí(®X¶ËÄl& tnÏ"Ë@ É£Q(X2ÅÓŶ UOCt
B!€ÜjÌ9]/XV%t]ïß¡ñ“
"mv‘‰Ü仃íÔ f½a8üÞ;1P1HÙÑ øõm¼…eÄ/4½b
«v×o0Â]œ›º Ì Ëœ @¬D›E%JP
Ž ´‰‰ƒÞ:=ëÃ>OhYð.6DðB âmˆ
Îúz‡
ÕàA¤@Hÿó$0µŠKÍ€Jf@ èQ÷vËeOÇÆÉ´óÙ˜e£Û üÇj»Ž‚UlPKÚŸƒ¾ªAIßâö" ®t3ÄR
î%è#AÔ²Å`|^´Q¯Ûª8ŽXQQ¬mŽìnú¬0.P ø|ÿï0¹r0^Ý(Šðkj‚`Í«–ÑöiÀV| 5Ô¤‰.xË@Wóº5€ZA´5_Ø¥´¾Ð\Ø"5¨¾wæ Vw¬5Ÿ+Õ„+sJ1=paRŠõ6z+Nø«%¬Ÿ¡ö õàÀ R’{`r[
ìu|t!Ú°x.ôuQ ^×ËÞ:ŒÛ…Ž‚ëõ×)Y&Pðü
ZD£D¯Ÿ±l¾•)§ ˆ{ÏÌPqà µü´ö˜e1Ý&rZ$£ÛIÈqú²m“ðÏëñT‡‹s…•WÀžšÓS·sÀv¦õ 3«üèa
eùÜEmºžû©ç‹„ ]¥ýõ©vKjØC‰}êß‘^›®uÖÚ0(0‹]·Ÿu[]³f‡Ø’ÇÍq^Øðš?Ï
IŒÆ¶³OÅšÁ|H4ìÔz(::ÐGŽ°n×LóJÜõ…q|ŒÔm¿~ÃØÆ9ž6}¹´¸AŸ3 _eá‡Z…X™%" SaœÍȸð}ò’D½‘àzÓŽ×È16wƾ¨£‚£ZˆžqaF‰T‚ø¡]!ìþ‹¤] ž âë4¬GGȃ9”Ñ«>=ìB ¶R²‹°†(¶9„ªyÉ`b_ÌåÔ¯ ÿ1!yAÓPo:°á„¡qmQ^ù5Ø%’àèìFÍZ=û¡Þ$ ˆ¹Ð,¸#”ã¢~
)é fÈØqsq,DVîXØŠsõ‘ ØÊ <Ò5ó‹Ào6aæ*j¤—rú"× ËÏÔà
/X ‡½L›ŒBG*àÌC| ‡ýŪÃ_7áÃPwî¡cdò
OS“¯ ÷ߪAã“éŠAŒÑÏ h,²‚0j둦©ŒJƒÅ@]ƷŶÎPňæûÝ”™Í1Õùˆ€y-l.ë‹Ùc]O>Mhòä¢ ‰–¢kY"n "5xkZ¨É½W³î÷ëŠ&’Ãg‘°ð` «Ð¦Û .ž™@-+iVi/û`©L+` ¹ä.ÁSñëëηËUjÖìKZ#~–ý=4pNÂ~NsjôSï¡ôÀÂAÞÁ·Í´Æ¼Æ9Ê3Ý‹¥ŒÙIÆ©]ƒ êIÓ:ÕÜ$¯Õ ¿š×šëEà~hwlŸÁ”RH:eÖky³>í FLWê¿Å¾3œõ|A+¦Q°Âã ÄKq;>2êÖ¡¡òLì’=—»Î²ºIÝŠ!-»ÿ<ö&¸W£¦^ÖTª×éuo+ûG;Ê` ¹@¯ÒîŽàjWaWߣÂ@”Oñ[/„'Åïusu3 H„ÀE¬§C[`͇.§>yGc;Êö!U£Ol19•$>‹ãÙ‰MÜ<ÈËqóYȽ $8Ø» ˆ5oŒØrÂp¤c ØjíW¼{‚Ç®z¤x~r, _…,êl½´}»r;«`8`h‘ߘb‡^F;ÎÕìg3%V:7f{˜9hï8üÆ%c•1‚uĵ ÄŠ9év
uØ ÀQ¦Å:=²LèŒLJ{Çe~tŒ†üh^Zõ/D¬ ¥gŽIk¾œe.$)ÿ}ývJÕ õYÖ¾S‚ œ8Ð2`$ÁELå€FTè´0«9ñu?âqUܹîv¤\D…Êtþˆ¨V+_š]/aÂõ šƒv°n%6ß®ój¶WYço |q]¯d|4Úƒ#Ah!ÀH¸EÍÂ(&„»jjõ8G1&,™ø\£Xmê Ô¯>UÉ®‡ ij•A€ýÁ/“¬¯Äš“Î?•Œ¶½[©oÕž1:‘qCü¼QÂ<Ýp$¾.‘ 03W¶¸à»„ÆPƒ;ãàCcp¸žº/ë>ƒ‚u+°–Ô&5OåÖ Yê¥@{ªX-cð–D3m!|IÃvÁ¢åî[š#¥.
e ¨Î^¸ ˆtÍçþd.Ø×Ç–qëjá˜W3M£ ajQÖ"°?Þ*†ÌÖyyÒ£Ž¦óɹ6 .ÔC™MÌ·[M¹‡šVóãÁ‚t¸|>¥ª\Ê0
wM<°bØé(1†þùîšø4¼%åªò³ ‘0G]Š].áQ.ÐÑ.óKhcu’tù¦ ^-%;Lí––;‹Õ¹6 µVp&ðÁ¹VÔ¤Q9Õüæxñä'{U*uúïÄ B°7•#Õ×ðÒEˆZÃú=³aÕiFîhÆýÀVsÓ£§}Æ
U°gG®= gÎ1æg½ö€ÓÂ4^·«ì‹Â;;¶å
XS¨qjK‰J<È®¸:ö¿Áçfle&‚9ÉÛ:kþÎÇ uÕT5…¶~ëA¹tí¨sÈœç ,ñ!°
Ä,`®ž*Brs¤øš½í(’ðÎâaØkG³ú·¼%x~€{NY_Jšh"®1Ó ßc¥ìÑEâ%<Ô³%¦Ã9e
ᛌÊQìø [ÅéõuO,ñ™ˆk?+CM…j 2±HÕ?\Ä÷¹† ± . P _wM×JPf=Tœ—§ªtV½ôwØ~6kÄËÀ{kO`šÕ´vŽÝWÜ¥Í!'Em×ø!šºäÌÍíùvSÅýö£,Ê@ÊÇZ®‚ \o /`Ü
-ûºà+ órl‚x½F@ mGŒ‘\ÏûYálëΡ ¾).!‹ 3ÏPsåÑؤHo€¬Ô¤º¡2ˆ 8°XBüÛ–Z ušæYºêC…ÓUÚ;ÝBH‡ŠzYx”ðõ'ý3æ,ªÈ* ¦; Ç]tÁ( câ³È1Ù+TØz¢ÛyÓÙï V=Þm#Ó>|8ÊY![ÇD€(ÐTàhFʲ#ûW±x3« ÎIãßí†*•h •8=éÔ=Rá6õ-Måkï‡óAÆ(ßíz€¾Î€¸KX _¦aŠ¡f–ñDÌû³šT Ìh]h#Ù‘²Òîm³Ýkci1„}«Šÿsõ·¹61¨ê^^T Š•ˆx0Èaš¦»ÈÃ:ª+¨šír~™OÿŒYfMzK•gW©l‹Ï‘ÓŠG¹ÐL³çž>=@ô$ƒ[«A#z‰Øƒ17”µ¡ÏK®”ràì ly§Ç–ø
“k²L2 _BÒµè¿ø.Öt!¿© Ö3“"²!ÂÛÜ aƒ7”ÙßõH“±VŽ|T ñfT?×µ ¦[\§üDÊ»±èÜ:6t AX8Š›ËKÏå´ö CÄÃÍ¢›
)ç@ Þ€ ôTbñ¿†æ8²¯
a±"N~¬¯/•
š£,èÓ-ÍÀs(Y0†>÷5Ìå¦i™Nb 5yPΞ[‘N‡Þ54¢Ð]!>TKÙÇ5U“9ôxx K*°…MdÇÕLzon
ëtÞl1Cˆ*®–êwøö€Ï¨Å;?•r=ü/çTö¿nØ·ºÙ…÷³ôBÇ¿š}š´”ÿfÑ£-&fnî'õT_ð!
M;ÍŸ°-7‚‚7xŠÂtî
¨˜Op•«j@˜_ây…§¬ ì2¥Å¿½{t~íö2ñI ô5†e"𸹕øÌcàúÚ¹UrK5¬4W•®jØ_Žvq_ûØ•ñÛÜÉÕwÆ)†PlÛá‘Å\Œ¶‘¯ÕY[àۛƼ6àÈ•µ……aÄ
c¯ &A€† jtҲܱB0–9Ìý“Ø ÌüÅŒ5¾¼ C¶Å…ñ7ßsHR‘séôN “*šÞ¸"Ê›(šm’mˆ¢ àfQ4ÁBzÞÓ#ïvÊYÍ—‘T¥œ½êÁì¨+Ë„| ]„|F“ZÆ{¥lº•9œyû–b
=–%G;rÝ–ÒµöçÐf3Ò…‘j˜]
jŠb(nýcŽjÎ<þî—‡aŸR ߉g¤íáa^êá-ö ˆvõ‹~{烯B„ ¾Ú¤Éæ.›9|Q#o0å~´‰xÿ/Ýà“÷¥ô‚·øäÆUmª‹ÄÊðˆB/‘ä Êá[¡9¸ªM¾<`VOyq:Ð ¦¹ „|©àÓ«°y6¬§Ð&»¢eUŒ¯£¦).5}•’˜øxÇcd9f ÆÇ‚1üVC¯#¾Û¢œ„í ›ãºt®ÉõøÄl ½Ê¾ ðÒ©›ûH•ct|G¹ý·i[ ˜ö¢¥ÊaéÐI¥k¯
ˆœOä#Yß«|y“ß00ìÑKÛvÊ‹Žõ$}~žØb¾Mô"“¤¼{ 7:WÖ§Ï!’Å=ï'ò4—Aˆ”Í."JF%s¡í ѺW® ]Ø Ê´l ^«R*Ýꪜ{ÂHßg˜T'3æÓM7³Ã‹òƒ%¤j²6.YB^¢ ù–ΪH¿aVÎ\˜>kÆùðiEÄùTõòª• åx û&«äÖxk©`-Ê$˜¯²7¡Æ³þíÓÎß,¯K¦!'ȺԵzS"•×DìúÉ?Í—met›R•¨mÿ?¨ä€Ø=+Öשô4L6–j¢Ì1‹“AæÉ æ\„2åBÎT>Æ2Æ’~\^+ÏoÕ˜r ÂàÁåǤ +Ìû*;NàiÕ-겯úùQ_áKl
\ø=Ÿ÷Õ–™‰Rý=‰ÞÓ¤aOÑ2YK?5Þ®é Ð/aT NU±i3`€ØXs”´FH R
—òŒ¨o ’3 A œx‹„Ý“¿OzC£ò¤ èE è¸*c¼äw¡øÐ « !²óª´wb¶£\C1,0(ã8»ÖeÒãI“êbéÍØex.ì0rÞÄúÎé0zŽù0Rf<‰¬V|§Jœ?ˆãÐãä½î“㈹x4Ôâ…ÊZÆ3.¨–ñl-h$}º 4X¹!g,‰øèõ¸ÆÉÀMÙH•zð¿ÒùÕë—ãöÉÛªY*¤½ƒTÈÍÃ`Xh<‹£±2•‘–3¨hGQT„„‘[ƒ1åÇu”ˆ•tÙÍÑBo…¡²š=ÙM¡Ò
Iñœ·HºÔ•Ì¼ÊáNì“f.•; ûy¹ë4^“;GY ¾c=àòž|k^‹Óм–™ f¥0I—ÌŠ¶òÕ‚ÊoÑæÝ`Å…V–¹®è.ZyÉg‰LoæÒ½F㙑5Îà´Hã¶0—lUxãݲQ »ÀRGÓX˜¦“‘uà1Âq}jO<îœ,½ÝyC‰}—Ø*û ´¹•ÄI#MOÏÚÜÏ™0…Œ„µ F“ì?ÂýXg…%{xÑ·NcÂÓcÖ›ºÆäZÂgM«ºši5•’¥*ùô7
îâúÈ¥ëÓcŠ7= [¹ã*¬$ðŠòéVCèÊ iX¬áñxƒ;´có¦ ¦ ¾=8å µÇ Ýa¿.§…5õX…"áGŠÔ¥Ko‚önÄc/ñ‘1CÌAÏuÔ‘)@1Ç“éxIÃÒ8Ë:êß!¯c%åÊ˸G§þm‘d¼g Eº{CŶ5}R–•+ɆìT8’›v&‘‰Û\6/œ¤aÃ"˜™ ‰”‡pKKƒ b^Ðg{IÝYaq²ƒÍçÂÆ
m9Dõmå¡Ã
‘·Öˆ7
~· è»,±ñÁóyœÙø £EëEî’YIE¼¶„ør”æB™«]x¶J9Š\ÜrŒÈô7r°Ïúð$Á¨ã•ý"aãZê«—Ña šœXt·Kn†…lÀÛAzûêˆÀ|I"ýÊÑ£Tÿв¤ñ#ªx¯d·ä8 "$gê(U »à’¦=µ“óå#¢–g%°Þ¬qºŸ{Þ¾±§Xçõò(ÂJS³î0®Fí¥ j’“ºftÏ ýá23kDÀªù½+º/ClÂ.Õw L£Gœ±;ñÀ öŒ aBÌ=
ߺÐë¡Â’@GñàÞ” H1©8q&’ÍuKß^gG¨
ÄÁâ‘j˜±~0
cl*¡5
«Yý Ž€`•›.œ³o€ùwõÐÝ<ýÞeî鯇‹=:Øtà Ó{ü'~ F%¹'ú·xm䜹¹%&q·(´ sÏ#ÝKbîŸDÄÕ˜{ ýÿicn¼Ž`,òcJ}ô|Ê ñ
ž¾`-)Q`=@¢áÀ›…%˜÷K÷¾ñF*K½o"”d¸UŒ·~\(9œâÇ\enT5&FÚUÔWÙUÕ›À{Þ=š]!šc»ª™Ij*½4éëc#åÛÇ‹ýáGbáÉú áHÛ óSÆI^í
7=õˆÙÞ·Mš û¨h¦þÿùìÉÂ;ôäžm^ˆZ‹Ý&f}¯ŒÒ™Â#Mžõ^Ø ŒŠÍ*…™Y _-\óe~ÈèƒgêÅ)Í\2C‰†
3]òö“²C6‡¸GOr²®Æ²¸75v3æ}0™(Ü,Qè41î'–]oÊ,J“~»æG`VN«;! ©\ÝÓtM “jÅëH‰Z ”!>eðNRè3æ«w"SMì §õÎî66 l…(¦èñãУdJUëáÊVvöÔŽØ·Ï>ò PW ,þf”_Ñ)ù£—ŠÑ˜¸{ÑÕË5IÚòÉÞÊĦT ~¨Õõ)Áâ•¢ãC¹ŸQ@&â>këáODig¦ºåœÎ ›k ’Žl^–:›Šcõ^CÑ\¹–@ç‡
CʤÎ"-ÀÍh"! ^ÄYcù¬•C‚öúýCz0BÄV¸ =Ußà—Ñ…® œ¢jé øÕØêrì{¡[þƒÎmÔƒT…•ÞµEsÂr@j"l£+åóÑPeã÷3>$ÒK>
stream
xœÝ\G³$G×AG8q 91ƒ4½åºÈ –28 }bwÄ3«µè¢ßNf™®¬êê1Oïí.„Bz£ž2YYi¿Ìžï6òá?éïƒËÕ½/íððéŠ
ŸÂ¿W߯x0¤?.‡Ï`ç£×Z gÿZÅÙ|plTƒ|df8»\ý}Í7[1:iµ^³òqÜl•ç£Sj}¶qj4ÎÉõõf+¥‚™být£FmµZÿ³Ìù~äB9µþv#Gé¬_?Œ_-ÖÏ7lôV1ïò$|úd³å£Zñõ9,¯Ø(yµ*Y<Ý]•Õ&Zžáb´\ÒÍÈÈóðÑðL v& ¥%ã’J:\3½»Ü ?P>Sâ´¥Ê|<Š†£(Ý߉œúº,EÞÅCñQXM >Ÿò¸œŽ|¼(»¢Ë³«p6²Ì Ë ÏAš mþqöÇ•rt¤æì ää[¼|;:oÖ/6ZA~âƒRŽ iGØs5Qú`ÚžògF+×ß’¼Ôë âFÜùš¤ru!å>w?Ç¡\j%ç çR®·› …b\àѶ’ÉaËèB:\’W",ò³¼!°ëº’vdä“Œ(é™a>N0ÍH”V™FM4 ¤ytq—@ãxéHp¸ÏÂ"Þå5f¤M³¿ÞÀÅ;1*ãÖ N³ÌÓšN®„½Žë¼{ òŒû_asEœ²t((îø86ñÞ²>ð
XU& Sãd@yß©îÐÆB ¼2ãèŸmªÕëƒ{ð§Èÿrðú>9[}±ú~ðIØ°U0P
®ÑyËÑ`ØòáýÕ½ûž=yþíêÞ_¾º÷üχŸî<¼µúäþðÅb8Só'‡3°pÊŠã™Ç`Š€:/
¡øSQ‡ÆÊ uÆËÛ¡®‰:)݃ÑnÔ*’w”¢Èt£')Š¥öÖ §("¬6,õ«P— ðµ²²G’EÈÚ ¶µá³ /'Y¢»gp´D¯’Á“=ê³×‡Åµ?z´á¬6ÈÉ'ÿ&š!¦t·Å ¦Ø–†¹5U§h[ìh§mÞ‰oœM–iaCPý`ËŽw+“/ùluö»éuŸ8ˆàùh1.1qŸ°>Ir®«,F"ÉR” ŒÄoJÊQCt
QW Åt /ILYbu°bÂC< ù>F\"±†ÀÙ[ZvÕ„!c|¯(^ÚJ§úòÝCünŠ?!ó(ñߣNÐI’€ü¬+ê ©A
ãò?N¡f÷ xRÚÌîj ²gV³ ¥ƒRŒq‡)ÚΩ€$÷ 0þœ¼ƒ°$ƒW0x¥ê6¼CMVö°ÏÈÔ ÷=úä T#½N*8
+å;HÒG¦¹éñr7Å„ìó˜Xµôýý`n0ˆé›*ú½mK¯÷¸
°Q0u™'À[gß žœfÝã]/[÷Z’ì8‘ýH çÂueˆ d‰}ùÕÚ+CíÕã7k7jT¯,Ñÿå±ëqsöÝ
,³ƒ×JâV9 †QC’M ã³pkÐ|7þ ÚK‚ä‘JÒ‘øÔÀS @3HSGn1y‡êÔÈ×.žm„•&à*<®R i>:1+Â^ ;žQ
¹»nžÄ%bEßMYÊ2JôÁ¹ d˜DV`T B =, €Ã`~L¤ºè˜H%%³‹^‘Í#A Ü ØÁ ØÜîaÅ®"„˜„s÷v«ö&p°`” x{nÏÚ* Wj–´~ļ"öšS™o¢l)Ãs"È/„c¥D™žŽZÅ&@ ˜Í©ü’ˆ1Q Hˆ”@;«lyÖêF _ ¨ÄñÈÜ ,ñvTŒ‚œ© ‰S´«áFÔ1}ˆ_° ÈGPoÊ›Çé\FP- gªfÀ¤;¿ ñž·ñSB,³’Yˆ5T«çš‰³ˆÄÍU‰!Æ…{,J¹õhQ‚ÌZUÐ ðœåDK
þ˜¾]|*˜¦€ï44JdØRƒkÈÈÚ<¬üÏ´*1˜c A‡Ñù¨’ªªùHª‰F‚ìPû¼kC+È6@Ážñ= o § @Ô„<¥–kÒÄ÷€DyØЯʲ•~ff“›ìÛÃb^J‘¢ëæÃDçF®ö·(Z!YfºýÆ<ŒÞJÏ€åÙ‘i3̾Ô`×¼&sÃ^…º¬Ád-Ÿõ×0.Ʋn:š“Y•þ Ns^²¦ÄJØR—˜`¼¥…–‹ç• •‰ ¹G)ž—pZ4é·ü`YåYwg³; ÔäûçÕã«¢üµÊ ¯y#Nˆx‹óÚ[ ï\Ð4’}OÊ“+º)Ô$Îô.ؘ€o6ÂÏ”8!U1 ‚ÑE|Qz¦ÁK~1Ÿ© ²#Âø+A…Rx ¦0XÓz*ºÖôc”YˆûÀìí¦ÛxÐABH}«\v÷^äÞ{Ùk“På˜÷`ÜX¾ )€Y@ñöE‚!c—¥â°U¡p7ή÷JPç
i'T/v%¤Ç¢²¹µ¦
bBÁ´ •^ä
’ëçÛDϯ½›ÉªìÊ꧘î9g£•s¿ÆY‡‡0”xà^ÝöñæU;%¾š
Ärè@²!TQ$^ gŒœÄpºÇÅç±özi:xT!oC?„Ä‹`
Œ;â‹Baj˜¾¼s {¾+Ë\å¯ÝŠñQ‡,Ü£ò.p|’r côØ! ¦{â"THê3 s`÷þˆ"•˜jp
žÎ4ÂØ^bÜ&t³\ˆnó툴2ðÊÐóÊk€dzŒÚ«J9¦b1+€TJW©a/Oé·¸`ZjÅ’ÒäûË r'k…{^´Õuˆ”0h—‰-p€«²Ÿp<ºi
WÞî¥èa
ƒÿqë¿l ˆ‚~žS¾›˜·Çí«»YŒGZ.š(áYÌ) £*qæîº.€¦jć¥X߇sg íR) ÑfÊõ´¤ñÊ¿ñ¡hÏ\¥ ‘ ‹¼œ8ŸNù ³Wx׈¦à‡6
–•vEõ ]¿ªíË™ |gT M™A7@å«þ‰nrb5Öý$ƒ\FGf£Z¥šq¥NÐŒ‰€Ü/Æø"{PI6ñâ
vr’ìžÍaRñ¡—õ Û… s•iMÊ'‡ÜèÕ„íT¢JÍ0é¬xG1Ð9¨øw{EvÊ“^Æ°Ýy=g}LY_7Èå4ÜZ° ’§fŽ8{_HܾêšHZø¢Ml[ál(âX'C‰ö‹–LŒnÿè¸ Ò齩ï_›nÙpéþ…èÖ'à#)NôðŒ—xÌ™ …r‰ífU=”˜§8ÖŒ` ©t”°¨ñÂCxÀ—ey‹$”Žr¿;¢ÝªnAd4¸W!÷{-»8^m'„gØ6SY’ Ò—‡‚¡ª°Oá-ø yð€ £]Šç8¢q[¹ª"ÙåSr«r‚î‹*ÿÖq…µ³ñ.#k´«D1»™
^J„‰}r7±ù¨‰`ó5xÒßo,63Ž*Í“ÔüeU¹'à—4-îH.>]k¿4 4#ñÖŸF…(`Ûâ]ö8¡;7ÃnâÿÇߢüÔ˜äú¬lðô|°ãDí¤˜L‚5¦ 3L'hß‹Šp*÷™¿ŒÖĸnºë¦ö !@Ì/ßÇürþºQ @A0RÌÑàÃ{^·I)¤Rît©_
Hðò:zÛ%[/ZòJœ
‰ºl;«¤iV,#'aKË«•
:¤tЂÛkö{Š;‚c±fa)BR·„R•Ç•† -‡õ͉U“þåÞíVs%×øÆ;N ±€ÅOVÉåw’?ÀÞSLvs\Õ…²’S“འ잯c-7HÎ ~zŬ Ò'#W…Wãfk±ÕÚëÜ·2•*B+s¾k¼×I|cß Xziºô»~%3ÿ¦…ÚˆXÏ„Q“Bg-ÿ¹#«§°‹¿+pXSýFÑ
2– rßoY¬ìMKD8zzO&:´C€sÿç0ZÚÔÅ"Ê°X,¦Ïú.È.»¶i1¼8R æîá߂ÍÅ®´‹ü€?¢"æŸån¯Ñ¸ÍEä)¹ˆ¡/î¦ 17l*Ò¯:TOz?¢ ,‚–¡óXjR=–ÓÇ¿aì./`ù:_Á!›¸Ñb_îv ÔQÊ6Œþ#Žÿ.
ùîÒ– ]ÛØÛÆ RÝ"ÏC‘$òK-3&ßR¾rÂï””|å4J›j²Hq-7Œ ¬µús °‡›…榹h…¼¬-ÅX÷»’uëÉÌ-ˆÖ©(w-ŽG¹— v{6mbµTVhêäõ÷Ö^„R[m2öÜkÏdÜõ½Š÷ŠéÖ+½WY—†^ŽÎÌÔiïFßE¥gŸ*ÑÛo›êÞ˜ýVwN ßgrUy ëXþbe÷Ö_?pÄã
”)_Å8fF'Øà¾{7®û’Ê«RÖ¾¾E8éÍÕ›Äënõ¦ªëÍ÷ëMÓ×1æßHx¯‹n Žxì6”"2¸eæÕ‹/VÿÞñzendstream
endobj
66 0 obj
4431
endobj
70 0 obj
<>
stream
xœÝ\[dGRÞçÖJÀ/ Þ¨F®ã“÷L/Þ5Ë ìe´û`VbÆmÏ®¹xÜm{xà·‘×È<‘UÝ=c!¡õºËUçä5._|™ßïÖEìVü_þûõ««Oÿàv/~¸Zw¿ƒÿ¿¸úþJÄvùÏׯvŸ=…‡„Ý ·Haôîé·Wém±sþËjwO_]}µ××!¤^¼Ùÿöú ¥B0û#|»X'÷?^K¿( Âþ
þj× Âþu|P+Ý}ü?zaµþóÓÆîåNˆ%#±{hþþþêéß~… xRjµ?þxô"×U¤¼rÆ@«ëœ"äz
>v Ý¿ßµ/¸Ö‹qFï
ê|sÆ.zµíÇ[œ†Ãþ]úh´Ø?K=Z#éÇ_Ó.s£7ð¨][ƒÏÚ`_]Ã,„x_´BïOG2î8 µ8g÷ßâkBoËt½q8$©a…‡õ6° ^–òÏ86¥ÜþH†Lzø:[Å52°F°‡d¢dõ»ñuøù¶½r$ã#=}ß: IŸ}YçMF}›'¥üþ˜–M+úþ 0ð€U°p(2ð(L „ôé
æv°«Ü«P*6P?çÑjíóhq4( ÚÆ ØÑV‚Ѽ¾V0,§}ô›º®/Zû[ÂoÏ. t†<ä ,‡\Ušhn/jPÜÁM¼Ž^ ” C òQ%±ßGµ¡ ÌúZi¨`¿lOö’¯„\Œ÷T¨O'üZ,¶«çMCßµ Ò¬÷eØÁD’`s”´‹5ý¸$X,§Ý>Úá]Ü%vÌ Ee¢,Eè„îmkª)#Ù°7±}¿†ýÏ0©Õ{X«cSàAè¥àô íaÈ—ß×–îØÆ•ƒ+‚bµût×Y¸2Õ7I%@|eшoñWïÇæñc »œº×Òåî‰&m@¹öÍF ½E³nQåߧ.¼ß¬yÿtJ3
°Ð7EªüLŸrIØãØQÖu•£·áéŒÃ›údò)JQŸ¢ìâDe}þçZ¿xgP¶ÖÅÁŽÏù"p>~]«¥ù§% öõ†1ý¿ž8£æ”†E S(så†íŠ €¥ `q‚«£×0zð‰Fo˸ÿc_ë`WQŸ~‡Z#tyz\«‚×µík4ÔrÑ°(ÿ€Ýx³
‡/‚(k ½_ÖøB|\TyÆG>zõåÕ÷;ÜŒ: /vR oî¬vDqÌgO®>}ò/»Ûwwß\}ú§¸úôŸð_Ÿ}ñøóä·»_]}þd÷å ßt(øú‰ï,‡ñ ãÈntã:9ÜvhšQ*â„þ µ²«ã+€O!KûKoD׶v\ÛhÒ ’ç¼u–k¼ÌõОßX?4JÕ:¦F3‚à¯BDµC€…:¸ÒÆÏէ祢Ïð"dþ”H¯Bn\†þánú‚c·.:¨f-¢!ÈŠDwqlZ@…ƒ,¶t¨S†É2Q±Ù_\ðéþþ MÃH)ïÓô¸½ÒõOWëÿ+Ø@êžÝWQ kÛyì°Ç¸‰Ül”„ÿûM\qIÄÿ§MÜ訹 ý«^GûõyŠUG÷ýô¿˜-+ÂL®X;tÞÃÀZë €n²Î?ÁHà-›ÝxtsÕ·1Þ™õ÷G”ÁdÛékß&¶àãýmçªÙmaL§
° "7ƒ]Â#ö
UŒ`O‚½)NkJoéÞ2‚tˆÔ‚‚hY° çE{’Ǭšà˜ éD–ëƒU)ÔúÓ5h>, š‡z•K÷cÔö
þ€Z™Ï‹ s<âÕ¸7½¦ÑWZð‚'£ê#À²©9šV^ö¿Êÿ+xЖÄüïµß´r5¶„k
7Œj;êˆÐØû„»qݦ¡&…Ƶ,« âÀåŽºÑ ì øb±ïð ,LLH
:Ék•n <>Ú…?±ˆ‰ø¹Öàþ…žÔÊ€ € á\@Ý« OÈ‘Á¹˜52 <+‚ÝB †i2û¦µEæEú}T4Ê€‡bˆ%«å~àr”…®3%lºmC"Êõã?xæwC© e | ÷â új__×·ˆ/
gÕ40%Í ùØ'#À,hÚßÛ¦ 4d< ’K
Þ6Ew^ÐØŽïWƒÈ[±¹¡Z¼a“ÁDé a†Öû/Æ€¶:B‚° ”««ÔÕ]“ýÿZ Þ5¢Q:³L ºUÇN<¢)¡iTxäöý5+5ü<;*L9Xý`æʤÜâÁ”FbG(`ŒvÇ2õL`ÔEw Ó¥4ˆd 8›]FâýCA æ÷¬o.ˆ Û2,?V6ƒRzÄd§õóÚ¥ý„&•dUŸQÅ):AˆÙÖÕMm4 t ]4Ê ½…æ IÝadÜĺ:"؅в jGÊF+ä)V›„ùhcïð= ›˜ÇÌŠ[âz_7‹^…þDdŒzë¼ðÝÆD3„nçÌv7ô¶Gbež
ŸÕı—Bì ’Ãx`t8* 2MnW²'Ì‰Ä I³„“kKÀµ§ÓåP¸´Áa0 9âÿ·ÊràRkXjëÅ +j¤rûÜ<»ÓÔx…áñЫsyõ}0Œ´SrÛAÞ·8'6ŽaƒUÏ3
Ï—
5˜2l@IÍ`¶÷CDzCíBdÀwY+Œ¤äþyÑ2:ÈfJ;«Áæ bäÈðü±“ç¼ua*åeµîˆ3.rÓaCâ'“/^ãìfRh ‚8óNð:«Ÿ¶VniK’ r]´fIÓÛ
L¢þ-PÛãøß+cÓ^S¯Hä÷BØ°ÏHZ{Ð ÷)1éÚý m•p˜¦àÚ £ÌK=x
Áµ‘ÑãKJcØÜUö}"_4U@™zð"‹Qâ²YÀ@Qƒ ÞÍt¨`pVR‹fk5™åÆ=¡.œqO™l×à,lü½vJœ"lsKg pW¼‹Ð¨Ð:;.Rsv¿IžEè"µ´ï–jÝ)©Å¡ €Eƒ9áâK€eCs ªVœ§“ÆÅŒ…©A†î õÖÓ1¡>´€ è”ѹ±³!wIF9µƒ“èL†8íf]OD48ÓÖ¾»-€ ŒþVxódfÌ t㉚œÍ§F=jÓz‘ÓKÞ3² pV“ ]~’3] FMNÚÁÕظ³–©lúÂò ¸Žd§ˆ¾K)K»ÊK/µ)½ÙØŽBŠåñô¸¯ê¹¦òº^-ÕS€W„PjGýÕcžòkIJ“ k5§[:*þNš-mÍý6+¯åQ é5“–\Õ†½WÕ†ò úL._9[f
òƒ1ŠbQö ü´LÏaÃÎG5oZöæ^öÕaþ†Áƒ½\É€ÈÛ_Î ÒX=‘ÏÆà…æ¬qÒVmôÊixhÓìÿxí1a%©C!ÙógÔj€¬Ú¸6ÏÙ‘àâHñÆtþãDâ¢K*µÇ¬ùÏe0}PÙM&†@õ)Á£u1 E+ 8vÏ€"ìjc¤ú@ð]ÙÑ|½è´8øB©mœPG‘E»¥“•€øxêEFªj¾í¶-LZ@oš…mûÇkþ€èuˆÿ ü¶A±éçÛMŸÑ Ÿ
ƒd‡¨=ñF̽D¦Ê>€Áª 8 ïxÚŒFÚ ¸0(g ñ"?€6Î3 \1NÏF?[L3²! îÅ aÒ¢ˆ+€×@â‚j™•0ïËKÌŠkÇ2ÛÜ…_Ù3Å1™æj…® 7ÝsDL« k;¸›Ú"ú•iÖçÏHËrXi÷ÿ
ò"Zmëæ§Dnðc`Ø?Õñt â«UAv àe¼À¿^6<ã$‡š R T;á"®[Xl ¶«ÍG¦ß‚Ž€ðJìAMIÞmBŧ ÝǪڷø1@ûBvò5ƒÕj•‹¡«‡/2ÀÊ*ËGÑ—Übz ’GÒÇÛýÚ5É%¶y«òÆ(–:Öf¦4"¾h¼”à‘‘ý)à/oí&ã'U¤e/0½¬,·„טDÓ`”.% ßÇ•Vbåžäè1|àù!J~šï ðê£y/ÑÆ¢u€W¶DH2jO£1Ò¡ bñ8ës<¥ÊNpBr_Ó#³TY^ »Ä¢7ÛÐn“{ȇ0O›ÑÁâÆ×Ò|ê©ä<õ‘d
d·—‘Wåuü6zÊ{|ƤßêF%È™.žŠk“!Úûœ`Æ?ã!f±‰cý®ÂSPÕ",}Ös¶¡åq©@ÆfÝs98|zÙ ø^q'vÞ›°ïªÖUÉüž®™Ò'àJ @üûpΩBÃM"*Z“þ>ŽÀ©Ž^9Ž¼]É_¬V¯–çØ„ì‘ ¿¶Õ “ôFŸ‡mbí‘éˬòëꎘî³d¨€Eãƒà*´RC Õ'…+or[A±Žìô6oÜø™ Õî$¯UV whb ÷°Â€@ã bö& kG=_d| 4x1’xè`eçN“ã"\«òÝ™¾3½W–;_ð࢘ú±Ö¯35•l’3)ε4›Ãx㧄8ñ\Â9ó…ClV¢b“„ã Sß5 €Z榻ͪú×fÑS»VIñg'bKÕ±®b ÃO#¨@3)Œ˜¢×;ÝëÄD ‘fjýHtC,åxù£ìîÁ
ó)j ‘#P ©¨Çv ¶;ú¯–Öé+%"Õ)cÉVã—?¨“»
âÿ‘–µ¹bÔƒÐsÖõ0ýI9-ÁùIí`mßK*<,&
Ü‘Õʆwi…ž…7–=¬¬^äÀm‹ÁÉy±³ØQ æyb,¡ÔꃹÕ>B„>©ÊMÖ.ÇóZ¬(³¬‰" ?¦‰Á@hGYî¶Æ˜¿)=Ø'Àéꡈ
c=ù»Ü–3¶Ô*[%ùìô‹QëhÉÁP–s³ÝÃDþ%W–pDºe4Óò‰¸³fÏW!ÆìøI6Wh—¸U®bÓÒùcê¹ê;Y\SßĘr§·†“±¤bIÑ›BŠèQZ¼±,\ ‚˜øº¢·¹Fp6Õ€±NŒ#6ÙC†Ûœy½bWTŠª–ŒB Û!’»y'Ç]2¸eUîÌf<,VS¤÷IÅm+¦ç.Ë>XõAuÅóy“„T’èp{a¾GÜ^ÎÃ~ÙXÝ8)Ï`ì+’`ÎB¼#øã–¯óæA\TžD;¸·Ääpe
§«/¡uÓ³ínÌQýn‚%hÜ!œ ²Ÿp®l¨–Ù/ÈáðçÕ¸ ìËýyèØèRbׇÓ÷VÕãÃù þéØÕ[à\ 4L!>¼Zõ ˆzæ|ŒÓY÷9sí÷¡UGÝ#šQɦœ\¢À,®ffÛ"÷8µœÅolÎûZ‹Ë&©’Rk]Þ×!ùV7ÖàÎV€ëäåpmËðeüøíË[<Ë•–? ÏŸY'¡\ï «Ôn+¡Ã*yXy:õF+fªÎ\ûÐþõüMJzq<ÏóÍÂ=ì´Ñ/Hr¦¢Z DW~¸A‚èkzƒåó:ó8º’|ÌŒ}ÂrÒ>`my¡ÜÂèŽà™ˆÌ&É]RîÄv$¤Æ”¹Ÿ©sɬÒmWŠH\áÚP6ÇrÒUÇò‚.›˜¶Îmª´b5ŠèNW5 m“ñxZ;‹ ¢ñиULá\O´’Óc Ã5µ³#M÷Žô#F,cŽUØuÙ/¾²iƒE{¢‘‰‘õ`Å#IpLD®šÌdÔ¢þjHuº&QÚ¦X°·Z)/æñ _’O—Lj
#ôvŠ ä! ³- UÛV;\úç†Ð«äŠÛmHÃóO‰`ªWŽpgCÜ=kœ ãûPÒ¹˜ü@ªSz€M~$;1ôêrç •ë„±¬‘×™œñ×é¡1垯‰c—îþI ØÈ^ìR£ö|ÎfCz&|¯.ùbžý¼aµ‰æ—Ò¨W7DÎi[(C‚|ëBJl·¢wÞ:F<$ZÅKO¾ONÄSOiûéÝC ¹2ı݋²…þ£L åæ9W숫c3}MU„kÒtjI@s“ÐÊjE/‚BË¢CÇå*Z7°D‰ÒöN‘bíóš
RÆvýîÉWÅ*ë‡ÊzAÕ±|v÷²ÐèD¨‡ ä[w¨áÙ¥.ÔÏãÊW0a"ˆ ð¹csÇ'åõ`?iJDw éè[ý
$>áCiz.œFïqñ¤Ýßï8ÅPçIŠ H"i^` ÇMÜ¥s ë_‹òˆÐLÎõô‘T”E#) #ðXx¬8ÚrÉUS¾Râ§äƒ‘1V…9U6a(=ÞtÈ$㨜Ŕa;¡Ã ÙøO–ñdósϤè³dY¢ñ†¼Î4ò{EÚ?~} ò –• ÙZßn[ÊÍT '=“ô‘–ïÄ„1“ß՘ݰµX¾ Áƒà&)>–£-|OÏjÍÊt6×pô÷); óÄêeÇ*§VI¬s¥zËËÎ}/HžÃû"ßò(°œl«
ìÙ \( ¿‹ÂÞI ‘î/–6îªÜ*¦éË.b̃ ‰sû6¹±` VÓ>–ÊeJ«»]. 5—[újô §#—÷(äT‡CŸSó\’›\…ò’{OŽ4Ìí1‚“
URsÌGš$;nŽ4)#xŸâC9¹‚gäzâ ,>Äf6t¤>©éÚ fÖ¿>AÏr¦t˜h×yÕË & s¬ ¼ÎËÖúD]ÊjÆ5öIÀv9Å£zà)®rô—=å[l+nÝ&u-ÚxÆð¡©Æ;“;K1^>3öC:S¼±çtŠÞ½±3¶;"™å¼² &#ß&?Ò§Qh) ´´.&Ì˸ÊÂf¹49&MK*³Lc<¢ÜõXÀ.1+ÐírÉ™™áÙ¾»Ñ}Ùþb³¾ðÓKfrÞýù<´½”m.7ßå¤ÇOä ã6 ´AüYòc½c}ÂW Ë™¹¾wT{drn{s.tfB`I² »:zÙõ—Wÿ ÝëYåendstream
endobj
71 0 obj
5867
endobj
77 0 obj
<>
stream
xœÍ\K“ Gæ¼Á_˜3„§Õõ®â†…ñ
l6‚ƒðAÚµåÁ£•,ïÚ¿žÌzfUgÏ΀LYžîª¬ª¯2¿|T³™'±™ñ¿ü÷Íë«'Ÿ¹Í«o¯æÍïàÏ««o®D|`“ÿºy½ùø r#ÄŒ‘›ë/¯ÒÛ “ô'Å4ÛÍõë«çÛ×;xÌJ ¶ovÒÁ¯~ûÝNéIx§·_ìö*øIH¿îåä•3f{‡wçI;³½ßíŤ¥Vø:ÜÕ“ jûv7OÁé9øíWñÒ¶/Z ßîôdœé:Píçv{
ÒY;0Z䦬Hoy?Í^mߵ߿ةIy¶?kÝßµËúsqºe¼…çLI;Ô’B¼ÌC°Fæ!hE.b+±ý ~Uä¢o×;¡÷z† 0nm¨EÄ÷8UnÒ³ÝÞÔ›D ²*>l_ÂÝ “‡˜¦Ê*"ñCm>?©ÚÞî>¿þÕ2b²€•ë[ÀÆá;xeö^™íá6¾#gc‰L·8YóD$ÑÚo_¥Kc"w( µ-`ÂÛm.°û}ê/ô¤“ *>mÉ2 “X |‹£‚=#T|Ë©ÉkE±Jåð®Ý&0К›¬¡+|èn/aŒ³•Ýƪóѯ|lËâ(êz‘g (Ëki>¬–7ûY(·½e@ö¶--ÅyYyòÊ¡ÝÅ¥ j
ÒRIîʨÂê~ŒCqŽ.È vØi†fm²€!hÚ~“ú >ˆb'#p&À‚ÒÒ±í{|PN ¶—iÄïñž›æY>:Ž¶EÆ>4E)ž|& U¸{eqA7{ @ö³HÒý _ó
CzgPÒð>š‡òÛ³S˜§ª:–RNÒXº ŽG¼=O^š”W€àhAãk//RØùm\e'uBGÇÖCžÊØxo7—RËIÁŠ.5-‚{’6¼+ì?Çéßc½º¡0@Ùl’ÛNYJ çæ_¦É
Z³6‚4EE³ïXü- hš áéì¼ÉâÛnŸ¿l¯‘.^tŠ Þ “8×ô0³N¤p“ž•‡[Än©Wœ¦›!¥ R†¾Õ&=7*”*ú
š<ÐÞÿÕ.)ù$>Ñòð¢2@: ׌›Daà¢QîóÚ=³€íwЖ†k˜ûç¢-ùÜ^û|íŒ aèB ‚éíߺõm {S®CÍ15¦À.?wívî÷Ç7ÕŠ>¬ ¼ìŠÃ~·7 gV̲$UÌ(p"Íkì6 Kd±Kh:÷mméˆ$ÁI˜Ý° ”Q`¯5µè‡ÄQR³
ÌðOz=ü«þÞžD£åa\·57Û?ïpW€àkJ?‚Þ‚ ~©éÛ”ÜÑF¶×ÕP“½ 2kp ¼ ¯©g‚W
,Ñ+À›ÆŽÀ
ØÂö3¼é`žeÏ܉yhê÷‡Dø ”v'w§ Ðò9rGèÍwf—Ó±w·uŽÈRgØù¹jƒAÝ
PÜ%\°a2ú2ØEîkÕ; |ìôŒZQ
P¢§pØÅ߯!ÐÏ0tóiM¾À!ìP`Ñ—âPJ üTýP©ÅMãØ ªt)P¸®w¥{8 ˜˜Yü7§Ö26ù¬Ñ²í"ر쎦eH:Ê4pW½¹cC¢# Ä$°Ÿ±aŒòë+¯¶HÌ¢Ëà–Иå“ÃöÅ(¥vÝö™²v#Ú‹0i=Ë4°gПo1å•\†ö¡')x }¶ýy©h(t¡ÂGfT¾§;hÍœé”e2JNtÁ¹· u¸Œ3žT™Dw"™!¹ Ã|D€‡ 3í0Ap2ÍbÞtCä$Îô ÍŽíËhÞ8/4àrÇÁ¬åaú«’ÿ
*,ªKÖ ë¢wYÜq²P#B6›# ’mµáJ2]Aùzþý=Šfírt$‹@¬ì´{=ÍòéÇ1yMùÊë,Q§yKvvÆü‘-¦(Ï3¼Iá‚°Z&Ú2n`¸žd'é‚Û.RÖªÝÉN=5.²ipÈGïwЧśïw>R˜c‰‘A¢Ï(xKÛ-—•ÿ>ÉkÈ!* ùÈ!Á?´X 7ž[ 0Ðâ‹Eö™QcÐ!ð `:´=È-3ÞIò‚ÝelHš4õuœ~-]Ÿ¯û1hºŽï¡STŸ½p¯ ÿs(D j.NX‰Ç¼j—äî„
©·‹mÏmÉäµð“ þ´²®O@,ð
A#’Ðù_"+Ä„ËŸ°%é½ Ä`}
Ábʹ äœ7ºB‘ù¢Œ7( ŽIŽ† ²–_Ó²
D
ê笅~ã }²¤Ó}8¿ E#n:w–膱}‹ícÆÛ®nÊ4é4·ÇÆíó“r<})9˜ ŠÄâSv% 0P
4Ù"N‡Mò'fÖÈ!*-*v Ö§— jŒ²d`š¯¶^ÑpxÓöߣé 5¨"¸ö$ÌBöÁ=IópaíºkJu°)M£±R@IûÓÕõ/Ÿo
¼ bHø)È1m ¶}*â@êeìh6"Vð PÂjÍ" tK9dì,ù«é«
Å „Óe]T h1Íø9{H¶m ŒÑ
zƒh±Nç¦ÑFJY©Y¡=|f SZ N cgýtèOÁŒÏCU•ü?RíðmB hªƒVˆ‘_£vŒ³ÂåÆø<^aÉ—ÓÖ1{U‚¯žÔÞ¤¢õIúJfÁµ„sNc)˜Qe˜‚¨ÈßWç”ìjò@ÓV‡EdbŸ…íY!s"Fm%唼 ›JÚpÝ#ȵŽuŒäõcWªP{ê*wÞçj…¦w‡€ ¹û¶Ý¥–‹.’Mñ†§«ök8&éRŠÐWËļ m5‚_{Ë»r£»
·0¬ƒJF.²G÷qóÊ EôÞTœågD„;‡9Œ>¿= k˜Ôl’¶Ëp&q ‚Fhe&–¯%°æ~‰qú[[üŠŽ˜ò¢8Å– ùÅO45sÒb¯5€F¬îÝ@k_†H¯§h )ÞI,¯q 0Ú (Ñá|È™É6‚ TšW؉
[%ª:
¡Õ&ë&'›d9jð˜“ižêö¶v©N ,nÔ{aId$&(@8IÍàáHôöz¤:óˆ{––’»„¡Æ–0ÍB3ôàÜR§ÀJ¤jfÒ°ÿÑ Xát/[IõH~±·qKKi'"i“Í-ðaÑ5ò…*äG´W·Vm3K˜åvY5ˆÞ AÀ"š|ÊY*p¡ebƒFeˆ¡¼ÊhÐÅÊ—s¬ï±Õ9.ƒªøì«ÖÙJÕ`š–åÏ|Vxp±>(œË)Ç…+(ù$¼èÀ°/ª ã+Æ®¬Ú¡ª«‹—
5£P uàù#¦wÀ!˜ÏØadb v´³Õ÷ÿHxí½Œžâ2â„IÓ‘…ŸâB×ú-’ÀÑηðÎ×j¸L„ sýO0ÖéVo&%žÍÑxÛû4✽_¡G¦„'šgøž™¨Uöž 0m‰ÎÝò3ìÌ{ò
×N§¬'rûÚ°evoÑ/›\ó Ãm× [3}®—¹˜þ¦Š‘®Vói‡®Öô\°*ÇC§~ãl8»âzþ§‹ØX;³ÀTKÅô¥d
ӏ
ù|JÍ垢ªÙ†3rÚi›[Pˆ5¤Úb¦%g–~ï÷< Ñsñ
"=’ʆáh]<#¥O€+Vyu¦€&m2´†NŒ “>YÈK†ã@ƒ«Çó>pv,Ÿd;#;†Sh<„OnäS3&2–9E, 3îàvzÍø•2Êj1™=&\’?Ù¬Çsê‘®ŸÞÃÕVr%(J"¬#eÅ› ª0ÚU¯ÇÁ njcó\fr‰º:PªrÇZœcó9®ÃÅJ9ýB | ë“n±÷Üö¹m`ú Ê‚ˆ±¨Õhƒq8_+±vŽ˜ðÙ¼T[(þ·I§X¤H÷dæ6N¯T£-3ÆCjxG
éùÉØe5ZC:{®¬\«ch›¿ÇÁ” Àžá§¬ãë~-îήÏT)£g‘«Þ“ä}|o5›+ø2ôó8}ÌbFw›5ÝÉ•ÊD†9Ï1CÔ’ƒ©±“Q¶q¤S¥ÕX뮘C?Ùì¤!‚èÝMÎY¾0Œe@Ë3/=Îïê1Iµ“ ú„G¿Z$@>Õ¹×|”CkNJÌ]RÂaaxæSx XO6 NÈT/…³æ¤GkVîr ¬Àìú²ÚLâã•t]<;.¼–½N' ©4c9Gl
iéÅW\]Oô `Ñg«ù ãBépÕõ³
Ü*& æè„r¢aŽ÷%Vj©Ÿ¡Áȉ۩µ:ò³Hº™îl3‰štÆ>Æúº²ú v‰ã'ùc1Q¶k,Ñ-\ t¨u_s,ÂtEük¡·DO“_<žK¢œ…¢óÇ«™àÛ´Œ`ÆP©íR" Õäí«ÇŠ?‘CŒùêh5 ]ó°ÉûnñIζH/‘ª#@R£<#ý?ÒÐ×øÁúDV…q
íqÍÙò1òÒûÔ•óîñ²[¦€œÖ™ÑëØ«œ Õ a¥†ŒüîäÁù!¾qàhõc zÇ
K|ø/U¤u+z;qÔ0Áî¬ øoO÷j0âÍRsTIª×b¥h‹øSxÖ]{ v‡Rºêr:˜Dº!ÆA¹Ñ£öx¼¾ÿ–€Æ$à>ßùï˜\ Õ-Ý ¨bi› ´$¼b;R0¶0–õzpPC.÷ÞH>™DõvL£îsï7ÜžY×÷çš¹`/b_†õ`ï5¡% (RuÌó‰/Ë’¼C¸ÁÚÎ×Ç]`ã):>Í|`ëj¸&).üNIhÿm¨(7 ÏrÈ! súÐѿئ8ǹFñDŸåçââåIs I=aq†“ð$ŒpLUˆ>V?›9~c£Ï¶cßlnC §˜»ô@mr5F¢Á™Æ $]ÅäMÙ)„À S?ÓÄ÷ÊWR # ÏñQ¬¯kù-Ýæ ck'¦ê“Ù‰J`?ŒFº "SO cu\.P8EéVÏÜŸ—Êcx,…ôè‘œ!/±¤9í‹_:ÔŽ Mw\R2”ŽF·Ï~•=8Ê—ùƒ”5m Áš+
fT2ͽtSfâžXAˇq¼úp Ÿ\_}zõÍFO>~Qv‹™äF
öÏoô‚´èæõÕÇÏ®ž<ûóæþÝÃWOþ¾WO~ÿûø¯Oá¯g¿Ùüäê“g›O/ü|!~iva#°„1}¾PÃj¹ÞX ›/m»ÄÏBHT?vëwx6ÝøYˆ|W4•2ãk05¹+JcŠÞ•>t^d´›qjpŽÂìñ{‹BÛ€óócÍ úNèÝ n¾LÃ;%ËoÊås!%†R÷’
¬q&A 6{Y $ç]‹ <òe…3 ¦mL¼ýx³ÐH’V@„áéwÝ}6dn—j·ùëtäÒÜ
1P¨€°ÝE¾$ª‡”Àd
¯À :ö„«Ä3'†‡kïš"N(à]Õ
ˆ>ÇV%Ó½Šk!f$ªî«ŽÿGè X"÷£¢Sᑽdx
FŠÅ™c‘ª kÇ™kðŸÓ™Ûbœ™µ}áÛ³¡=K0iíø%˜\Šƒw]ïíî–gu×.Á¯‹i&¹Ù+üðE‰¢ú¥øôêßI¯üendstream
endobj
78 0 obj
5200
endobj
82 0 obj
<>
stream
xœÍ\[såÄ~wø.žtGhî3Tå!Y•¤Š`xaóàõUì±½Ø{¥òãÓ=מÑèØ^–I!t¤™V÷×÷ ÿz8ìpÂâ¿O®¾ø·9¼¸;˜¿ÿ_ üzÀü‡ñ_'W‡;‚‡˜>dfäLÉãóƒð6;4 þÇÆI ] ü<èÍ–1.G«†¯6[>
áœn6\Üh9¼ÙlŨ¤6n¸ö¿K!Ý°ƒ·Fm8<÷ôä„Ž7ðëÄ…Ná
K2KnÆ·%÷?6£†'eõ°›,®à%§<ú"¿4§ óÖai¦õðŸb@¸+‘åòÎÿ9ú'²… 2†ësd ·#üûÛƒ£?ÿ< mä(Œ4z¸ÜL£3Š17œmÄ(¬qñå©zˆgÎ_N—OàÑÉ(©†Wð¾aÜLjxæ‰3Ê"‡ÒÝ %BŽR8›{áI“C&ÂVhŇ“£´Ú
Ï7JŽÜòô«Qj¸(žÁ¥1£†'OâÐ'‘' Å„'Ѐ—_R(ü=€`|0xq|?ÿ¼» ËZxë¸\†4“‘ƒÊj/ù vUl8÷láx÷e‹J6Ü”¸Ú kô$#¯¬¤¼bf'™Xu H˜¬™ Ë«þJM|ø2ßû¢suž¯ÎòÕ»üîu¾wœ¯n;»Ýå«1¿{Z¯ìSdß“|õ*ÿú¬Þ
ïõ Ã$0.#fÜl%h¶L eA]1l¹á:p"¥ ~Ë™âø¤´×;À„0¼–žÇŒÿÞ,²ã²V$ 6À!u[&GÅ'ˆü¤hÖ( -@¤W˜xûº\îÑ5i: MV(`ûVH=)‡ùz#À¾ -’ j…È`æ&x – l“æå3aÒù¢:õJ‰òÊ»DJ®ÒQIÛ_5Òö˜Ù¦{a=!*S1:-ˆÆÒ2>ñîÆX· =+j0Îåg¯Aù,ZôPgèš[ ÔÀÕ'
ä¨ÔÐ \g ^”›6‹M0Š®›(+ðänõŒ‚çìÜC…‰HŽK 1^•4a[32ë(¾¯‹‚ %)pØtߎ7Ü$ý‘ŽX¿ž|¶Ì‚—’‡[Ð[iœ©$$µVÂNÞ Ç«ëÆvá½9_]4HÃ{·ùꌢ4T&'x•7/†îyó\õ€_
?±ð9xá?§ëV½àh,x ;x@ߤÈ!ZöŠøšÌw¢›·E7Ï:®îåò箪tißen̺"7ŠPZeÆ{Çùjl|…Ì—e¯ö_D¶Ñ}è7Àª#¡F£'^G&Þ_F&ÜŠû#GÂœÝü¬H䶨ÒñB•ðî»ñ;!†Ï7]à
ãÞMÈ°ÁO™éÅ_tØzW[´†hü¢D4ì}ôËbkbÈ~èH²lôº¯6¿o˯Å-ËF=-¿~d ÞK<1Ù}N©U·Ù)íÝÃQ¿Þß`úµ¾tjÍ@W‰—_¼äáö-Þåð’÷óùöó°“4Ú|›£ƒŽ FåeÂ㻲f0UüÕ
š£û ±àyqÚôUGÔÙéËÒÅ™§ïÅÙé5÷l~ÞùµukorÜ`t" (çïâÙ³(s~@]D‘‘ïí"nEQ“æj±èk$
Do»±ÃE7Œ ±C!7f!º B2å‚KŸ\˜_ò:ÿ:7BÇ«7{EóHß“e³ŒÑ@˜éõ
a9Ø â‚×Yiç,ê7Ì
¸¢ˆdƒqÓó€[æìhxãσ#ĸ,:B—ÑJkîs„jdÄ«®$ÖBN£ ÷v9ÀÁpVÊ‘5I·ft€TbsHB4ï€mBñÑ @ãÜõÒ£uÖ´Ä,x+±üQìÓ§åµ P$ˆ¬õ 9Ï™T* ÒÔîÿÓøA>ðiˆ‘øî”ê$,¢}åç¦Í ‚¥Í·y ‡÷¸€gÒý §‘súb ù÷Õ»Ê JÀŸË ‰Ïµ! ¯>ûÑàúOv¹òiffH¼¥EQ=+hª€uZþã©G¥²] p.éú;|"Q%Ö—Ô6û
ÚŸàÒ…Z‹Ä—.ÝÇØd»çq7Å>ŠKGÍ@yAÊaËÇi
T?ÜOç„
4 Ô«‡éO#£Žþ42Zî "[è6BCÂÆŸkº=‰ÒD‹ƒï,‹vÄ
6q¯„õV›V“í¸k,+:ë+ q¶ÞŒã.;/)"øÈ’{Ö¦ûÓT5r«fºÖ&_–P{”ÉG¬êãyXŒeÔû;Xf»·L‡Bu7¹O† ø8¢Cý †@¢~Y¢T ÐÖoLd²¬Sî³[5l ½êѯyKªÕ“ñ£ `±N™<€»’‰‰cŽëXXGÙ“IÔwb!¥We'ª=G¦8Wq"Ñ-×KbÒM£õˆöŸ±ä˜Ý,›.‘J—2gz}ÓR˜GM=_€;B;Á]d¼KQÄ{‹
Â}¿äºcÅóEGǵ¾GÚ¬t¬*Sbuü‰†gCuTñʹ˜¼ f¤/ën¼,¨ñ=‡»L Ö% àf
„í=ü—•šŒx¡âYæªê*¹æ‘q+
L&½§y·Ãï¸3ÙÒ`¤l®("±ä5²êI ¨²'u JVh6³ØqÂ}8Z*Ø k֌»°9šÝÎWlw‰Ò¯ÃO~•Ÿô!>ÇŽ% æòpÀt “€:Û’¾s =©'— 2>@ÌbU1Í=˜ªåœ!7 ÜT`M*ôIy€Ð•‹·b5€\€í,$¶õÒY#;w嵎˒ÐïuY<¶ânÚå´~ÕÄï‹Ø°6Jh¸+XÍOò~½ }¤ž8¯dú Eh pËG©ùâÑ\eÀ!• ý܀Ѳöáæ5iˆù¸ã8J°RÊkf¨Ã‹uãðþý=oâ?vùØ—zˆ§‰ƒf‚ eÒÔn!& !P˜¨ž+QkÌö×6¨’t´ôvre”¡êv„ Ô$ kÛ Œ[0ž°±o Ó´žçf`ò ‚25f´÷cÒH*GRãê´¤2—™–Ê¿Av4*.›jšÿ£ßË}Äð î|.Ì"1ÍdÞ|]66´˜?¹–ÏiÀèïa5—)ò>(10ïB®[¡ÒÈ;„Iɱá3@õ'ã 5^WH³ƒÍ‰Rªß…ï<4ÅnâFÁ°ŒÀÒÖ6ƒÅµÊ,øˆ ,z= ûkÍ _6²}q]œO¯.ïâÔs¼ïÈh´šÌ+®©aM‹#”!ØEOÈnã¡ZúËxÈKª“¹5Ix±Í¤GLý"³Ë(ŽäÕÑ 1¦$E% ïÆ ½®–ÈKÛNÇñMg~¥ÌÔ]6oàÕU§Mÿ6_va¥çù—º¦*B,eP?<:AÔæwô!vA&ÆB›+aò¬ ŸŠ•S ¸1´héêmºŠ«XºÊvòý\)·Æç)"un
S°~ÃîP PaÑX Šh÷d úË 4¹…/ã$!¸`VžÕåòé&º>ÆÖ³‘ΰ`m÷±ª'Üû[Ÿ 4Õ‰÷¶>Ð/9U$ä‘#çpy@²¯ˆÔNylb½²†2beÿû»_ ©¼ õñ?Vå ‹£)eŠö¦™r(3ÀxµW÷ +¡ÇGW|²Ð ŽÅ[¥•ék~˜Œâã<'< km¯{[fbMŠV–üXƒÎªLvÅQ@.äf_o ˆw“®:/$¥$°#w릻dÓ¨T³ ì#Ï’ß~Q¾ª¤tŸùêBý,¼$…«-@¿„=t•µ 0‘ V cõªµTaªä¡×¯â®xfAð&l’Ì7ZÖ{
øVEÕŽ ,Ç`}þ±XÌÛ¶`¥ž\€€³!BM׋ٛÀ§0Hæú
¡f&Ë¥7cVUœ%%Tb2I@ªú®¤`Íï§å Bg+ÀC¹¶"óKØGZIK¦9ÀFY‚çp¥‡`;¥¦3 «g!ŽÓdJ®X·]gÔ· î¶#â+“a »tì3™„óyù¬ZIøqëî+Éöæ-$:ž3aZ«>vÂ틯\n¢pö„%¤[ÔÊF 3L-äùnéRºg‰°ùRBGj˜‰®[.û+&Õv#WR´:‡˜@Æ =®’¬sá^eEnð.˜JÞi=¦ìÄ‘LþÞ¬×I9¥»·ÛQØÑmö÷"à ¹]åÉÒW–ë|: +˜÷'6ý¹ñó<±g2v dþÌVs¢ö7é¦# Ê»úÀP“Üœíµ/—–‚̤ïÈÊ[%€Õ‚“8©l|×ÄSc•áàÛ†„úÔTw?›@@ÚÓ¦æè“ß„Zº‚ ÛMý—+UÄ“ '™ç'…©5§!cÀ³& ŸÓÒ!Hÿ@NŸ|,Nï?ô‘Ï°<à,eGeøôÓÒ+§99©6‰ºb:(¥ø §¿òØb¿7ëÓ²º@
PsSªò–çþæX ³ú§e™*2W´ôIѱbw{ÏXRÜýÿd(ûñÃh> …0z9ë–Û qÒ§,@ê‹ ¥Y´
s{÷:ž|…-L¹k
±)"ŃUNÿ$+Òçiœ„¯»:‰G…}ÌØU#¼Æ“’wæ¶ðŒòø¼tk÷ÒC¢ò’å`¯ $"'oݓżìhk…-)„_§Ü, ïL …K
XÒ°û23d®æZç‘á
Òü¡ÃÈÅAC: Äõ`©Ø·Ra€‘^
9ÞϺἴÿ]À°å•±&—B\íJcú¦¤Ùe‚Qšâ-¸ Ù~_§y0® `Ô'|ôx9
Naäúmé÷‚^žû¯þÎÀjòÓ‰á8#¨Xúû?n¶þ}-=Ô„¬L†“ò£e:Ìý¡JÈW¾Û`0
~ÛTÀ«QIƒVv›þBù;éO²€áR‡ KK™&† ù¢ÿVÀ2O'$‡8ÞÀG©0x¿ósŠ ·Où§×}è
Oèpã , pÔWãuÒ‘¬9,ÍsÝÝ µ E¢ U ¼Å1[ ¼ù UÔ¬¯˜[xÛý#m]‡»UL‡ÕQ+G®tßÃÅ c±&¶éÊ€O±J=¤ú*иéx” ¾ÝjYWJ«ÙÝà׿’{ð};ªÇl,¸aV
ém’G¥…ƒÿ€ŸŠ3<šÌð‚HˆzÜêg: VþáJô!ZŒÉt'Õ0¸ ›Ã¿í£ÀÉ1° sxÖZi]õ+…§á;ê‚é½jÅ
ãO¼C uít]<þßtêãŽÞK» v š2MÜ™‹=yæiµ$—XBNpôbÜj¶Ëg‡rî…’®O>÷Uˆ$%=;½¬›6VgyHÊ»©…Þ¤™P°¦Ú‰‡O„Sû™¦×ÊŒ5µß†‚ ?;ªŒ?‚Õëeíõµù.u?â êÙ4™žQ`Áx›KweÀ úûÑÁ÷ðÏÿ ¹
endstream
endobj
83 0 obj
4669
endobj
93 0 obj
<>
stream
xœí[Yo ¹Î³`ÿ ÁLàæò>§$‚,ò’…ò´Þ cI–g=–dYÖZÿ>U}°HvÍH²ä++¶Úl²X¬úêdûíB
µø3þ>zsðýaqúî@.þNÞ ¨~Âbüuôfñ×C˜íB)‘œÓ‹Ã—ÃjµPZ ½ð·ô‹Ã7?-ß´1ʸ|ß?é—/òØe~:Ïoß籫ü´ÉoÏòØɪs&‰dÝòºœ&žöOI-×ýƒ“zä_>_6ñé8?Ñvoòâgãv&KŽòÓ9³ä"áb
‹e˜ Ÿ®òÓI^|šÇ.óÓz/ׇ6²~×&‚¸ÉqM:)å
fÖéñíχ? t*
¥ZtÊ
»8<5ÿqÕiéðzÜ•qÑpQkœøÙæ±IN·!Æ^0ÍÂVË—Í õ©NdšâDwÒÈ}B†J"ºQõ5‚Κµ¸âšaf[±€zÔ¾ H?|Áñ µ:sZšÅá¿ÿT)ŽL‹N~ÕÈœTX¿ÍŠ#"œÍ’½\2"%Þ9Ñð&™¾`_e±Ðv¯8tp&F\“‚i»sŽL+]ÜÐQ^2ÛmÙ#׊³{µFëÈ ’Ö¶sÖ'Fj“Ú4K&õ ÷5»33U?gÒ—ó“„ÂM´K&¸øùª’éäÉtJ¥48³Ï³¸MA̺f@ó³ +f¹¬é§°õ„^¯eÇ~e ¹ºV¦µÙ¶ôj%½ã¹Ë ÚãžÛˆ‡c§Œ·8oX©ò¨èà ÏOgC)3ž?k=?)aB .Qö“¸þþ(é7æú™‰×“ë§Ãž1ò¾S8ÀÅm8˜df…ô
êÅOÌo3¼fôq“Ç
ö¯Ð3]‚ï{ÍÈï&?™½’ä~‘WpEÏî(ÃU äŸÈ„ ¤ÇÌa/gG Ù¡ù!q…Ô†a÷-çÜ÷cŠPÈE±
#Å«æ-®=g(ß»ì=mã×Z:›‹oÛÈ»_K¸>cK¸ f7™Z|5™¾ Ðl ùÐÈ´±ë–ôG šø:“áJ\Îås~å«o-{Ÿò*Æû~ y•6)~ƼêˆÙdðWW¼žJêÖàž’¨=IÔã¥Dh”é¶ÌàÓ§DϦ§§Êõ›ô°ßÿ¨|yùÖ)ê°3x‹ìm1¬:)”” Î¥XIMÑCB<ÖÁá°RÚ
–ƒG!M°ÀK?WɈþÌ R´
ÅÓyAëlÕ™Eˆqù—Ug…Š@àà$‚¶›í4ý’N¤NV
!aQEpŒ &WHÇÛ”,ÀH cStƒ t¨n øŸ˜§:þ;½¤×ëaÔڸ܊§ 0?)$âØFü%qÜf5ŽÉwq‡‰¦bìs"”{ D‡/ƒè£<µ@é m ™ìÅ@\s¹¾@q†ÛÈ]ªÎ7~ÏöŸã§Z:?Ú.Ò߉{/ }iÜߟå°kfí’b‘+1un¬#÷Û°º ‚!¥ñÌ…—ù‚Øo—‡àÐ!ÑnÜ„? ˆª0º0´`ÜÄ L©mr,6]ƒ[$
§6ؽ€Qrô¥ÑËŽ¦‡žÎ` @K
àú׆”ß–CâRë•o%¥û$Tú„iù{²®q{eLqÒÑüÃnõ3‡2NGdYÅM:µY§Ö¤™Nƒs“LñõšF99ÕGîA’!dK{Lüˆélryº@O+ebÃÇØÓv :Sžò 7š€œÊ3®
F'J’ß®YÀæ™ù<%prÎÁú*=´A° b³{¨Ëê[ª¸Ô¤R¿
àÔB©SÒ²eškÓO×–{-õÅÖî^ËT)á}UE}¢ÿò’!x‡vIß¹k»d(Û¸Fæ#©ÿŽ5Gq+qo™1=ºQàºuÔÕ+¿hÊ_ ]瘟ÛÞ.ÐØ »ã÷C„‘¸¥»lÕ¼ÜOò(“leòQkâ\ðíJaÜÔ2 ŸWS>íƒðF=ØK‹¦È58o`*Xè±µ÷8©\8úU£T™]áu– g=FZ@W™©†Ã ÖVs¡.ö
'ËeÛdÖ8ÆloÄ`Œ|ÒÒ‹ãïc&-Y\\¼(ȉÄ,A¦†(b
Û"04åg¿[a¯CGN©“æ&Ê%«Å\ ’=lSY®ÐÆ6pιkÑ8ÏÞ)>Ày²†b¢ðØåË<ÜxÍý”´U•m3¸
PˆÞ¢® TuÞùb 0„†lãfH!”ólba–…
ÑòM je~„õ¤…ÆÛ:éìù Õ u9J+Òç •ÖP6õ¥VHá#JÑ
ÖÝw*„^0þ›âZ[0Õkoè"窬½i Á¯Ní#¯:š§_SQ¹ôU—l6(Âm0±Î ?%b掌Zi ò‚KdïUaÛ‚ÇÇN[ ÷4w{ipJÂ`˜Þã¥ñ$§äÃîÕ…èBÔý·)ÿ3Õ^K[xáíæõ
ØSØï™xÁˆQuW
GÝ©°ûLÕS.Z
‡ðž*¢YæŠÚÅA.h
ïâ°=ŽŽ¢‚¬©C‹3êÄ¡?Ë#Ǿ~Sé\Uõ{¶rÞ0sÓÜB,'ð;Pˆ³Á¼Ä:ðÅ^/çõ·8Å ï?´Ž'÷ZˆsèîyåæÆd4÷3g5æ„*Õ«œ ñbœœ[«É )©BÉ+‡óö”8XXÅ«Q?º’zÚ‘¶ûC j6ÿ, ºÉMÞ“0+p}%T
³ í©µz3ty”f×+`XÇJßÛ÷ èžM Wz
QàaŠM˜ Fø¬¹/ ñý5Ó˜÷ ¹Ã_˜H›°yõžæWWdW·'M@®#.÷‘Åü³@£o!C7ÀÌÅ>9¢ã«ŽÎFÂ6Êì®MR€P™Ø*âmî’Í ?ôû¦(¼+ÅÔ`…Æ°´·EÀ,]óõC,#9²¾Yp… ¯+Ê /h¹¹¢³¹ÝÕÆ vKU(§ =‘Ïë XB[©ú\§Š¿tn|œÚ&KcàÔõi‚óXŸØ…¸ ¯É ³¯ëià ªRKãJ¦;ez¬¯g±êÁ,vÄaT®–Ò‹!
£æ6|mÊ€±¯JG•hŒÁ/ÆŠí¿yþ`:ÆÔÎSؾ€íÆéÿÄ/¼Òž½ªV²Ÿ>YZѹo„ Ú qÏ…†"Åôð¬s»âNÑ{‘{¿õL®ø àW¥¦Ó›¨KK˧/ŸÞ¾ÁøJGR èfr9cº Ç$—þï—&¦v>qÒÜ ì¾ÁurtIGŠ>B ‚S‰^±]6Vô¶0Šívë2¥‰Ø/øEŠtj‡Ï„p Æ •ê‰®ÄRÈòÙ½ @(öv>
stream
xœÍ\Y\Åæy„”¿Ðot'ôuí R b‚ˆ#ˆŒ%)c=Û$†?Ÿsj=U·nwí"ÓÜ®[ËY¾³V¿X±‰¯þ“þ>xrvç[»ºzuÆV_¿Wg/Îx°J 2éé{¸ˆTi0ù™³ë ^nØäbÞÁAaA'¶pÒðÑhG…Áf2Öä§8àÙFØIXe×?n¤š¸³
è)'øÒ¤'Ÿ”ÒÂ)Êü;ò¦’
ÞÀ£0V+”Âï
Ç©`Q;9£ñ- gµ’Ó¡q-ëéž^Ö¯/êþÉK»gu0ÙËg›D3Ci¶õ°*²q+Ô$
‘v?o¶ ïŒ1£G”æbR„÷waìä°xÚˆ’>ÐTM½Z3<©^–M[Óîà5¿¾Ä±lF®y [Îÿ´ÐìA!ÿ3 7y ,»¬ÇÌ4ÕGI~„¥÷aŸ~âšë5!è«š´5JàI…‰ãnýÙ ‚ ÷u®Ñü{JBiüz7•ãMxzx*"¥à=„ x–h¢ÔZÖÍL¥ÜLž{¿:ÿêìü×߯¿Â·à‰ä [\øúh3G¹6¸¤@m†B&ò*Aæy…#ͤ¹¤’EÈó p¬Ÿ×ï Q“˜ãR0T21i8èØüý[œÊÒÉßÔ)_×)ÉBãHr'y:Æ4RhÂH}ÒI2Ÿ@ òñÏ—½ ãrP””lXå~y˜àA¥>ÉDzrf>Â׸Näi•Â£¤H`¨+øød
m”nè?À| QÚ18®\wO=âÄ"¾¥cãâÛ´ú–ñƒ¼â&æÄEäxV©tUá‚ ‰DÔ*€1“ãåm|å>“Q¹„o?náB[ 6s Œ’hù$½>E ÌÂ!p‡0 ¦"|Ú7Ò#
ðt€I8¶3Ía³JKKF"á,N›eÄ jMÛLíp,ê´“u>}ß òœp(FQ™Òë*ݯ“Àš‰U;3Ãé¨rH§¢¢#Ѹ£³Ý@#cL1ÂiÐJÿ$²q}”Y÷ 3>‹¬jÊ)Š|«_(L¿o1ú~ýÚ(
*¨€IxƒBÏ{9 Ø·{0‚Qrž}ÙÏ›ºÆ4v|²³åà«âøf* T6ÉÈoñ£œXô2,e×´j>Ýï“ yŵr¤1%5 âR’²Ð©jÙóÞœØâ«Yp–+¿½ß7Ø2ÛR™uLƒ ³îÄG€{–õ¢:87"ž—eª7UóÉT»jb¯ÒV ?ÁY Ä÷‚ZÕ!⿉ØeÜ"—$…Ä»Ù:D#+l!d›„b\D<Šs8"°°#ì"@W6aÌÐ"J” ‘˹,fiËÊÐŽR×é~Ç"ê±Eª |øg‰Yö¸gÿq•‚èÂ>ê z'4KŽ·Áir¼€A
gð!‘Øhÿ6 2Ñéè{‚¢õ¯+·)úîç¦ùCtŒº 9ð![@˜
kCV£•©ÐáT€|ÿž@µ#Jõ†
|ÞiÝýe˜j÷4…šÇÍçÇå!q"ˆvf¼f.F•fèšdHÐæ5³QÒZ ^0Q²¸Ì×3Q™ßˆÙ€{¤•73nöM&\%ÓÏbe}ŠÕ.Aö GëRLikuƃs㫃×Õå°ÌöcW—ÓLÔ"ÜèD€ðË2iΑ‘:O¢~UU$ê577J uˆÇ‰O‚5—C¨¨ˆñ¬4Lf3jE`ëÉFšñVÉ¡$@5f‘–[0Ušp.åÐÎÙ&N©øÃhèÀY ouŸl¼ ¨:OK˜{©P~ ’¸|¾qXÌŒÙö =ÎÃðQŒ—€ÅVè:l"uΩ›ûÆáOs—HQÖgJ*'Äf‹~‰dg. PªŠ_¦>—¼H'0n'ö'íùjæU3 ¸\›Ìº˜„—E¿#¦¿øú7õiI ®ßX‰ÊXpL[SÕ»ÃmâvU¹ÎÜVß·ð O*ëŒÁ·ß°ðj€¤uØeþ4:DЖàçm¶)”ENkS8žÜ¤Xf)¬™ uâ-D¤|”MyÓ~ç%”O,Ì
»¤ð½Åhs@ Üb à×ï?„ÉÈO¢{Ìтĵ……ó`´°#'OùS\·eBqUˆn™ÎEt Ùi„Š.ÒÉ2~,l ‚ñ¸‚LöYJ]MÖ®w{Ça$|O«œüV± ýûd1%U
rÕ¨±G§XîŽq$w
8úâü웳+5¹Ðþ! 0iÅ=ƒ½º•ÎÙÇž²»÷ÎîÜûzõú囇gwþºâgwþ€ÿ¹ûçÏáϽ߯>:ûâÞê›Å^³ƒS¯÷VÜMÖÅf³wòILJÞyóÑùòé’鉩æ_n¶°gœœ©ò5ó7sM†±'0Ž+õ&Ï< ð)×xbpGƒ£iÐ Â$Ö¥c%PÁgŽ‘ †0b—´€Kïƒ
Ä.ˆ0>™#À$²(öGƒ]‡Ôå佋õÖôðª>|ÕNÛœô…†-àøÖ¡GÄéú¤]IÃMž
§åRã¡€‚ŒÝ¤hrð¥YÕ˜täÓOa¶
°×Ìåq “Þkü{c["Fvþ§
¶¥ ¦Öw*lÿ.?<η›Þp‚²ãï†6ãþ0Ë–K5äÒÈîE)8¼™9ömÖîýœšcÃSò’ôí»ù¼É®‹·‰Ñÿp’ç4¿É³jòîˆÒ´NÄ 2xÃ[Ï2Höþ5lÙ®õpócf”¥Í9x.’«ˆî ÉÇ6ÅÜYÅ:»ovRñ®Az :T7 ¿½¬^0 :kóÁBwÂÓ#T/> <ºÉsW¿¤´[foAÚ
›t’˜qçl¥%šŸæaÞ»jÆ
3k9ç·¸=¼–@rO ÷¿9/ô âÛS”DŽc7pØ$Œ]ßå &'kB` KÛ|8²eÌŠ…üèž”ÈñÌÀ0?¹HTój´
;ë÷$$ 57o×]f;5ûT`"[™AS×{Ab¿ýî"¥¾½>¬ŸO¬ÿŽþ8ìÎ4Y±…Ra¦ô'¸YPB
7I¶©!I[Ø.wŽk 7bZ?/HY\"€ßn,ö ¿þ¾ëÁMm9Hn`\ùž×ÃØ=‰Ó €È¥ÚY w˜á
9<ï° ?oi½F&¢Ò%–—Ò”ï°Ø–j56×#û< }+î‡&úúR6u–Öe¹§{Ëp§Â+óƒmþ+4=ÚþFDHÄzÚ%0H(š¾÷ ˜]ÈR¼ÌXýj.fd®›úhú!Sgb’_+•"uš£ÝNåk¤.øD’-%Ü I÷ðwñq/Â(¬c´"`…Õûc“¡-£?‚3p.ÜP\x "EÕL³q?æ0kúïâíïªi™iA[¼LpEÖx+Çz-ÔãÂVJÚ"ET-wMxZMéëéÒN*OìJ±ÅÌ@ä´{RD@c; iï &öµ›
Ëö]Îè]k›†d n"וwPšjÛõjÊ׸_…Š–\h#Ýx#%—Ÿ¤> .ê},NÓ¦jÙUše/Áä3°Ø€F† ½ÚX:z8Ö4GrU ]Ce¢¿C›Rl€:¥À6«²ã±Âø¦%0v§/ÜüiûhC5A®û æ`¸_×ú1©ã„Úí‡
¤3¨o³ÇO¤ò0v2.˜…V«W¥©Jq9¡ûÔƒgó~ݧ×WqëÊ⫲أÊò~âIYV.{³ÔØåÜ"Xá-ßrà긜V¯¡vÉ¥ õ¦ÛüèR
P[W`ܾö°Ø ñ¥5¡9|A=ßvð·+}htV— úu@eÂTÉ+ÔÔ[yc¢'û>MG§Ë¼p<܃Áv##'ÇÅQ™—MZý¨Ì êf¡Ì[î´Š*óbÖö„ i†ÅŸÁÿ8×úô¦.ÎËÛ‘›¸Vck†%C’»mïˆìd, ·×„ Ý
Ùýý…ŸØ˜¨
„¨¦i¢ë~U \=Œ»Òvx ‘ì)`Mèjï»-»»¼¨B±oÒ›fàBúKúfîr‘×cq¥7»[·Øܜ՚w¤ª]|G'¸_Ì»ž-’f³qßá
^ü»¾]S·n×H#qý²Ž£‰ã²iÇ%þÒãAì0¿aNлëeh¨ó]bpP i´Á+õOòË
½™
W½üBÌße–jz¬D Gtg|oƒ\VM!$„ áwÚfªS%‰ ‰®Œ%=«Ò‘óévÈ(â# ’ú뮺Å[6¢oçÓrú#ä–M¼$éšë6”™Ô%ÊýÚÍÏ D/˜/](=ï]º7î9ënÝ3ï íL°(@X\á$‡ ŒÄ¤ùu·Ü¾•ïÜ
Ž²
Á‘E—g
R“¾˜e9˜h›ª¯µÞ±ðRÕÚÀ(*æP¿Ö5ê]VÄ9A3*ãŒÉ'ù75j·F×ê¾# ðԶЫÕÕÙ:š`I¿ Ò^×áwr\Sž }ÕUrhÜ0KÓ5q&^Ø ¥—ö©ØyýcÐüÛûOí5g&A,øV2;Y Èu«•¹+/dðÃÊO‹Ô$>½ oi¨.K„[~ÙEÆ+ øÓ4tï}u?Þ¢^å&?¬’ [Mƒ¬”TÑç)w‹HŽ½9Îrgˆ‹Õ}XîÂj›b÷©è †]3 bQ¾W‡²k†“X´ÿü_ó_<ÄÓüÒ
¾OÊ£]öt0IM1^" hÿà ÎÔÿ篔¥0÷XòjxcW MUa‹¶ïX¿cÕ!wÍŽ/n¿ïoå :þ-u⣎k }Ó ÞçÖÓI¿éð–ö%fCH›Ctꬺ Î󔔇×=Ô¥@ÿÍÙÿ Ò<¨endstream
endobj
101 0 obj
4384
endobj
107 0 obj
<>
stream
xœå\ÛŽ GrÝç±Â¶ßºu)ï^ÀÚ]Ø4`À²‰ÝËs¡†½î™¡†CíRþyŸÈ¬¬Œ¬Êê)JZC¦TU™'nÕßmÄ 7‚þÿ^Þœ}ù ~sýöLlþÿ^Ÿ}w&Ó ›ñÏåÍæ«—xIù”C´Vm^~{–GËMˆƒÙx%á6/oÎþkûw»½ ‚·2þ÷ËÅ°`šax
~y…—;5ÜÛÛtå…Û>L÷^MW×ÓÓzï~··*q{3Ý:Ÿ^ûKg’裏çÓ½c¹ÊĶ{Œ~0:†BìëÝ^Æ)cò˶ٙ\"Ô
RY¥°µ=qʺÞ"¸l‘C^D›ñe©N,òÅno¬ œ·àÖ3Ê :Ž“{ße¶ßlëós¢'hgÕöMzÕˆøå}~Wk¿½Û)?(爣†8¥íöp³EàCäS1^íô ƒ
nûÍ݇íbT°¾UƒM>Æí»JÊ
Æë8¸hÀF
VE¼Ú<×I€r{I#8Žùëú÷ãòÞ`'iQcÂö[šT^aÕ<«×²¿ë:ê~ÁAº{›hQºíM+×PðýÎ0Ð{>èøn»»‡BCVB*ý^J? <{i€°$î‘B0d{¸«œ¿ìx íQnpnb²·v{<Žb=Þi3X‘€A4úº§ñû‚Ú½-t‘ÈùüH¿e·–¯]OW‡ééÝlYºz[žvá(ô fˆŸÀxñw™ ªþ¬VD‚%ô,B ݵ eŒÏ†>¬®
j úóËávYdÎÆ0418 i<æ6ìX U -Øé¨'$D %ôF‡mEÂÅ U(‚âë:ÑMÚ*¿‘nˆÉVT>¢êÕUç)W¼²µ•u"¶æñF
QF“ /H¦Ië6ë½ÄO)džFi2AÅ„dÜ“
÷ØH©¸à¡› -¯gM²»…œ'`Z;¡~zL¿š^û~æÑ«§^AmÐ
a ä©ç¸5‚%Üâ%#ÜjàV ¿Š[
[ Üóq«¡`ÊÊç"WçÈžµŒ' f‹Ò¥¿œ9«+"U Ê»¥¿Œžoÿ¸Ü+9LFÀÒ$3‹;ôîYaòìkO”É^ÑGÿS!èÛNü{˜áf%Âõ~ð„ýÏ…›gC†TZ®·$[h‚¸F}KäÊÔï®QJ
8ýÍýB©è몫ÿ0Š]ºFì×Jè™åüßÝ 9•ÂÙ®àUŽœÆ=}ÌZîÀ:D&³½ÎˆêŠ™F³¨ñuÝñdg4ÿ& WÏuè9c‚®ócßJ]Ny×Í*cèÕ÷$?HhQ
R¡O`Ì`Æó I휚†«vÃËp÷‹¾€±3 søS 83QÚ.¦Úe¹I)ƒéM ¡ªÇwe«.1c8{X¢Çãp‘’8£féȤ xL Hõ€Á”^ö|Ì£žƒy™I¬+²tj®ÈÒ|°j}B–¿™É²•ÏlÙÎH ‡¸f…•L<íûh8*À-ȆÝL`mС`‹éÝ5è*øašx½¨TB9µíé =†Õ¦ñ†Îio(u_ÄOYi©Ü¢áõzf”˜Õ˜ŒEŠœ¶Ð¤
Î6€‚L ¨‰…"¹Ža”/uŒ #ËmnH~ÿãQY~œ†¸Õ˜,í †ï.)9œNUM€8$äšdºxîPâ5#¹îôòˆûú˜)Q–—E¼›xàÅ &‹ñc¸|SoX†k£‹Æ–/Š×jzûGàKYat#å#‰Ñz²?‹üˆnhFË„(Æ(·ýÏ:mCxчïI $" 6=
$GÓÆ$<¸UÌ’zûÛIeÙô¯»H,›
®WóÍ#áÓ!ÛU¾Ÿ{ŽÜ–Z˦Höž§¶I—LëäÌ'JO 2ÛßQe*@`é37@¯¨±*X'ÐNªY"Ý´”=¥õ.gî;«Ü ŽÐJÍãkš˜?óEšÆ5ZŽ‰Â j®UífɵŒO,|n®ä±¬2s?f~À•¾©£Ø #"cl2@Šn¬C4N‹Z($‚:ÐÕîq¤HÇ
˱Ñsh*—V‹”of•ðZ1¯)†jQ1§«Y >‹ÜA,ó`OMºhóÐ嶖uG›‡ª
û³Ìtä…“Q¨ôÓ³Ô½š …³°lF¸ã ¤ÀÊÇAÛÈë}Ç¢¶˜¤#TJ¬à¿õÇ…ãPÿCoÉ 9_5p)ÿÒ²Ž÷ lÕYÕš"û°R9Lem5:œÐXuîo&Vrvìɦxðù¥ì«)ô»›Pñnºw±¬X‘tSªŽË7'KØ—öÛÙ½váÛ<5&v³-&´¨®Å„ûSø¦:h;!
¾œ•Ö骚“7uðîd•=‚ä_F•=ûÀõPÆc?º.vÌñB™3¡ðnô¡s½„A¢ZK[LšÄ¥´sù§{3ù§{ç ݹ*O{Œ²¡9ÍÑsP±DKpIm‹DL·ÎÇöh3ëÎBý K8;XÅ-ñkæ3ˉâè~dñ*3Ÿ“}dÖct4§ 5$MýÜ–"Á_…!yÕ*Èìên²õÞÂTÐÕº© ÁO62ø_†x´²OGºB®œµ÷ÎxŽ¸Ì‹GǯEãÄ/¸g-š»…»LÈbYB¡O©¹e'÷õÕYAµ-æŒ'ì,-]ÀÀùÁ}b³u:,åLh~ù§%˜ÁjäAÁ›UÓÕÅÇDpuöiði{‹ ë‚`!1^¯!˜%´‹J ’7[ â¯1ÊKåE©ÚÚ
²/¤Lž{@ì¬åÆP½3ŽEIEžKKéWHõÑ!ûh†ä–MÒï EßÍk9™™ŠÃ^V…ÁS¾BÑ¿ðƒ@6ú”Óp-œ÷jÒ ®I8bÆ4áœþTL ]†QÍ£9”D¡Ê¦ÔØË °wžâ$}ÏÎÞÇ`E!_éãa)`·†ÑMæmÚQaÚ«Žñ¸Ÿ…æiS:A¡žKN'§¶S± IÌi)ãÕ*I¡› …K¬’ò³ð|ä°–…žYëXf§d•*5ý…ÇŽÚ nŽ ò»e~b?6Ò_=µîœ†?Åý2]b4GŒ‚RÂÑ6øa XgºQ= Ñ ¦¸ËÙ¡
k0ãÐyb_ÏT0LP
Äc ry[A«—Ðd ØLg m\’Š‚É×y”©x£Ib‚êDrÐ&ÂÒìqÏ!1ïY‘\ÝžêúZ²y.«9ÔÅÿPpÞ)JgSO’Èÿi·§Ä%•ò•Á+p»’È—†iÄ 7XÞJcËRÁ¤Æ E~)7öP`d÷ ã»”~Vþð‰ûoÞv&9ï—éi·gV6†äçÙ3 "Éã!ƒäVgÏm}ó€Å¢ô
átÃé‡÷χÙЧöÏ<õ@Kø /f·»Å¾¤nrô¾;ݸ“Oò†lc°ïè.yÍ|ïCw^¶Ú¬b [¡q'œ ê–Nìþ8 wýbzaçu¿6gèeç Ì秱߸#èðüYügÃô›aL»/çjÚfá‹sC
Kh*Ê1à¦é¤ÙH1X+ ]ö¹¦jM˜›ç§O× ŸÓ¼®°—ÐiÆ{JóúSzñŒp _5%
`)mO²{ç×ýCëÇå¼¢Þ'÷ŬDO÷ f0§§¯O:eñ³öÇOmˆ½xÌ‹ñãÐéÀ ¤ÿÀN!ó¬M½[×â óÃÝ3ùC¿G)+”KP¼×4"}@k76ä’³Ÿ™Æ× ‰ÕyNB=^SišàÑSéÕÆÒ/ÜtÓÐ8D¾ÊÎ$¥m
¬· Á ²çfÔÃa&Ý+fÝd4ij¤Ç%„ÓøAªÒ;o ÷½hƒ6Ðìu¥ÊÃ{VB‹Ô}WOƛܬ˜ù0Ý›|í4F»¦Íì‹‘ý+ÇéçÆ ®
¹/¨_j]Î6ÜV¬g_1‘ÒR±¢mû¨çÙ¼¹&{Këµn ·µ×ƒtæÕ¨bEßë)Ö÷ÆÔ›µ1Mk7ž¸…“æ´GÈÞ9êÙÓ¥o†^‹K"—:À™z™‹+‘ZwRŒ¡£IvꑦÖÊá¾GëWõR•%‚« pr^¢)·M-º:é&‹5ÈöF˜:ŸCk ñ rȬL•[Û,¼iÑã#E%Q‰Z-=¦qd üMr[:ÚÂHJÄ«ÒvÎC“,“6Îý… †+{aQš)àåd•§ª’æ! !•Â¾liKi-‹N6äØéܱŸyhsÝÉLêÄW%îþ „6 Ç™wMEV•[ª>:×#%†¦ðÔ'DÊtÊ©XP¾Ü±®“ˆÓ‹ d:Hï†A/vT6ò9S(´T
Ž’Ã
©)%˜yŸïtò ·Ç§g
S3ÇŠI<µªÛʘÓëMï朴 „ªEÓb Þÿtš¦$#ecúØqµ¥‚zr sEˆ©OZ6 át×XÍXÙÍãZQ¾¶§R¯æ!Üì¼ê06¥¦¶ù#¢ß‚%«-§e¯R|J¼^ÏMåìh›S3Ë^Ç
´AÏzï> 3µ-qójØEÆ ÎνØp®a•$¢×‘5l{|ýOZ›lºûøÛ¶UzÖôœ(ˆ?R ô>/@Ì‹®j2/‡cK g.@ &FÉýØÆs2!¡Ëä„°HÛ´C,:ªmíYMZ¯k‹ xHƒ¾–>ÑßN³Ï>´@di§Œpö™B_Âí }¯ˆ¸ß¿<ûúì»Ä†Ó/ìélÕKj2ØHDÕÕË›³¯^œ}ùâß6÷ï^}ùÇ<ûò_è?_ýûoñçÅï6¿:ûý‹Í׫¿1¢íq±Ç^šßA„†EÄàóOŒü°Cj „1fÙD$X—\°H.nÚeF¾Ü'ÆœÁ¶"„ú}¦øŒÆMÅFUÁ;MÜ¥¨0õB¥\(z™B k‘„d!æAéè1 ZK'tÉ€IPs³ÒåãOšŒ>¼¨óy»œ†Þ¿ ;xUêþ+oS¾©Ià&¯íD0ãÚ‰Êií²´s¦,£NÈÃ]_bFè5Lä1EªXþò_H ¢'ÒÞÔ— x¼4¾×E}I²`ï ¦ç
§Ç]ÒÇÇM;J…÷…w½Ê̱d„uä¹—¡£|™Ü ¢.Bj8‰Àgò¡T]±–bè㜔ü‚ÙÈ#¹bö*ÇÕt8ÆAB =Ò!°A¾AéôQÛm•Èb~Üy…‡¹"¤›—=@2C¶j0’ƒ‹' FªÀÚÏb04‹±î0~¬”øKœ ƒ·8¢X…$×ÉκÉô)»âŠ«×g7/«|»}™ò»æÛj2ŽÅyÓ·]ß–%ºP¡ ²®õWAx¿ôWéîi5¶4 [NÂm3F¦‘€cá_Jó*™&¾Ê`aÒ ‘ _)’Òß¾e&'Ç6&Rl¨C7S=Ħ %` d±ë˜Rõ¹'éS¸g{ûÖ”+ÝØ–ßìò¯( Ç,¿úÐZšËëqâ”:_
omMhOÍ$©ÝôSáŒÕt9Ú_Ÿý dù@endstream
endobj
108 0 obj
4490
endobj
114 0 obj
<>
stream
xœÍ\Yo Ç~g ä/ðÍ»†v<}÷<:€$Ä!ò0EÒä:+R–¨Èú÷©ê³º»f—”i æèꮮ㫣ççóyç3þIÿ^½9ûú;w~ûþl>ÿ#ü½=ûùL„ÎÓ?WoÎÿp y.Ä´#Ï/~<‹o xHLÒŸ;)¦Ùž_¼9û×ær»““WΘÍýv§ü©Lð:L@Ï‹‡YÁXvòÞ !æà?Âošuå%ìËi]aØõ'!ü†]&a„¡"c¬–i 8i»³RNJÉÍE`,%D ß)[iLqªÿ¾øó™2
Í|~q
ò²ÏRbN.EfÎáXDd€sIÐ,>(#©]¢µzÒ‘^¼ot^6ìYݤ«ücÿEeU¹‹dô<)˜Ôë ΋2›O0Þì½2HïëＦzbÕ¤ý,òZo·ŸqöøËÍ0áríºüº/w òµ8z«…
˜¢–ÄIØœ‹ŸÎvb† JX0¬;ýÓVLÖ;X&ˆ’šÕ{v- Ì·U‡ÞUÍ
,…¡„Õ›û²V"?o¶*ÌL + ¥nõY ‰ûÀÞ~ÜJ?YÛõq«`g–Âå¨iDeäávHÑAŠÔì¶;"‡þæE £Û/îÈâ¶;ª*Ö· ˆ.~¡ÆrÿœÐb«¨–¢£š‰’!“W½à¡_uæä ªÅ-&0ñ Dý¨&'ïߨ2¥G5È&.lÓ§(M¢Ùæ‡ö÷ïب¦Ú‘»Š 3Øu«QIñ-û¼Û°&ª)0¬w Xõþ´õ—/(Ã'Hô‘ öÀ3°`JêÅŠ’,õ œd”Ð&ë¢V§••ÛºÛº'+‚W¥µÀMU¹ ƒ#È1LàH4 ñ‘±Ï@’Ê+
›ºP©«ô‰@“1”µƒ&njÎcåE3òõwÒÑ(m¿=;™öî÷ø
à-±p1c~|Σ»^vq$þº,wëå×M¹[ßøªüú~Sn“‹[ zI®¤ ²Nbé’™%¡òcßâ¯CùUžãøÊP#/ õxÒVéô¬ix¥ÁHÏsÍ% cÁšÉ`¶˜@žÈS‰œÃ{
‘6Ìîˆ}FË"0(¹ù¢A³ Ĺì O-Tžc9¥½Ÿcì Ù[¤ CÚê”"žÂ19ßW
T•3h~
àœÂN£©Uã¡rȸàuöäáLÊ ðÐ Õ@º&d ž8Æm.#Ú 2Ûˆ±¢AÒ íÒb@éë §&ɦ# 25ytã¸Æ7Ò·*Õy–Õ’¥%
ãÄ»–Ý“-(ÎFQÑ!HŽÐ0çJH4ék£ÊÖÌ •ÓLÓ ß°N=bh¥g‘r qr-¶&F<ÐÛ&¿ÐBGë}Í©œL©¿@
=€\$æçt‘Œ‰6?ž¯>üRB(6…F6ì kÁÀŒ»›
ò©aáXÔ'¡3¶ ‰7iž©€ˆ§žh
Ä/é-¾ív•|Ë5»˜AR–¥&Ƭ¡¢Fr%Å!‹#l8˜w¥^ € DÚ¬Îx°:ìKSaŸ=žáˆZQˆ¤8¤¦ µI;ã´×ÁwZ0#}ÃO লYV MøMª<ìfåèƒ÷væÛMð K5ŠIüÌÙ1ñC Ÿø)ÙCÏØÁy‘” رäÆ\
ø"…M–;ÛÛ”ý ²†Á0ƒä†4ÀbúÔ‰Q!‘sÊŠ9EGSB•-©R_ï3FŠfÃRâN{b©©ýÍ/#ï ‰W1|µrr _hJ’ˆhËdß*Òiò qD`_¢D‰²mxp±–(þø²·ÁÀur@Ò ÑxŒúŸ´g&…—Òr$À©öˆÄh˜¿,eD„µd§ò\–˜Gƽ„-ì«ßª1íd:äa2ÚïÀ“ïÐ
éaþ„HZ9ëºF¶dsèÁ@ÌDDn¨!Õ€j¥Ð‰d±-ÁL ¸Ù¥0ßI_M›&ÉÆJfOlæm2r‹ï¡F°‚šu¦¦Àù´bÏÉ ÍžÝæxÅ?SDSÞ®·08€ŠEö˜nH˜…ÆI4)œvs1<î%u@"ä!ohì)üÐTŽÎ4(CÕ–»#‰Ù…*ñfõOHsb>’˜6šp:$F3”ÑXLe,ŒÆfÔ’õzKÀsÓèA¤“³yWŒ¶í_÷™ììÈC]}è‰i2¼|c ÛGó)bj¬rL½ “M:ƒ°J)ò,|aÏ‚|íUfž:ɼg%,šP:p e<Í
yÑvÃÖ"s:è\0yO“¬¥vP]Š*8€X·` ‹H[àL ?Q¯ ºÍ` ;¦Ø² º ÑCÞÑ E*ùð6€Oµ›ü6È0ö¬á µgí!'×1bk}?E»¨jËGW‘âû&B–ÙiÞÄ ÑÃ)°áç)ì‹6d1î÷æØŸRYãñÔk¶Ag¨Òum=ÔÀu bÇY%K3ÏGœpñÁjE\bÝK‘ü γç®ÑYÐñ³ˆ³@ adÐT“+ ©ŠŒÍXŠ»)×n™k0)VgIE¹Øð“ «Ãõeö9µ4¢¢5Ãá< ã=¹˜_yÌeÁ›R¼íŠµzXg€¿®Ë¯TÄ—¹Ûµ¦ø¦üz•ª•ÎAÐL/‚óðŽ sÕ5×ÖaÜÛæ]dÛìH5³XYø~¬k¦…â€×Ì’û"*!ç=¶ÔsÜfu-V滯‹†”† Ë5 PÁü!èÞ3·»¹†kßoiav—èvI†—Äúj¿©xíMù•Ùm9mš£ÉìþíÎ3{ðt@&L_—¥VJuÛ_—k´°Ä䉴½Þ7Ý"ðWÛûîZU»¨&q;!Vú…+Üßg½».¢Ç©IÝâ"q‹!>ŒXU‡ìU½]ÎN Ì6bÎW‡Š$’ò:X~xiñÁÃjˆˆ–…Lm/…éb»/š—å3z~×ãê
GŸcÝ3}l±j;ç$œzpÁ•ÿö=¸…ÈÓzpíz:+uµþÊæqþÄg»?Fm/œ Ù#×aêeÛÓ°²¾1g zê‡ã"M: DŒ™ê¡v&ˆL² â³y©ØÖC«þ·€µ=é‹8rpŽé¤Ÿ§Yf#}=^]ƒØåÚZ4 2ö7‰æC¶‡&—«þªM„ÝtDš_¬ªÒQ½:ÿŸµÔcV ÉNÇsÆcá ûä*‡âO´¤Æ¹‚Û#sõ2VXÓ\ߢ߈î†[Ù‚ñÞÜ~Ý øù}‹ÔN’FÅ)5»B$OQ˜¨:‡h _&|ê;¶O”¹ûj#~¶@×¾-½Ô3ë¦é3)Ÿ
`àLgÃJ;_ Ø`¡°„ÐæÖŠsglµ[¹ò{6sR÷yøÔÅØH]zƒ×'¡#À® 1ãNSWË÷¤bajKé’,°B™ªC¸XÅ à<÷HÍÑfYiŽ®-ŽOŽå
j¿>òšm½(]3ÍQ«Ð,§±O,ÐFñªs—‚FAºB‡ã†:ößwÅž!ý‘§~(M&jóé"RßXgB‚ÂÞK`á}õ%ºhì@ wðªo[ðhÿqˆ×õ‰Ñçã i¸Ï‹|X¥Ñu:ZEöç—µ¦yM,‰>jiýZ=‘ùëÕ…f-"Ÿ›Þ6ê
¯©ÎNàͪ §±TÙže ‡(ÁNæºÄ
•ôÙ
_A“Mî?«óþUê¼t‰¼>¡MB†ÂP:Õ Ûœ ãu¼šŸÕú˜éàš¦ñÚiËSڊκµ €RMª¢
¥å2ûT z»ÀœˆFPØÐSÂ}ÿé°Ï‰j×$Wˆ{A; ~Û Âÿ¦t ¿sÄ<‡ŠÉĸ6S¶Ih§b
ýöP è|›ñÍóð‚8ìËòí%}¼ùžMÀ ¬Pºƒ¬¡vØAÖpƒ¬áÚ*díªœxO
OÜ`#:Ál.D kñ§Ö;˾…uì ^ &À7?PÓÉ[Dl„wüŒæ³#KZORà˜ÕÐo£ÐÈLúù$¶oO
âT±ôtráé#4ÎR#{X±‚¤úˤ}¦ËDÇ7E> ó¹Í*48NœYsœMJ9'Ƙš`ÒXu—ŽuhC«f\Gfm>,‰G $ªJ:ù fKñp×»Ç3ªQ©xwô¿áD†fN-´ž¼éç ‚n gWìÄË„¶C¢V×ce5o©ÕfÎ/ñú›Oy±ÂxÚ”=ù ×àÛC9ÏÇ"Ø|~Lù
ïý3yA]Ø‘ï¿vŽ˜”Ï>t–S9ì–¶¿ëonÃ5,ëdN
íVÚ¤ˆN`ìå@z ßÅ—o>?Aó[؆S™çø¹çéS'~ÓöÙ§ º«žy˜©OiåËód%£; ~löQ¥‘€3|ÕŽÃ/×øT’ïR–ì1@þÃbåÁPIˆ_aÏ>!ÌS aëM†À yò>Îï_Ÿ;5›Jl<ÇŠ ¡ZÚs'µi¹=N1ú¿ø¥.r ! Cþõß+84 oÜ剶˜£—lx£í`åšþ˜ÖýT‹™UQ3“ðì d\Šê;èç³ :Ô –˜÷ ³'ßCTå'>üíÅÙßáÏÿ ©biendstream
endobj
115 0 obj
5179
endobj
119 0 obj
<>
stream
xœí\Yo Ç~' ä/,ò4h;} Il ã ‰‘ ‘+)Sk/)™"m ùó©ê™î®žé™Ýå! a ÏÑG_}ÕË Vœ‰Ç†ÿž]žüú nuñþÿ^œüp"â «á?g—«?œÂKB®„`Á¹:ýö¤ÿZ¬|`F„°rR0nW§—'ßt_¯7‚IïŒë¶ß¯•f’[ß½Zo´ñLiÝýkí3V¸©˜ò.tëd^9cºý¥5²{·ÖÌ8£»gðqp×wÿ\sœæÁw·ñÒà#阴Þv?âŒÂ;Mg|Q†ßåAßÀs ×6toË Ã« Vß¿iuZˆV¾¬ø Žî˜€ÑopÃZ-º×q +ÊìJÁsé™Å~ÂÅé ÓàäU/ÓŒd à Jß‘\5WºÃѳÎл×eˆ‹r÷¶Œp¹Z©“" Èïj@•(?²,‰ŸþlÁkj JÀÐÌáô ´ÿÓZâçܘéj›¯.ð*a@RéÞMº×^š–LY.ÓèÃî´öƒ$$7¶;ORo-O‚ªàÓÛé¼d¥×KkQ<
BD“)æÌ`,¸ÑÒ‚ÀWV0,§—·Ó.}ŸµáTå×ù1±æ«âçëRœIg»çÝð®
ŇúA®6Á|åLÙ°ÏÒÅM„áàÔ°KW&g‚\Ëb£Ï×El=HÒV’TLjÐêé×'§¿úÇ„€Ä9·0, †t`Šbz[‚…k] VC÷e 5Ä
zÍ/@€k *'pª‘åâÕº·tÝm`ÏVÀ‚A\‚)wÁ7S`ÿž¼x†Â42ágqD+%>× å§ºßÃ%"áãeã`™šWt?S`€—0¿àÂÃT^GG„‚†¡™…°1,O?اtUP†å®6 !9š×/úõBŒn¹\zÏEížû("â$ñÞ«|u1rq¼[42°Ð}?ú _ûï‰tÕZ¿sÌ_
FÇ4„§ÁMµvˆçœ¸5l4(Q¿ mn¥±M!|«pPO2Š>õ$†$:ÈgCÈ©=‡€OI.áv{5
˜Q”¶ ͬä’
ûϹ6CšÀ¯w[’.ÐK5l]áC4˜ÍN
¬Û[3“ûÈ²É [zMòYÄxA`Ž ’\Yòë·I4 gXÈoÖ-£ÝÏšÉF¦Q•Q7GÙ]eD v÷9¬*H`ë%Øõß)U™’g:»O÷Ûõéw“¡
!b@aq<ƒÞ˜^>h<€E6”æRqc‡V FÈX³ÆÙŒ~7J ¨8‚]’Q+¿×Ë÷·ùñ˦q’ñ š¹¦î×g8gèÝ2ì.§@Aá×·¸XD̦Sÿ¾˜¸GquêT? µS>§¶Zc¤ùª·UÃeÓV!$¥aXA}…Ø ä:m}ê¦)¦já* ‰IØyáPà.â´S! €Àåy¹Ú@Ê@ d26\t¹ŒˆI‚·)(dº.¸„h—, Ã+Z @ ceàA¥?®§I/)~ÚîÈÿ¼,`*ÛxÓ„[»ý≶ª„<è·J
ÁoÔ` ÝÌ»U”Z×NEhž
M&¡‹D¦šˆ ÔyF,/“—”7{,º ÇôA(¾õÕÚ4ÇB•¨q›“ð–¢w .~]ì! ñºO †Û¦Åínz{•Þ¬&ú/…T¾YvÇŒ)@æb
š$+ÁE{cÆkÔºW†z\³RÞË!6òbl¨Cb¡D‡—(ô€Ó ƒ^¡Ð>J3Šç(À ’G9Qs„‚içW0®‡…«5šÀÇ…Àw±lãƬM§üˆ+„kI4",yÒÛŸG nxz}„Ië"÷;Äû܈f"Qøª°G¨½”³õ¬Tí£)ëÝ@ú†‚"/ £ b…`F’M_È
ØaM †-cP†â S !£…ûJ@k„…ÿ'xQ9µU\O£Yª¸1®¨ªâž¸ïàŠCàTãl/h,îƒU–=Ô86ÒÓÝੇpU¬c¡òÀ=ݵòP¨åýY¥pY rL ÂD&%ãŒ6®:Æ¥‡Í=kR̵cÁ«]p½tþSêë& “² ©•:zŒŠ†/¢ƒëÐfŽFÓòbA©¤„ ߎӽ!`+B´„,þ’£ •2ñ"^öÊÁ<ú¦‡B ¡ø•ÃÐø±C»R)î Ð Øäj”Ï?ž xxVFúÝ=ì 6} Uþóç-=Ý ®›iÁ_•øûËa.wœÂrm•ˆÈa-ýX†ÒŽÄ:KU®¢ÄwE0iªxE²Z*,FºéŸ/m\uÛåÌ€”¹“¡V9|DIŸ/QÒ£Üð9®@Áë*Ù.öÙ€{=Z&M…GÚ$Ä>€í[š¼¡Ì‡ˆ(M‰S‚RKSâ€èp¢ÔÐ Â\L™l¢B2 5¨Þ:{%Þ)ë´Hì?m@×&g tëO’r•O”ë§F¹~V˜öópÞô¤Î
"%¦›èI¤šela5°X! ‹šU¹ q”}>Q³OÔì'KÍÊ'j¶MÍšììOìì;ûPìlnîͱ³hbì;
ÈjDÈ0á1ì¬p+ꉖ¾àÂúG<e!]¨xDãY"ØÇG®àA² Ñäq!¼Æ$ú"ÊB‡&u..qÌÆǸoûvöp˜tþx>v‚ë=^/pf•¢q{YéÒ™y¥Ç²n¤ô¹²n£¹ihvíW*5¼×+ChW5å©Y'ð»—=€ö‹Ñ]=6í'ë ®H˜?8Õ3£O”ßÿ)åwŒ ܇ò;Ú>]ʯG”ñkEu‚î[LyÖ*ç·Ó²ÂVóhp ÀQÜ •sÔQÜKq{DÇ‘":‘›J$Ÿ”!U®@åq€âø¨Ó1w
4 ¨i¹ðEÝï46u$ÇýNœ#ýN¹Üïäà†jÜï,>q@¿SÓôÛfÃóNd×´áYæ¬÷úyäv[xgË„žü u¨¾Ä“¡ ]èeiÅV QªÄf’ñ´‹/ DS£nòáù6œˆ±x9'8:(ÞσYl½±Æ±Â7ÙFXH6 ] Š—x7Diá] ÍÄõŠªIhÊ ¬I%9ÜÐÈ
—Ž {¸Z(™tÙûƒjZ örãÊìc*º ÚGÒA–ÍîÍÞÐóÊÖ"…¤lß”Qv=t:•‘ß>rpl8xn<†ƒÅ™6äê<=m¦9Áìý¬gJ Žkº:Ø6¨–8 ¡<•ôÈÒ LÛCXÕØ)sKÁ=ð…àð׫R¥Ó0ü‘‡sú¥v,Õ:Cïm ÚCį¨®2eÏ"ägÎnfЧ˜á\ÆN”ñuƒÑÉÅé ‰3¶ÆÏž|Ö0©íKZÅÒÝáì²¢_ó÷c:œN=jR–W?¬=ˆ§š"IXÕ\='je Ÿ°•SÞ½" Ó.–„ÉÔ>ôrÃ|ö%w P#z=
ÁÎpƒW-.lH£Úès¾ ÁÈ%Çmäáuj*ÄÕ®iÊ#· {R³PuP¬_EMfOY‚±Í-½n³ÒÍΡ¤³Êrò;Èê燴¤ ûÔZÒê¥%ÝPÌÈ(øtØß(‘Z›q!/LZ;h,‰ÄWžT½#Ò(v‘ÔìOó²Zmˆvó:?žÿMé bmâÝÔêÇnöÈ? áÞ¾3 ìѵÏlÕäWOÖTñ“Ðs©‹W”!c’¹p»£Þ k÷wk‹àšÝÚ–RIëiL¦ôM ŠVJ¿&¹„˜Z;'N=‹òX[ÇI%5é÷(:M g AÁÿ6éE‡ý,úc(†Hûm:£<—Ä3€IkRô7àm^y”qj5dWû[®½¦Šnž$C!MN’Ñà ¹;X®¦âQI»¸
÷Êu›Eß¹>§ž“Ž5 wKœä|8•£Â âPo „\ª¦mÓ·šD§‡ôhÅamIµØ–ô½ö'mÜ¡ ÁSœ%ŽLF’V¡ÉiÌqnßÉÌz|Z¢( Xõ󀽯ÉÌSƒøƒ{òuÆùä›÷Yu)4q—®hökÚèÎ2ó>}è&µMÏí
Qµ›ÊŸáHºŸÁ¬ÂŸ?û)ÊË|ëE~í}¾÷¶ñô]¾÷n ЇøQü €j¢Ã ƳÁ\GNº4N ’¨EOkcß‚…Îf¾»öLqÙ~¾·¹IB<‰á¯—Ai‰i}~Ü ÒF1<‡´ï¹”¨Òî¤Ý”“U[zMêÒŒ¶ä˜\¤¿sǙdž@:8]:"ƒž>Õº‡F½ûº6Æ‚åB‡¨šŸÖO£i'}–…ÓˆuûÅZ0÷éi’Új xÎ@óó©(²ù¾{PÎf:g]=4ŠÂÝ@)q{gVÑÃXÆÔüI¤g4¤«XŽ#“B?oŸG®þlÏF9ÎT òëOeYçèG»‚—ËÑÄ>÷«#¦LÌiÑP‡nûÀ¹êæ êsc;À UuÄm½&k‚$ÐAqÔ{?ÉŠ kæO{`k:’ÏfRï² '>F©åñ±›Lc·ú«“Þµ“æI•>`0.e%ß´¬±Ùd†-” óeNñ/ò €÷ùÞÛ|oâ½ücžfâèHLQs±ï³hn¡äÔÚý Y£nÔû†ÃJyDinbêÞ6ܧyðâuíú“ÔÍˤ³ªt¾Ä7ÿxzòwøç¿ú²Kendstream
endobj
120 0 obj
3635
endobj
124 0 obj
<>
stream
xœÝ\Yo$¹‘~—
ø'¬Þ\µèJ'oòÑ‹5k°=h?Ù¶[šQ—§ZQK3Óóë Á#d«JÒ#B£Y™d0Çó»Ëy—3þåÿ¯>^üæ+wyóùb¾ü øwsñÝ…ˆ\æÿ®>^þ×[xHÈK!¦`Œ¼|ûÍEz[ÀCb’þÒI1ÍöòíÇ‹¿n~»Ý)㻹ÞÎSpz~óõVMÊ»°¹*÷Û˜´Ô*Ô ßmwròʳù¼Õ“qFÃ;ü$f»Ùßâõ:þ|O~.÷®–«}ëÁɽvâÛ4´÷.ÏŒ7ëÏu’DµWóõúWŽUB›)Ȳè°!“¶JçgMÃ!=Y?Ï‹€ï#Ú’FFss ˆççhAé{Í$ Fi'yƒ
¶*˜±a·n
à9ªBí¯W4½ƒEuïÒ-äNÏ@|Ó•¢YAž¢¡NFÓÜMë IÌöä´% PEªÜ°.±5Th1&:º§]†c
A—«4ÒRÄØÒ(4 (ä'AØv±*\«vœ*
î¥ÕÀÙZ5ÐÀ¨Lçk`Éæq %½NÑ’‘À5DGYh›€#ìî÷
6;!*cFˆêx_Jd1ª‰1ÔxˆjĺLBƼ©B•žÄ訄³mÁe¿*…¥QÁzi—`VJæô ʇZÃ95·tÚÓµ…*«¬{÷†-w퉓=–Ñúžy£zà‡îW|÷ÓzdVÞ\ãP(Cân¹Î|å• ó[ á
x3ö’‘³Îñ™˜_.Or9Þìw©q1‹Tæ™! ·ŠÄ‘ XX׋<4@u€(ÿÞ îgǘÀq¯;9«=ìj*Ìjc–ϪRù(†Äbå±\0ÿ£…ú*Û;
6ÜU#_´ÃüâPÇ@Æ'ÐZNäÃi6éÕá+
>`mÇְeþ4 ¬š÷l†¥Ë“ )‰9¾¨^}ÅRfå+ò|ò¨¤¯ÁO’„À’¾6cÀ=+£4{ÑiÛ(;½¤õ‹‘Û#“ P–ÏÁH±0Àe|Ûƶ>_ÝÄž3Ï¥$¯$O7W,•>XÐþ\Nq;ŠcÛk_0oæ*X€CDûé‰#ŠSC”Uí¼¦Z3MgôåyÏi¤@
© êÚñömê Em /“n› kËÙ ë>i°;üõ ´=ªŸcÖ7ÈX×þc¡Ù˜!ˆ£@Ÿ—̨ã¤A´ ²Ï›‰NÛé×Ås¶øÑFßåýŒÂe8Õ}H†'ÉØ>É1ÒNJX —H¾•(oZòjd'¦Ý \~_s¨c£œ îG!À%-bÓÖ”
thC œ›tÏ1"má ÄX¨…)§Ã'@’~
¯Á B´ö4u΀§‹’ì5ïï-©lAoÝMÖw×.¡Á(£ ÆN¾,£[1øm”}L1•«Ýßç0 ¿Ú>Vþ¾®¢m¸Ç+Ì Ò–Z¿"¤¤˜ÀœÅg6;* óP}‹2ðL|ôklû×ÒöR=ʺ:…nX™1’¤ jb½ß탵qÙÑP_ÏØ$¹ÔùâFã Š§¨µï‘~ƒJ ÕÃÀ†ÿLêqXn]wÕ‰új#÷*ÓÀŠô ›}Õª„ r6c 9 7ûRYïÛuu'-´”š£:Q‡X[ßÇGú±ÞuŠJˆÉÄÜwe ÉJ‹Šðâ_£ ºžðY0j²§ê%¦ÌÙ±b/œ% 5gû5
¶c‚Ò{ÞL%0è€? Ö_›š§m©sÕRYzÚcJßÓ~ΑŸèrk
m}¢"Ù¾3ÐØêTP÷<$óì’=Etbi9ÏŽû™’éòNœÓ8ùLÛõZóz/P“Íß6Ëe%»·ªøòx躒vè7Ë»·gÈ‚ïþm{ÌLciíu[éÒB†‘ú¬°zØW{YRئK¶a£Ÿ”–ÑÕˆ¹› 8A'©ßpYAj•Ì`̼ £/üÝläY]çÎì =ÓÕ5Ì—\B›‚"#|
’
¬ Ö-NWeÓI
É ú ¤|»¨†ƒ_°‚BÜôò“ƒ}ŸdÎæŽ`?8‚YáåN&¦ßØS‘p<¢äNvû/ç_ÇSRp²ãÈJÎ'îéõÊå1ÇÑTÀ<ÏPœ›_yV”S;˜ü…G™s3É}&ÏmĹ ŠnóKi Tõ-ŸlͪÌIG‘ïÜ`ÐØR•ÚX-÷Ô¹â,Éó:`éŠs1qãÙnßTøÊD,c©x,²Ûö—naLïÐü(ý¹éî--.Õû‘ŸöaÏôèà
Mà®xUY¦TíË!Ag3û³íK¯ ce–)'7}š³õÈÛ¹I4ßÕ–àÑÅΟ(H°Uˆjº¯1>ÙÔ§µþÙW·Ý mâê¼Ðv[ òº ‚ š¼ÎänŽNÙ¬göÐÂøí곓ÃP‚S}†*ûä#t:ïQÀ•zzF\
Rp*ÙtÌ¡®|»XíZ«fÛ«H¤f½
+ÂzuW§z e)” 1c—w[/ —tƒª‘óýÚ£ÌóÇé—:0Åö`r —ÃdnóZ
í?ßÒ~'åN´š,…óÔ6Fàáiå¹=[˜4HmÖß|©-ÛF÷P¼ôP¡['¹Øö3e #–¬‚°¤ûâ®íMÖ^E—>‘°nªêýÚcòØCœ’-˵à™p:áû¼Znõཊ·>ÿ¾Ó¼·8nlÚ™ÚØR¿öÿõÁo—«^+ìh‹^CEì\¸¯ý(|2ËãƒêéÃQö 9Y9ú<›ÕBÌR ñƒ4¾íÌñú4aÿÙ
Uwk °ê>¡S‚0Žµ/õÉkR²÷ßiéc»Æ¾|Ë>z+Ö·í£H.^Ërl ºøêÀ¹×”>"dh\ž²À¡dŔħ¥Ï–H…z×.j1ð„i‘´™¤ä–ä`¢M(›D •fâÆ . wà îø#E),éÊËX§¢"Ô_¸Lûe†ýUŽë´yÞw–8ÐËš¶‘¬ é2¬^MÂŽ+\e´ÿ3å4éÒ¤²®¶Ëa™Ã¾é M ‡bžVÙkD9‘uâàû]•i
Öö<Þ+Ïr È„õ6OîM[5e[C•’<ýKšõ´ †\p^WB¬€6×îN“Y¢7„€±]Ÿƒ×ší¦¯¢~àÃnÒF-³ævaç4ÍJ5˾f?.Ì~ß¡ÒQ»Bű}¬—6ogð¸|ì4>Y]lvðH»¸Wê€õ˜NƒÇ gI¾v7ˆ«kÚvfØùCP|ÛU° —?\¼ýÏ—§úqJ°€½ýq¹*D›¶{)©w¢èÕužà"œ';(v€ ßÕõ¾Ä*Àëæ únäÂ9:£>˜7Œ†ô½1ÝÇ¥}l2ÝáQ•%ç-ª¹1Ë%¾ý»·†¿øâgÆendstream
endobj
125 0 obj
4812
endobj
129 0 obj
<>
stream
xœ½\Io ǾBòxœè{_² gA‚ A "9Ø9P¤LMôDÊeYþõ©êµº§ç‘”è@0<˜×Ó]]ëWUÝüî”Íü”á¿ôÿ‹7'_|eO¯Þ°Ó?ÁW'ßð0à4ýïâÍéïÎ`§œÏ^kqzöíIüšÃ > wjŸ™9={sòõt¶S³´ZØéÕŽÍÞ*æÝôr·ÆÎFòé<ú™ å§xœ ÖÓû0Vsî§ëúÙe}ûÆj3+úÑ·8«œ™÷ÓÝnÏg%”ôý²ÚÎÚqø^ÍÚj•V2\%eàmü\+ßÈY:맫¸ÓvZnêó5ñÚ Òî| Q!ý¬ ã+J¦o&|ôœë‰——Ïó»8•n7¤š©.‘ g•q£uCyà7»cÛ÷³4Œ›øö2U²Þgh¤UãgxÉ= G2ÍEyºé¦ÁåÞ®¿5àÂ×Ö¯ÊÓyyzW&|Y3³&_Šjõד³_|÷£-aó]ùnÄÇúî6‰ƒ|Ú3
ß½!éLÜ‚&_ô=«^*ÁåT"£–MÜ&>ëªz²#qÇú vL3ý|r¦0Cg eaôŠ†ïªL_ cd°=)ÆHH5/«bZÌi+f$wˆø\H ÎnGIˆ
ÎèÏF4Šµ7 ;ÖPl4NŠµ_&)ÛjG
Ê$AWœûyÌÄuÆœ]6ÀãÐÄfVU&sœ|F4ª* ÙÀÊæ
c¢
Õ} ôIî¶ %‘ùr ³Cár³‘»f;ª Ce¢j•¯†žê««—ø~ŽfW VׯÅä!‹6ALFf˜þ(1ñ¡˜Æ(›˜>aøBŸÇÉ@/KH ˜k}푇æmu+u›
ŒPà Ï1dq’×ãä·cE5ðZ h€ÝÕЇ’©6ùøYþ ŽÅ°ühŽÉ!ÇF˜vÌÅš¢m†Œd™R‹9DýGë˼‹‰·Çâ>¿'8.ÙòU“`Óðx3"0 gLcfh
ùl!ÊñŠj‘bÆZxW¥‚d‹—Ã:K
N‰n|$#³Æ*ÀðèB9 gG’<\‹ñ§NŽCf'7J=¯±¸ JiºH›¼òaœR£gi³½ü|Ú(9Õ:éÛ²å÷)™u³R].‹ fæˆ÷¤2ì¹ë½ f°?+«Wâ–.WçXÑ#;:|ÌUÜ”¨2÷[#µ£"ËEIZI¥æ´cµÅŠ2€EÍ Ð4ú!~;8X]&UÇGšˆ@4.LßÎkðJnêj V<µ®ŠõðØÆ‚¨,¥ ýÂïwZÁSS›Yh’Oú¨‡*]lV€?Õ ý³qO°ç=NÜÍj-³üž… –PT¶ Šj Þ7 „])ãû¦(ñm¶ãWþ(× TüAšÌËuä5˜»¬ÆÎÎzKˆ»"›)J CQWMA Q>,ä*7àœŠLKKm îV!½S¤"ºŒJ¥%m,ölW&1Yóf£UNj€4;ØÌj†3dòñx!(|£¹ÉThõÈPjØŠòE‘Ù. « Ó-²÷T'ήȻ°ªòœ.ZÝýM´kj÷°+¸†$ÙÕv2!"é‚ÒrÕòŒ=SRaÄŸ½Ï
§3C½ŽÊ #º|WÄϾÎõsR)'wÛ;“0ýv¾wøD£?1=ûÉÁA+0Z>C”ÝÙ¯ÓdBÓ·ÄL*n¸mk‡v¿/ëªBV»ìFL¨¦A±^ÐcØY)™ hìIóxUlU7¤
ÃX¯~ ¶›gªìY6¾ùmÕê=‡€(|ÛgFƒCCïxHS´€°¥¶üaˆÙ“{1è²öŠ±YËqa} ¬ì1º©¶42"ˆ½ôÂÔ ¡T;4"9;l¦³³4bìùV–Ù†’aG³sdÞÍ›®ù Ê8P/[ÁMpUg0`xECs×yÊ^w£vlŒy 8É‘n’†ˆÖ%ž³ËÇ(!g€ zb!øãu7V«[· Ôþ¢8óÂ5ÑçeH´¡íç„Òy£®/ñ×Dn$áìHÆ5Þ4t Tq ŸÈŠhØ‹ªÉ‡ìpAZdIt‹”ãf~
ª*FU.À,’eOñ|‚,˜ßØ#½m<°çVíVœßsâîx}æšyWŒ~d×㋯¤lªz(¤ZCùu9·1,¸¤š~[¢Bö溆“¡LËͬJýïÏ òÆ¡r_gìÓÔ[XPÁÝÓx½òe¤H“D†¸Eè¦6²ÐƒpÒ Œlô¸žÝgr¿«©*pÛµ°ªóç
2M®¬5ÊVGÒaêuó¾Å®—ˆž'ȈÖË áÛÀ× •• Ï÷œ`[FuƒÐx¦² è¦Ö0úàNQÃ\H«=ø˜¬˜ß¤ú'9f|XÝ„›–r*p>ò±c§°Øë y£b9€r…¥ãYl¶zÇÕÊ TbÐâ½nvN Ûs]-Õ–Çš`"•xV Mjtäø@ª.¸=›ˆÅ8ìÖh3d
ꃧß5‹´Þ·[äy*DK›…4Hgh^ÓÊX¬kÃúàL]X‚-†he¹¨ÉÿOß±]á{¤ö°jÎv§Ø=QlÏ ¼Ìaÿ
ÒŠ’sNÐÅo’‰A¶`‹“AîQŽI»§_ÅÆd;µÆô¡JÚ O£±äÁš4-ya÷THmË ;µÄó `ôbu¬Ðz"¤ÕStèï0… Q 9€)§‰! Ÿ@Xbš|o[³â jPßF¹Æ‡×ÆZþ²År)N¯ü GUɬ}ݹ·ª [ç‹]s¿bÞíÁBgÈ=§¿•j© tø?åbCö·LÇ’·ÕgI°Íš=±K”¯O{<= ì‹W¢ëcjTâÞU>H½‚6ò
¬ K«súÎ×½‰p´øpvxæàG<(ZœX0,^~Â{!æ
ó½¾ýsÔ7‰Ò-™e‚ßÈT wòˆE®mœóLs”i"3()—êÊ7K…„]Õ:2¥‰éç6^üqgÁAaá¬íh´1î —T€TU5îð~ ’úAËCevûº“²³ Ëw\} VrW©Û!Þ>3¹Å¹–4iMWåÍ€‡~@3DWÔ&xµÍþZؾx
ýîÝžáÐr¶Átì"ú.¨qÄ&ï‚)@¥`t¢ÎðÙª¼þýyRàDÕ %²ÙS8ÂáÙk,•ÉXF>«Õü˜Kè1{¨£W/bžôê\ç"CEÇ ©-¤öÆÿË‹ú´i;(co»N‚q^idªja íK-Æns¥¥O‰Ú‰SÌ/> õ¸´ØÔ´ø_1#Å{áw'¼! oÉ•Ïa°w@-‡:Ž¤»?öIpp?uwpäºÉ\_• 9\_Ûv:Û9? µ$ïÕ§úë¡’A #Å2b£¼"¡ø†ðæ:gÝÃ\#](JˆÖ(ÒÜù W ¥î 2 â
RZ Ö’ï!!-ù ’Ù -×mÆ© µÍŠ’xÄM_–Š1sâpÚ›í Ý-¹º<®
¾Æ«ªós€`ùªÙGü ^šH‘º>q°m_)Õß:ll[ Ký„ m`Wu‹üK
üc8õDéŠy
18¡œ 6¨Ü‘vAhÑÇMÐw‘ñÌ“ûz4±èn·&âž®yô m1¹Úüo03¡™’k(†¬üý…bDvÝc•Rm[ó¦ªY`Ùr·[ —eBEãi“°Ÿ ß ü8‡ÀÂÈÐ̦×ÿHîɤ›z¸€n ø·  y5}s;L¦ hâhØ€æÛÓ®ÿ¤Ä¸ Ñ”#·Ú»¦Ânœ“Õà é¥×kû„ù½Ô\ɉGWÚ³)qKãƒVÄ™c^ÍĬ•j=s<ýêIMå¢Óδºt®ãXŸ1<£Ug<_¯lûôÂ[C,m(2iÔ(Ý ÝÖÙt£ò1§½Ý•–8•™k|69ë@üð!;0å3ü»Ø; cùFJŠ
0½a´KO@Ý70•m®Ý„û¤÷îž(òûêÚÉGô°n~Buã"Ô ^”L‚L ÔeÊ·ÇiÉy×꽉JçðÂÌÚ»ÇCÆ@™GøCoT÷I¦zÝ ·«Öð‘kþÄ8YU«¸_ÂŽ˜Åc¥È˦0/BX³Ú!aùíú£µªÔœ@\ÞÖرÖÿc|@ªJ„éróÌ?…)d[$I9‡K–ÕŸx€[¬wŸHMÈ”G þ‡³“À¿ÿVÇÓòendstream
endobj
130 0 obj
4495
endobj
134 0 obj
<>
stream
xœí[[o»~÷¯Ðã*ÇËK./íÛI‹E_Úª}ñ |‰ !Rì#_ÒƒöÇwf/œ!E]"ÅEÚ
Fàw‡3œù曡äü2‘BM$þ ¿¯—goÿâ&wgròøwwöË™ê^˜ ¿®—“ gð’7¥DhÛf2»=ëµÕ$Ha¼T×(!íd¶<»¨–ÓFHïZWýÚKÒV×䥯ž£tŸ^Ƶ‡(âÓû¸vWxJºËiÝš ‚Õ¿@”AxÕ° /£N¯ TõÔ lª—øp ¥Qúû5°_h+¢ÑÙª!Qu¥G÷³?BÜTÃãV+߬n¬0“Ù
Äë~Z7Âk׶àl
f”V
Œk¡½ Õç©ÁµJ…êqZ›Æ Ù*8Lm” Îu¿WÍÙ»7hdð@'‹p£;™k=Mk%Lct¨>¢)Ú`06^XôàËTÑJ‰;¾FûjPjMç À¶
ä4ZEg•¶z[CÝs«Ìà”•£ÿ°Õè§~7˜²†›"ý¸½ª>Ú÷€¸’ØàQ`8ö%2 7ýYÜ´ƒ bì—QmQÞmô'˜1¡ÆøêmhaÃîS°ç}î[o!rˆ"í°Po \(˜ôÚ‚;Å6š3W>G£bZ;ݧ«Y =wiØ-×½éÂ`¸ùÖŒAEØ2‹Ï„ÀÕ «Px±6gÀÿ q0 ¨]¶ŠÑÓZ¸ÆT F“ /4ðËP-L{ÁägÒYÑN}9HÛ `,ï Í+:×*ÏŽ ,¬nï7`m /Ú4N(`
6,,1öj3N´S ̃SZ;†…Ë~«V&¾ÄP¶;
”ŽzG;ÍË'<ï‘
IÔÍÕ¹ · t¦UP –Åm9j´¦ÕüT‹iPK n¯¹…Ïïßë~á R|Iï–öêáÞûxo©ûcܦçþ´Å׬Žœ¥¼3: Ýâ® ¿ÕZK ½®&4ГԊSõåø§Ÿº]ƒniWxª
Ô0ÕãÇâ.7¼X]1 Z“ ½Ûµ&m¡Ðg:›½¹¨ ä2ÔqE#ààð©RpN ä¿Á¢ie‹©¬ñhÊ‚oØ_µÔ ÝEu€•†A[×õÕVÉ€Ù©µóÀ?®zîYí4¼ú¶W
aXôʶÕð*€2膉¥Æ
¡„T„ñ ?ÂPÃ)mh$o„,â¼'2‘5eЇsyÝ'e€Ø»¸×9f]‰&„ÍÔ¥[þ[N Vh÷ÅB =C™m×W’í#nl…Œ]sRÝÕ?h£æ¬H…ëŠÅӃϚ¦;ŽuÝðuÕ“!ú‚«@vŽþÌ'ÒMa•8È`ÌÃw±A½%_iñtæ7å:x S@‰l烯Jkfëzhª0§¹0rcÅůS¬Õjˆ,Œ å^ žz!e`F¹¡Ø ¿Õ°§hà„zè°½ çtFw¶5OÞÙûæɇ.
“¥MQµâ®µrÂ…dãQ
|‹«®}ˆÒM6}ã{·ýô †Ñ —>Çמ†! \ÿ©ŠÏßdã<é ôT0²ýnAöÈÁŸ™£ôÓ”Ä*»ýà5ã>®ÑŽÉY ¤ìR8ªaç+y6ö–qí|¢tƒ;tµ*¹ƒÊ£½–mMÏQºŠ ØÁ\[ý£/·Ž“Æj»ÀƒRmõžy8¬
GN6x^GŒÜÒòÈ’;z½.o
éžJF(†t— £9D†¾"2HºãâE”Þçó@©/…øBnÆsÜ?g¡!´£;+¦œ¢=Å3
ÈFåßòn ë[ 3\Cä¯oRï/…àRRã±m¹ò)[´5ç37JyÑ5ø‡§¦O(xûQ jïSsœ¬ýn( U íÁ]A/†r—0AåÎØ€>õÙƒàF¢’Ûç<‡³ù],ésªøÍÅJŸG¡T(V 46>΋׆¬£¸©<Âxˆ—“ÑÁ¬ÿž!MRŸ¢îDða…S¥˜TÆðáÇfvgÝŒ3”–4ç‘€ÙÔçTîM><¤Ó³‘ [eTÓ]FiòðàÚÏI˜5 Qû
a^'«¯37b ÷=´ŒóQ·‹¼¡aðë[ùQ•K}(Ye‘ǧ‹¸9S½gnžÈÜm
3*_ž& ?,ä;Èà¶s'±÷)fd37u-ä€M%jâ)Œ p(*w„h™³{ÂÀ„Ê—B SbM7_G§ÜÃa[f–]ìsiíç R¬3,Ô¹”G”ú^M(E‘'pUx§öÍø;¾/•^¤ à*‹nÓŒ§¿f;Í¿KI,D©›Ú^ŸcJwr>ÿ¯+“ácr6‹ÊªÔ;s0¦(ÝfGJkŠjoe 0ç´“ÞŠÖßþ·èÛìà)ñm¡‹ñ47üäÝr½ÉwßÀn‚Ò:Ùn ªh닸ö>‰É0* ÖÙ‡o‹KWÉüûî”,6}>Ð5{Üœñ°Ñ‡T¹ä]v¾ìüµsJ •‚wºìˆÓe综ìœ.9û’Ïé’sºäüw^rþ7œÒÔöejãÀº½ýq+G}£Ã¿·ÈË‚Ø•sÿÓòÝRÈ̵9Ã¥=ežhS’bOÙóÛ£ttÊ—ƒ2–"ßîý!>]Ó©Ò4m+þÓ€Í6ü¿°W`êü¶4½% _ûZ{wQC·ÿ¦C÷Ú]ýµ‹o8toýÒjÚOwfï4qÏ÷«Aÿ“÷iÜŽÒñãvÿ׸¯¶OY ñ1ýÙŠZ«Úƒ&î aûT ýÿ™†Aì Ö· η;¡Ë8U ¼çh"âMŸ>fY8ïG±íUA9ou›þº(‰òÚ <ƒŒ©®¥Ðmðý¤Áþ ‹‹"jÿ~vögøù7=zréendstream
endobj
135 0 obj
2223
endobj
139 0 obj
<>
stream
xœí\[o\·~Wó#}é*ñžðNž‡>´i¤H‚6QÒ'Mu³¼ÕJ²u‹¢ÿ½3¼yxveKP 0 ó ’ù~3ÃÍëø‚áŸø÷ñÅÞ§ßØÅÙÍ [|ÿí½ÞãþƒEüëøbñÇøÈ©çèµX ¼Ø ³ù©A&Vð™ÅÁÅÞóåñ¾˜³Ú.¯ü“cnyƘYÞä±Ûý•æãàôò$]åïîòØQ~Úä·§0WŒÃùõa~ý& 秗ùí:Ýä±×ùé,-ai-ÓI`°ÐÕžD319I=ã.? å“Øx’Ba½ÝIž|šÇî;3
n›·8·wgééǃ¿îq5¨ÅÁ—{ ¿$×ïÒ[#â ¾>ëHã>?6TâسÈ("ÒÝRÁ \uù™ÉRDE~oòÓY^qÝa|Kj£BRˆ–†ZÐ÷ …(4<ÏO?Ö‚ 9×QÐZ0ù Èú´ajX&=]7š[ÉúUg‘¢àç™/ `:µ´®óÜŸ*êlkdܸžòÔÏÚÝ:ËârÂw íãã¯FÍÙØvá&ÅU;¥ûqç´_Â3ž
OÒe|—a–]^t¤P¼]›ðyyÒÑëÖ §±÷·sLØÆé"‡ÃÎÒÏóØϽÒïé,<S
«Ÿ®òä놚ÖE
æq®ëÕ,
õä
?ìS!®¸cKƒ‰œ ĸïµÍIrQfùYGæ/×S{— –yp>ÐìL3JðA>±ö Å.ˆgHNö] ÈÂ]ì]h(¬ýT’Æ>ŽA }U;†Ý†Ò²Ç~ªØŒª)ÝÙeOÙZã {ÖdJ‘#^ª(ÙMsøÚòÊ~=´vØp æ&oö cëÂÉWMz泩üZôòï¡Är>…œ–ìÂ^œ|Ôy; OŒ^tx^”ò¬q0UÀ4[|ÒÈßË ´ŠZ?•¤£+Áö?v,9]K}mß÷ ÖècÙ»¹QJá,Û.šñéMÃ@\°¥°EB5S?\æuÞ±Õ·„Sñ©#Ü_ÁèÓ€Q*Þ_Aéÿ9(ýô.h=¬RöÕ ²ˆ8Ù0ZÍùÔÈA:;‚žƒ™Yåph¥F7(‡â‡Š\W|PBÉH\‰ÁI£½jFÖ(}7«Ð¤JPjX
IáškºçJY;‰¦g“ ¤x'‘}.÷% ˜-thÅÓJHÝú²ÐŸ7=Áã1Ðú:ð°©):;(…•EϾãYùÖA|Èc/·IH‰Á¤¥’S¾,¯áÄrÐLK$›$&éâ§"jäˆó½+ó7é à* ‰ÈüS¯”ƒq. Iƒ:Á¨ wi=¥¼Ô•• 5D Ç1 ¿»¼s¡æ7ƒé` »7û? fq •ac!A"ôÚ"TÒPíBò%$eÜ—Çú—E³–l"'pá“ŽºsD,îka)÷ó‡p ƒ6an8¸VÕæg¸¦ ¬äÔ.:‹F}`•¶ ˜)’F|_2+ƒ¸©åÂ2í™2p+œuK£=ݽqrti±ë"bºä4·•À¦<(b @D°‘†xÐSÚSä–5ÉQ+#RZÏ£©®^ìñ¦’v4ng%ïYlÀµñ™õ‘ v;Ò÷8KÂ,ÐmTHªåFM×-Æ”N øò/ûÖ Èm-"M"ó¯'þ¿Å½b°>Îç"ï _˱!¶Ë‰KXWdeµš!žÚ
×pÓdÆÄ} eß{7m¥\®Éû»¢ÚÀA Ì€qªÚÄS R¯L¦¥nixÈÓÖD!/;æÜ#| fšµq8+s†ý®çOUléQ€¡¢ ˆ8Γ V+ ̺³ñ嶘ÀœK%ºŸ½dÿŒ [ö¨Cn¡DšÊƒ€Ùk ¾Ìþk0UaS €ÊXir]å<ˆø C@Å%øðq¤Úc‚i:FlëYr?rÖx¥±Ãè’Ó¯Œ‚áfê=¸”ÔgPŸxEMzûB\r<
KÄ^ YZ˜È¾L5[Ie}ŒYGL£ª’uÿ¬ “úÆw‚Ì`à+w}àƄΊ¶Õ¤ó ãV ¡“T„JL·Ç÷kÜLÒzV€ ½ëÎϼ# 瓾ÆKåë“Òr˜Ç ‚¥ü¡}2|ÓÂTÉùDoMìÀùJNæ¡.Šo íÔ&,:LT)e2,ô«Ú õq¯pPE $ïÛØYÑÌ®Áàúl̵ ¢¶‡/9
’“3_ ¶‚AoxÆ£µ¶Ä"[d¥Ö„WY¿s8@ø¡ù`@Î=Ô¶Æó‚ï²\†ga iRŠ¸þë óHœ[÷¾D;QlÎQõ½ª<ˆ€ç%'.†¸Ç o˜Ò1¡j8G5ýˆ f³‰Ô¨ ‚sÙR’yd Ãèµ4i+jiâp¯Üü°â|Ä /Ò´¤ž91Â? ß–°Á~ÞÑsÄ i—£‡AãܲîóŒ†C¬7BÜM…g™s°ï;áý¬“ÞÝl
›ˆÊS~M îàß“] èc9²~Û‰Ö¥ˆÓi©ÏlK£uŠ’šOí³öÑ=¶€„FìÃÇÅþÔ3m' ¼œBœíDCÀ³ÀLK
¨¬W]+©‡/5È¥4G¬50PXå¨ÓÜÐ^À*ù6À'Ƥ±ZÖîQqá?œÅ#£8߃3†õ¦8^ ZœqRF¹
êl,ñëwEí|C R_ÐrRÑ_¼EŒECÕÏ,É·-MQƒ”¦*é«ñ
IÁ.»%Wœf5ć~7 O¹ŒåöLÓŒ¹™OÉδ"N* #‚KQÒ4ÑÜDO9é® º“mVæG«bC_³ûª^i"`³I×eBĤëâ ›èGóí¶/öÑPŒ¯a§¥vAÜ~:YC5ÿ0Ózxu=ü&(µV¤2ÚÖx&5 Š
lXt—øw¨´Ìûç@I xïë쨋Z= €‚Ó¯K§§Àé_àãiײf®ÉJ”zK¸õ º¶FQèRd†E8Á ŽuÚ Û³Ù
œÄoÖE)0TH@ÞÚñèt‘€ N7{†ªõ“j„·©HÓÖÚâá{¹°ÐŽ4ú÷1¦wlÚ‹uNß»å÷Sž{»-e†ˆ" ËHegG6q°ê¦Â£õ1 7©0 ¹¹Ð3óÏÖÌš‘_4ø¿dF%a&Ѧ…6’5‘ "64k+¥lR¨~™¦ ʤ.†IW\,è3œ‘+ß ÏÄJX—Cþý ñ˜qÅ @Âj/5É$<åé§!Có
¡9ƒ–À·à“¿‚G@[rdº«£ó-< å5øç
¹ îØÆ9J¤)XÉ ;Ä
è·èü]OOðܘš¹ø±‰±fùÕ¾'XÏ%ó½¶øV ŠzPÉÑH_3ïý&U^Ö'BNMHÀ 2ßüÅž§“Ë£‰Û¬½A¥è²ա[·ñ~ Eizk1Ù;6ñcM6÷n]@žÊ?oG‘þ²ñúfé9ð0 BÁ¨j()±.•‹}¹;ë{íÃ* ‘8”º +"€Ÿ T´ãBJðBäS
YhÝí|W!6 @Á\ÆYEÓHò*ÿ^)* ‡ëçC“ O˜®¼“
û†ŒŽrŒ@ë4X·Ä›¤?võÞÁ¾ÄQáL¹[â‡ÏÃbx7æ¹û7XV IT†k6|ø€ÖP¯™{-0)µ Ö¢9
öWó7(¹m§Ê‡†à›qʸ9߇…D)‰â[’ýÓ:¿?•ž@iK
2Bv/a`Ä®‹Â+x¾Uò/ÚŸH4®˜Ñ_)•§réû·yìI¼k\¯\'Ÿñ¸+Ž—Àë£ýÜK%Òí²¦y ^O3€„ê#
ÀTw Á‡ÉIìS(R>2ÅeµôMŽ§ƒúÓ6%nE+5ñSo_Ø·fØ·žb¬õ†lEà 4[núÖî7èп˜<B´¥ÍŽn~0©Ôsr µ½qÇÃ+(š¦u¹/1uWq£.ÐyÚ p¢Å¸À^Ùïž'oï7ësÒâš¿v‚›ÙÑ&V}Ͳuµ³ho¥Ô?xl¶¹NšVõ•ï·wõ@¥xÕUë—Óð¥ÓÕZÓ&<¡Ùû¿Á÷ê-(
·0š¦·ëßàÀ]]¹›v‡º©z¾[æf¯Pa=mpb¹G^‘Î
m
ucÞýr¤Îöû)@'Â/?*ñµütªüŸ-þ™ßŠ<öi~Š?/ÇןuIéü[¬OʯÀ@?4ƒG.˨Yrjâ ¿Ôùuù9Sþ±¹QËÿäÁ7äuzbM”±²â«ãϵʂo ±`þÖCÃæï?HÙa4lú›Ž¾88Q¦«Zu‹¨Ôå_G·ÛDÿ¬œšÆ¿úÖ]çÚ~S…%@ªÛ¯Bv œmúŠç/_»üˆ_ÿù`ïïðçoÍÂöendstream
endobj
140 0 obj
4141
endobj
144 0 obj
<>
stream
xœÍ\[ Çqö3cÀ?!‹¼ø¬Á3îûA(Š-8ÙZøE–.—¢Ž}È¥Hn,ÊÐwU_«{jvÏ’k# 6ûÌô¥º._]z¾;‹<ø§üûìå£_þΟ½xûHœ}_<úî‘Lœ•ž½<û x(˜3)—h:»øæQ~[žE±˜ ä™Wrîìâ壯v_ž«Eoýî&·„Û=M ÂîÿZëyûõ«Ö÷×Öú²ýzh}¯Zë«öëïëó½5q‰!î~Õ:¿o¾ž^ÆÖ¾ýÚŸûck)PÅ%D Ի÷쓵õujY¡vkß×ÿõÈhhöÒ,æìâ
Èôi[Åu{û-³Æ ÈØi=šÿ 6øcë{\æËŽ6J”åàË’ùµ÷CkÚj2ôû{O :Q;JiÉË‚é“ïlj4åÄù;©¨Äì\¬êl¯Tæ…ćWçDÇ¿{w¾—‹Q&‚dèE¯ãîÅù^-A{kwoÚÏO{g}G·—"0Ñ^·x-ñImÌ"•¹ÓÐÞôŸÕåz=!ô.ç{å`œOÎ墜N̺×æÙ ÚŒ¾ nƒƒ
2¡¶»ÃÕ¹X¢7"†>yÙwTuvk$ ‰:i£iï·éu'qé0‘_¢òp°Kòh¾.€zÓ.”sv˜õpÝ ~…3ˆE‹á=nØ·ž5Éðw ¿kµ»„Þ'’ŽèP•ø–^Lj|{ŽÜ£Z”›˜„Ìô¨j½Ñ•’1š6:0òU#ÕáŸpùR[ e?”²'©iç@IíÔâƒÜ}ƒsJ¥ƒ¢„(+1&ì^âê#ìYnU ÷³/"úï&=i¥D^hÍŒe”†qpM¸ç}ã£×™t„® aÒÆÎ7Ý
µqí`f2è‚ßý˜þ
ª,!½CVÃMóÞ‰°A_‰<ð
l ÀféQ“¼™gBb yºâ\`’ÝŠ·‘~ðV^JV Ê/
vô>ÿjwœÌ;ž~_ÄÞh±8cw#o)@wmíâ]_åŠÑ°³¯òšÊç™ãƒASŠQ-rÒÿè|¸oìÝo£`¢¤Ÿ¬Y”‘¾F;ƒ¸l4:ö5tQ||žyA^Í1öý8 ˆ6 ÁíæX¬q™øD›)^B¥U½Ù˜¡v Ç‘Ì‘‹qÛv€g7Dì9ÕÜ&NS–ý€Gäݬd<5Q· Xœut*åƒÍÀ•°·þË|´—Î/Þ×¹ÅÀ‰XÀ›@…+ë+z`¯¼_œS…w¡X¢ËéëþÎñ@6€ëðp$`RŠy0Á¬7›T'.]€$*'èËyMΨ #cœÈH#‰‘|29 cëËÆý×—ÌsÇÖz~gÚÁ\™ûÝh!‘m• Ôsã¢×yß[ ¤à4“ùþHxCNí
OM,B¡ZOfBÄ
í”WÀEÛ ^—×qÙÚ»q%H¡«Ñ!ú ù8ïO
9¼ÖU*"NP‰ðŸÊË°ü¾”C~2Ÿd@ÉÓYóZc±! Âa^f8S¼ÏR‹r&’ð5¡&áÒ#
1€/|—¢ç„Ùµ… áA5ËÆBt-÷¤©Ú™‹¡Õ‘aÑ„A[ Ђ—}Ñ£µÆ壚܄ª ÊÊ *Z:ž Lڙ쪂U¹ûÃŽeÝrø0Çúßy Æ·Qó7†¯& [ïp\·8ª#¡ú Î UÝêB°àp.ÞÎÊ" ·ØŠ·±mæ‹QÁ%çó
Ó7m!õ=g6ø¤ý:±öq›ö Í–ÒKÓëY qÿs6ØÞMn˜=8j
™ˆAºêÖ$ƒ5ý=«Hti‰¬‘ß_tžª¶Y{êá6‹ ¨É#¬ø† ÷xlÌx<üP›¼W~¸fur¶ÝÔQ]%Ûá¤oµÝÚz$ÇC˜Þö(ªHç– çù4 &q×ȓͱMdgÜ3T鶼º”à>üeRä%}b…EŸo¯ÁPàîšú1&‘œ…*¸1 ºßmz§™ž6°~~7D“êï–ªOôÕèà$K Ì,ëbó¶%,·í€†žÙvv´Fƒpö”@ÕÀ bœœûjg«sO^B° лÅÚ$Ô]NÆ{ÑÙ rþ'«|WD«œ¡1™Š.˜¢Ã«Ü6!3ZN’ºàÁåoŒZùÐR
‘5›òT³E7¨óoðaÐ+Žµ¸nvR¤’6c´)”FXàˆ~oWˆ·HNóEY(ÉYÇÇ7¹ðpc^•€•»•Oc~}ÚZÇÛœQpsÙ(Ћ?4 ™•JJƒ÷VAÚ½”Ô'“Bò)4Wûnö”Qa=?<«¦1Ïq¬HWNªI‚jWrvŒNUR×·è(-Ôë("¤Ý¬_¬NQÕu`<©ì<†ù
ña‚.¸K,yH}¸Þi3+,‹Pé>ú*•–éHĤ¯R!¥û‡è«.—ÀnAØ•Âyb9¯Äó©Ê2 ÄÃœ®²0ÚÂ`îûé«OÝÔ[7Œ6{Ê<÷þA´fæ‹–êÁ¨”h„œ“º€ ôËûÆ@"¬
ÿ0êV™•Æ°°žÇ2÷dv?ekPc?¾¢ëÈÊ9À8E Öí{JéÆA'd—Ù‚ bRR.§¤0{!i·±ðOc1¡&† '*áˆGF
ﳇ*Á¤4L¼4mA†¡‚m«–6Fjã8bI†Í†´²^–VóÉw룢„ýÇÆÊœ§Ähsþ Ý/a%ŸT%+tœØ6½ÅÎ Ëz“U Õ»tB:¢ÞŸ!ô
$%·h@NIXÚã?9G(©jÀw"ì› v)†‚à‰€ÑŽ‹n¶ÀËd[õÙ,Ð÷•ˆüdZ¤Áf^ÜÒ*° ÐÀjY:«Åö_aq>—¬Þ>»Ä›m_(¾H=´qæ8óÞ±åíåpÆXMR`¯LÐ^c…qFönà^Èþ `è!„/˜w
ç N´ 8Vh±pn÷Á!¹†&%Qƒ®US¡eçÞC¯;:tÐ> ù\¯.ã‡"ý®œjBÁVèÛíÛý öRœVËÔ
˜8 x
÷ù$îae:B5ýåÝ: ‚“}×"Ô7$a¹z‘üU`ƒWcÈî'^|‰ ,ãªâ¾ÿ;r«e2f\MÜËUà‡Šm¤Tk+7ÊâHÄž4 v-‰ çH~uäŸÀq?sÔ:* :÷fË(QQV0`?
˜òã´ *`iú!àý뇤8¦Äêµ|y¿‘ƒ8ånA/RµÌx¢C-Íß T²BdGÂÒU%å#¤ë÷³{™`¿apÉH×[òF¾úw[ÄfCë{RÜQKüiô3i¼
@š ÍQÓɵJMjÂë&‚©ÅFs`›%Zã ¬±:銘ö båz³¸TDɉça(WL‘íñJL3wÂásÊ3§›%ܪìÉákÇÄ¿»gŒ§ê¬~ëÑФ°„°®&ÎR3ašå¾…¡‰9Ƭ[–б”ÀÁuOÅ C97qÁw žhX1,~="Ò©v;õƒ)«úZ©ß 8…®™®Ïñ-•*<&_P*’’>bÌPEK’Ãe0åe{˜r‰ n}aP8Š®fŘ£<•ÿP«Z7)êïïód6÷_ø+_d2þà³ôîÊ|û]d¥‹:i34’j}ŠÆþ/ËØD¸; ³*ü¶Ë_{~^«eU4IH¶Â$¹nÓÌn æ¡
§
‘éÆӫ¢î_¦É‰
ZÓ•Hˆ/_œRÀ6cIéRä¾ÉféħÕQ~ÀUÞ6Yó(ü L¨a1
¡ªú@
{`œü êeS„ÆïÛµD·ÌššÚ<ÀD¡ ä`Ë6.Ç¡$S13;ÒÛí^gíw™[Á ͵_kv+€fâq¡šÞF\ZG«[Ó¸ƒDè¯+y©T± Š\Da„T™×óÒ ³o± )7Bâ)»!kuSk‡Òø;9üŽ:eN¾n¹iž|Ã/[/—$©›qhâ:裕ˑ”à½7D2S½NdŒd€Q‘‹CúßéJ˜É€Ñ" ä|¹ñ€Qe¦£“·Q‰ÌÄÁŸ/ ¯L”ŠZÛ¹ã(J¸ Çú²w®|j20_öNW(V8;-tºç†W)SA¦ÚæD…öÜ’£a¾q$ÅHˆu Nx?‘ ù :qàÙ±,K ùè ZµèñöŽ)Q½}§#oS/Æ´ ¸yÜ?00U§ÏyÒáC- zûA¦Ä‡…~y@¹$õ›W÷@þÅ*É\›ìŸÀœQçæ)*?¾Ç) z‚ðÄš·YNTòUe%I« j§ë«w¸
5u¡åhK«§³f®^ëk4 ô-JÖ‡Eغ±qi«ÜSN—’@ï‘`ã¤R½K—¢yË˽[¡ÁA26Lœ¤Oöò <éÀÝÝòL9{v§7»bƒrEÑz•’ulvöPwª}o;ÃGsXFë*R¢ àv`L;ŸêÕJ©k©©a¬‹E “ Û (~‘oáeÙOëŽëÕ%ÊŽ4O—p\
Ү鎮ð ;%˜¾´¡ì|h”»
ÆH_û ʘ2¬ãª¡‰F… —ŠûxeútŒ[¥›Z|eªo:¹
›>húIg•v ŽÇ äAŲ1уæ¨3/bâF Q½Ó¾>Â*PZ±Ìz¥õC#iÚÜ#“Ýn¿x;… ˜d)
žòÍx¹Ÿ*MÅ k¶;»y,ý#•Úß+júë[3hcÁ-†C- "ý„<Ø á†°© –áãP˜q×l ò¤À˜ž5zãRýPÀçSÉÞÆÕx.p«H £ª<€êìõ^î*ñ† fð,‚_Çc²SÑÂ]R|\Ù^T ó’*a/êù y•Å~º€-ØA'
ìæïÕé(Ò—X¶ÎÈ‘:Ÿ¦øç|”¹v€” Ïw…§¨U 9 J=þªñqò¤¥R2ëwË|€5én…ÞMXª|û|™î¾Î1Þà!×*Æ;+yZ§©b#ãŽ!DŠðŠŒÙf®z gBÏŸé"‹>mS>èÈ:ëx xÇM㪉÷êÕsbòùë% $mwl,Ï$¬‘|Ó>[§ûýè 9%~ðPËVî†Àoºu÷iô‹V
®jÆöeY£ÁÜjöA¾EN¼Äý£I—?b6i8Ùé [ þÕţߟ¿Xª ùendstream
endobj
145 0 obj
5112
endobj
149 0 obj
<>
stream
xœÍ\Y Ç‘~§ìOØŸºv9ïc °
Û°áÕÚ±/’ èŠ,«9¤†#YÄþùÈÌʌ̊êA°Xgd _ Y?\‰I^ üSþ½~ûì×_ú«× ž‰«?Âß×Ï~x&Sƒ«òÏõÛ«ß¾€FÊ_I9EkÕÕ‹ïžåÞò*ÄÉ\y%'á®^¼}öõîßö9oeüöÅŸ¡[0]7ø-ìüâÿu¯&/ÂîCzòÂí^Õw?Ö§›úë»úîËúô²þz;ôÀ§wõ×·ûƒÕqŠZîõçÿ„—2NÁÅÝ jË6â±>åZ¡Ê
á]Þ¡TÝUœàMÙàóýÁx9y¿ûçÞLÚewoöbŠÞˆ`$=éàãî ©?Éþ|ÃX=I©wïÛÏ `HëQ¥¡
hV¾IN ÁAMxØøÁNJãÎïòœZ{Øomp; ËÎ*¤¢*ºˆäÖpðQ[:íÛ½N´•»¿C'$†‰ddÖ¸+?I´,À˜º,$Å+h ¤L ÷’7mt cÞà@bòj÷ Ž#ajYrÒh= Iw2åÛ=œŸÆêâ<Çù¶>¿®MñÄåˆÒ ï§c.m”t†r¨@v’/!qÕVm+y½µ¸<ê Ãî+–þ…ªd‹ØíˆÝää€ì?À€þý©nl3npBS²¯¸i°fü ™ÁFàï'`†…lÓþ42{ÜýÏ>ÈÉ:階?2R»sZG™¥[dòEé»úôã ~@Ì9áÖbä”Ä ¹ØU€p¢ªqR‹À¶eŒK[Žéíñ:=ÅhåŒÚE»V)xŠ(Q6LZëÝA'ç´eÎûpS6n¸%#–_“hhå&a’hX%ôBpT}V-JŸæ<¾5¬”À:´T“
•q¿nÏD È¢g2ØÊ…(ßÈzÏq` Ì ûDÖ
Þì>"—zÐ’rù}cÓ•v.dÓ–« j Ëà ÷T‘•½nƒÒÍ–v™´î8,¬®¼{ ; °še²Ò ¸BO&FE
»‰Œ¶òŽS mS pSn²ÀU_bKã–¡ ù3vó(óÄäÍ 3BÇ&ÉJXýz•^ÒH`×xr`,@UÎÿi¯Í$ƒÕT0ö, Á t´Î_@ÇovÛR2÷*ïØGY4v'E8ñ‰aÚgqõ µ$¾±ø$×ÏÈïßì“Oe¯=8;,0ë :G¢ Icÿ¿†fË»¯êÓ+f^°™Ö „´v¨?/Îï~Ã(ôûaˆàÞ2H¯µ›ëÓõI íÃd AzI³x·©y—øùØCŬ¹`|KD•èš3ó<9R$Ø QÓˆ
’ľãPU Ê©U @¶AºÜ&FÐð»sà°•QJ“7™äÑLƒ;ÇåLƪ
± ^Ýý+DîK†õ_×w3#6·DHhOy6½@ ïæåø=µ·«˜ò“ ÔdB -‘ð€b‚u½7° “01Á’·8ª€Õ1óQÞOÎ{ÖH7åäæx$žtŸßQÛä×KÔwy[²Çì²NÁ\‘^8O,Ìe”^Svwì–ê;kØíÖ+…ôp$È<‘+ ›º J”Ôîݮ܋B^@öá(Þ¯NºCŒNÖ7Å ‰éŒµUàh!Ya@jø#:C'gÜØu< ªŒá¹~NË
€#ˆrŒ˜ôÊsZÐW´Z.0T(ðsÑ€„
/;›°°>=÷m H4ÛÒ¡•½a €f×\xZ<’‘óæ.Lìd,( ÙàÛ²Ø QPUÚ @ù骉ÿ´Gï؇#0õÒ¤îÀß/§“_Ô—£z‰&¦qÆ@Jð@ÏMÌ
è7b>Ç Y
Æ q&§Ð‰TÉáiÃÈÁ?h0· ,Ž×ûfÚ;FX›„NnMÔö9ÎmåËk !Ù9ËH÷ÍX{Ø”ñc JôøŸ•¼÷]†˜U K©Ã¶Ž¸–üy}ÉúÝ{F+À n +•hÇúÔHž_¹
I}ÖØÆ *$Úð¨¤Úñn3.Õ„IWêgo=G"Õ`ٌѓ‘5ØDOÌüé·Óň)zERoÆX`.‘´á&qÕBqH{Ŧ¨¦†Ñ1(·jÉ[¶èÈ5uõÙe>±±Oúp†1D_fš^L2‚ñTJŽd7d®Þ’/óK~ÃÈteŸë!è 7“ˆfíqS‡w4´´”ˆÁF© F¬Ä <±ýŽ“ußý ÞY“Óq¨š<(' ƵeA«ƒ—‡¬œÃŽ„׊ªÓž*ÙºñùsVåäÝºÄ yü°Í߰ɽí!.h º`|TÔOÆÇÞÒ5w»Yºæ£ïz·Õcf4Šz_|£ô“D Y¡&ŽêF‘TQNgLêÉXöb앤½¹z“]_´40æT@WO˜Lj „ýÅĸ֥ ¬6Vúµ€%òmâ¿¿«:”Œñ¦©Û &ÚHHõôx쿵ˆðŸ w\•ËKÖž,“
ªÚسԸ]¬¾Ó™œ?‹ˆ!ÓY´.¨p BÒµLÌílÒ‚¼å0Úk?¢ŸŒT'pS¢øÚ@àä´ fãÀf‚F›0Êýh„d°8˲²C5k+ʪG»‰êNˆžÂÔÐ`…[
€žà¸ƒ=n #UÝÇ ™ý"nŠÒ_b_Àô‹çÞ‚Ø\Àðu;¼•†t¡þä
¤þeõ8Ϲ$WƦ=hŽcí›æFξëÔ6] ¨4¥7ÝÔŽ†`Ÿˆ“wOë㸠Öæœa¹<>y‘ǵlt£Ñ2–s<¾ ãw'+“Þi¿¾ˆ¢¯QžAçóщ?xº # ÙO.Áȵ–r„ BOÑl¤L¸’éùX‹Î'}jf¹OÙh)&:ë@¬i{ÍetëKq"[ŒtÖ+EÔ
¦
îLÍ:¦(ÀÕv€Ç¾Ø£Ë„¡cÞ³cžÈÇ.Õé‰G¼%&…®ZÕ$͘ð ¤Â—ÿ("'ÝvTIÞf£Ólÿ»? ù„Žä¨.VÝ*ƒûà
:ŽªîÕiÚ‘%Ï R>¨tá#>M†ܤ;(C<ÐùHÜý7Ù u½ñ ua,@νRÃb¸XŸGF-^JÃÊÓÚP`ÿÆxDŒÞZ¨mÑ\Öš+Ã¥ÝÒÊd×Á·*"ð# È÷yÙX–{.·I|7"[/s
{c–¦‡Z ú· ÆWf;žš¶
H eÖRñèfq|WÊ^fçD‰ð‰ØÜ‚“%¾†"€˜T›Žwi)Ñl¢>=$ ,:Ê’g4àÐ}S
˜ÄÊ, w 0:
ä‘Øú“¹+óÈäðv#æÁNÏç2¨Ld ÖÊtñÈ0®êÝÚšm] šŒO-7!|Ž;ÚÉ:‚„>-¿
£ó<„3I„õS
âzÛóVÊ Mù¢–ž©Äu] ©rØÌØ
.ܱTÉiÅøÇC=‡ýl¼ù®ÄÎ#-qY£Êb/(·~`ͱ„¯ ÝŒ2èÃâý}YrðÄšÒÃb1jñ([Ú DÏЬª§æ3¬Åtf Dbë’2 €nµm©{íàÓA0èuùË!Y Jæ ê‚ô|çO|¶O5Ä“=hC0;,NOÀR¼ƒµ´< ÉâN[¶s–1R‰l”@mÑ%ç¨(Ð'·sš¹_•Âã’.A‚\V(EÓÝ›Y]TéªÈ¿¸òb]<¿ÂÌ>®1n䧚ÒÏÚRPîN¨Tuû›¤ÜµÈï¦AH{OÇI< Î Ut' ÓF¬—cŽ£·£Fû‡ëÆÍ{|£e“}äJ&ç®>’$¶39ܦH[t #üÆýæÖáxCù¨¬×¬.x^vu#…åpU‰ x/º&y,˜î0éLó Ђøe b·Š3’ÆP
Å0™bôH]w —pß͘ón.3 Ãl6“Nº¬&¼^w™€R.Ïî Í}e*džã–`·µ<³£MïÊ¡ äú[|ÔZ¾ UG;À¢^ø¸H2åÕáý¶.¼Ònbµð
>½¯Q§!¼¥´»“õЀÍRáE…¤ëƒx-Ñ–)‘)(šJù,%·´5zuzØ™€tSAYêǬý³m&^F{ÕçžÏ2"U(D?‘Æ 3ZA;Õîùò>þ¨?Dƪ7¨éšCäÞô«:( …Rö^ Iò-ðXoF.hL‚Àx˜K¯_#òU°XÌs«t‰Üa+
U. Jx {I‘v ñä*‰.YÀk@4ÄòÎâÍÔÇ~2Z’q®[Jtn“¾O¾†Bš¤j5
0ê¿ñwÊ‘Dç3IÍäLª%mÝß‘-ݦ¦ZÚ²"üGð“"Ÿ_ ÷/Û…Èvi¬XÞ—Ë
ðÈF9e}Y/º—§ön#ʉÇE®` ½R`÷¹jŸá¾Ê#¿A°8}õ@ΠħU&§ú ôòüŽbqé¼£ ‚½N9³néÅ÷É2ˆÍ&/ý©¹fµŽ¡
ã’Ùˆ[¸usüL`¹ó$‚ð'æFÏ5#¯1¡W¦ó7gìøÍñHwö”˜l¥ HMÀœ8]-®1y/;«q= ÷fq
½1T#„)”–r Ûß™X¦}¤L*«&íä “8Åϸ<Læ ±ZˤïÒš$zÉMËý‡ ܼ½)‘
Pª¤{
‰¬Ø}ó¦2lâö’ßéCr¼{qÁ_ßü+ÅßDü‰5e|4k–ÓX!ÏÃݶÄj#oÂeyÐYôJ ë& È&àðˆH>QÓ)Š%”_#HCÁv Ø|Ï|Šƒ¬{H€@/Ã%Âe»‡|¤©¿BS‚û£sbTª}8,œB öãÁ1 |}æ1ÄŽD'é>6é5/vÛrœ°®"H€œÓë˜'Æó¸ÄbPDò_ùHjg²‹Lz÷S]¼—š !¹í–õ?®<€µb 4'ò@ùâ·Ü±‘ IåÓOF kÑëïVµ^ó¿we˸'Œ¼Q´wìÜèC™¿ ÏÕ®”† eË G /fäR%„êCt ¡I9W0sÁ'1Ò%˜‡[š?2€«]ºn_’ù‚„N[š“¶ëM»«TÛžG %×C·(ù‘Ët¨‹Šä/»u¿º¾< Ü"ôÊ0@()ò•™5,Ï ™káKr«21çB$’©h—ëï‹y”ªÓ“é®fHŸ×*Ö¤¿I33”³ã®OPfxʦi Iakcñà ”¸/tm©œTŸÜ'ÔIrÿ{f"RYo‘žÐÛg˜3Ûj°Ç'²\
ÛЬÍùLð²T"ó
Ó+G·åã ž”¨âúNEAÈ~endstream
endobj
150 0 obj
4955
endobj
154 0 obj
<>
stream
xœí\k ÇqýN ð_Xt/°;é÷#
8ðŽ‰ö+€¨%¹¼ö%wŇh&>Uý¬î©¹w—Rü%„ èj¶§»§ûtÕ©S5óÝ…Xä…ÀÊo^=ùçÿô·oŸˆ‹ß¿·O¾{"Sƒ‹òŸ›Wÿv
¤ºr‰Öª‹ëOòÝÉE… ¯ä"ÜÅõ«'Ù=Ý_©%hoíîõþÊX±xåv‡×{
m¼‘»wû+¹etÜ=ßëE woò5 ~½KôVÊH»:bWrqÑÒûIƒoûmÇçÐØ„EE½û°7 ü]ùÝá] ã%4p01+wo¡õF‡Ý}êÁIS»
ÖïnÒ mp;ìÔ†EÃ=/ðïRáÕ»Þô
Žªa ÂŽ Õ ±.†Ô»Ûá&l©5LðYš€1À¬ /¿HaO fa°wÃsÕG8” °Á}ï÷}ÿIF¾‡~ã"´tˆ¼2Ψò 8ƒe$ ‹ð»=lG€‡}‘§¤¬ ‹ÿ_×ÿ †‚F·(€Íõ3€Éo÷jÁ _QÂà‡víY»öU»vW¯å¾G@µ( CíýÛüDÊD2ùw{çáÑ>ìµYL„UxNö·þz]WºÒ!,Æ\\I¸#w.á=¬
Àk {à3hÄ ÷²7õ¶˜wÇ{˜r@„éÅ
¡Êî¥Í)Ûà¬*Û`
ERkw¹¿²Zñ@Àz˜;`pyž’ÎhèŸÀá 6ÖÐ`GpzèÇç¦Nïéj0œ×32¯ºÐ8~„ñ=½Çñz‘°ºç ‹Ù²Ö§3uò€Æ„Qè4y¶Ój©´\ c ê¶÷J ïé Á¢ƒZ¬“…äþYÉ>YÜ>… öÅ~áÅ|F•°ŽtP ˜»G,Z%t ¥„Æ»»7Œ¹×Šy1ÁPн)›,nME;iK ö}?ðyqÁò‘Åý Ï >«ÕµwÄÜ>í“9¹Œi
`–¢€;Þ]'ƒéq¤cl yøᎠs /ÏÕ–÷
¶Ï¶ .gO+ZÁö½ÈK •= Ñ~–¯À
Gö—= o3*½[še W°Œî泂‘›v¥ ”1™:'Ö±Á‘<:qΓ9s!쾃K"m)~úŸ3d¢Në‚žœá9>qËâŸXkrÓ¼"J,6„ é–Âö†€CQ†p‚Ú¼3ÂØÔPBC!©K݃ƒî\÷<I¯HmŒ‚#–ôŽÇ÷mŸØtŸ²%2ÉrøÁQÌÜô†ãè¥Z àê—yA5€éu£ ‹w+³Šóî,b8úÅ`$¨ç¥‘qÃ*…64ƒ4JPÚAE`új¯‘l€“Xñ‡ÌQ•Sø».aêB‰2ÖÃ×;[°œÊºEÇÁX{®´Û.‡]¢we!‹Ï¬;=ØåçqôæÊÂÃ8æYñæ5ë,n¡c$Ou¼
اÍpÛô§ý¤Nlá!Ö Fˆ 8½ûz×›¬ç] ¡`kµàyÈ»• ×èpl6óX7. ‰ºž”;æÇ…¡þÈôô`—Ð:ò}¦‹$¿Uܯ÷ùN©5Ü™°ò”_ièMèxº8äÂiî?Åû@5r” ~† aùc"Ûè·Þ5Úýtº†¿ž·¿þ¦];´_Çö×çHOa“ \¸jþ\Ÿk÷³vñgõ ŽÜG ÷AØ:ËK\mp[!®O‘òÀïw_ŸÝÎÖ`EÉ!Êö+ ƒÜ?})°· r×F8Á—Œ‹°Ç}rÛ,·<Ù󳊜g»~Ì«}±s]›‘¡€© ß‚§ ÜšîÄghÁNœå¹™A?”ûtêrOoÑ>â À-¤YÏgø¦ ˆCq-¨Bt0ßöéõ0%¹`¢ (Eý! ÅÑ o Á»¦$… iå¸ A”Fô1f÷§}€tŠ'(d¯ÐÌuT¸8âB¢å‚BHªsqÐ>p àlÆQ–1¡ý`n§Î0Þ Ž°,òq`lOBmýa„‰¼DÇj+gN 3ìÙ7ŸžPH¸Î]q°b¡A‹Ÿ`¶b³€tàž0³!i ¾ÚÊEórÜÄËa×)J°©µ ¾OÏÑß›luèFº*‚œÛ XiXùHhâ‚×îGúX®ÆBQôæ?ò\ #Åx&–˜ì¹g##C2Ö¬†_õøÓþT‹5jø¿BT‹†1ü%ð ôÄ Ý5AnïN6-m¾ßÃùV®m¤]"CnÊÚÀ„óSø‹åS>l“–4ñÃSJ|jí2›p"þ†ÄH:µßn)žÆH¨|Y; kÐ$U‡ÜEú*|5FÃVUIqyÝýj¹—?·ªž9´k·íÚËvíÝ© .½
Öú29¤†”ZJÕK?{„›ßÜãAËâ ²—궬Ä#ÐÌöˬb;CƒXb¶PaIÒ¿?a‹¤O™89åÆ8YÁÊòÔ9ªTà¯tU¦V ! yª¦êélÎG剃‡xg\ããwí×;’¯Ã_V¨\”Gòc»ÃX”—~½®÷rèq3x\aÔ]Ys‚–ੜ-þy-RÞ2í—r¥klêKç½i‘òµ@”©žÙ§U*
2RõÒ
~ ¬7Vg] ÐéñØ¥eóû+ÌA á°Ænï¡;½¾¬¼Åˆ !åu 8i˜!þp
-*'Ákd¶0máÐSáññvà¤Jq>&›N„GKHÛìš0›tèCц¹A±Ÿ£Vø»‰V!O+óA3±8¦Þ~G èujª¥Í3±2DÎsD xM“«@ Ÿùþªe¢¿šN^û€ÊyL…Rc /º¸“í¢hw‹éüâNf~Hb;…Fú”}*\é±,wI‹qÖf
EÅ£¶”‚%´ª?ªßÍ´PŒi“D-â(ݬ©ÅF2d‚Dy‡ÎöVÚžft¥o#ï‘V#CRƒ÷ý,âM[–ö»¸Jûzaç£ Ü 1Ž“é K7^3ð~K~]YxBŠY Û5Ð9P·HB×
pÝKÝV5ä¿g7›—-æ<Å© ]¹˜'«õ0Y=Lö O6Dl-
V}FE¢µŠ¬_ïqóŒW¤ ±iDfÈ\ËØZ؃—Û:yVg:/˜äê ¼éc›)î'áÍ©ó?•q Éî ÷5ya'×Ú‰ú_¯ˆ/g+;
ZWCch$ŠÒGètJÄl[PáSZåë7ý2ÑUZº’] Ý” »V€©gî ŽK†Pv—g«F9&¸”Pb«Î9)[8Yùå\²¹Ÿ¨Ãk‚/R
š,ê0f–È0Yð!ŽU$¼ÞyÇ]v$V±I>8z ‡íÒW‡"m|`ùV©ˆF5·›§/Ë ³«š
'_ºQµYYþôÖ@¿Úe¡Å¤±Hã©å,e×ëH„ÝŒ¬í±çbZµ²gÞyʇ “\l´1£’B–‰UöŠ°Hèb}bF¹,ß“‡H5C ;á BD*¼åözÒ?qŠ¶àcÚQ<¶5s&‘9Õ”…ä28Žñä* „vŠX¯‡ÄñeIÀx»}˜Ž|‚`QÚ|RÚj^cØÅ›Þv*C¸ž0$\½^Ë`•f#@²¹kCbÝÆ:¦˜“°) «øY2fñ¯°Ëd¡3Ìasïú S’ÛB˜eÁŒœ²¥Èâpö~ÙrØØn5Kɼ¸Ì%›ù â} ³×¨U–¶ÏÀúÈ0WóáÓ¡ wª˜c|AärÏ
I
MëÈ'‘' ›@4IéÚÄ'Óµ·íÚÛS,ÑêAàò€¬•? ´ŽsÊ»Rb™)Á§¼j—GBûLl5"Ég“ Ôæ[UI‚ üM±"ó{®dk©Wú?<+„í¦®”©£E`lbë,µ‘©e³b:?ºÚ}SêkãЀ‘ôSlG’õ_Ö*Ž ² [%=•€± amq§·‡+¹%†˜äeHƒ{Ÿt*k ¢/qM&æ©Kœ+h´DÍÁÃ`~ñ[ é‘»j¡ÀÔûŽúꘀdÎ9‹`ŒG† ])ì!è`(Θ µD<ÎcÉîô=5ÝLMÜúôÖbèè):TIÏo¿•VWÓüû gM¹GÎý±äö²ŸöÍ÷½òðò‘–²<Û! $ÀÀot9ZšE|,¿4>ÛΨñÕMŽH"¼_ ½TzPf§E{%‘ë„ÎQ ¾£=YðJ¹¤óØc )‰F^y,èHæjHC×ðt„¶Þ¤m¦žU4˜Ú±\F‘PÔJv0U©Íº’ʘä=¶Ú”KT#úSÃ70l™y2²*uÇE!¬cÊž¢T?¾E@â?þQ¸ÇÙ@µi†“C¬ol9³~p(å¸x® Ó¹ƒ×*î·×º{O•!Üû¥>?Í“õL{ñÅã^áÌqjvô{z¬÷Œ²©™„ÏåÏåÏåÏåÏåÿ—e[s¤Ë(›žQþ¨”ÁO;õ)• 0©¼Ná&+Y~l&š-\m‰fóI‰fýJ4ËFJ •§û=óõÇvMžI4›vÑŸ2_Õaóo㛀9Õyöë\œ„Uz¿’%‡
@;T ’ŽzÚ`¦=SNbÊèÚùp£Ç½Ý¡†”ð¹¬ÚÙœ$=Ñ'µÝuh±âdÂ/YšÊyÄae¼«ºùcò9Ü(Q€eˆM?G”¾×S?\ hâ«2y`÷¯ûë¿®ãy4â¢é-ñdRmü þÈ×·zÊ•ªÌe6ŸÔµNù¼ô‘”µ‚Øî*A€Ði2òöGf* 9gµæ‡“~¶&ìôu"?¼Áòž2…ò¾‘œuÍsIž%¯_öbdDJ6ØÈQ úØ~ÉS´ NSc®Kùf ·äݳ;Ö“a·a\ÜÄÒä¶L”ßµ£ââª|{’Iúßû/R^N>
Ò&F«b F;¼3»zY»¿sš’ÿ‘¼ a«:"ã*”HìôHþgúÄb@†Ôwoñ1·v°µºK ô•3®”c0üí]½ZŸj Û«~çŽÓAð®KUuCð |¸TU§O «´j'>,–-ÐESÍM<âË_|!RÒJ¢$ñÝZwÎ ÝÇoö>%äÂ$ˆ)¯²7é— ”8 û°Â±ˆ;nH|黫’ŠòâgQ"~~¨òG²)/!SŠ“:ÙŒù f³A&ø%ÈY‡c±AèP9‹Ž[ó¸È/‹ÇÊNö¼ˆ¬O4ù{B¢~1 ˆ,L\Vl/€x!e"œ8¤µH„«DÀB´ÎÖ‡aÅ(µõÏ…Æ7YÎ¥à¯Èå…•¬#ÑØTºGl{ÿ¤è8*Ýöiȉm%aë8 íöaˆiþ![%£œ>ÌâÙâªú×ËR¡b[ ÀƇ“"O©‡/£<íù¢[j‹K0á ~Bñí±‡†E§èi‚•+<¾î Käy¯ò€
¼Â3x^õ bÎ% ðƒaN¬}|•èzÄËÒ05dô µ+£õ˜‚†_¤n"ÿõÞiXÑTCW9hÏ„f·äÊï›5Ù¨c$$‚”ôU] *…fÿpÓ®uLe+ŸŒ‰ F øP¡yoò!¹NW°õ¯¯Ÿüüó¿à±Ÿ¼endstream
endobj
155 0 obj
5216
endobj
159 0 obj
<>
stream
xœÝ\[ G~7Hü…/œƒr†¾_€D"‚ !,O1Ž7qZï:vœÄáÏSÕ=Ý]ÝSs.Þ]#!Ëòx¦O_«¾úê2óÍ…˜ä…À?ó¿OŸ?úÕgþâÙ«Gââð÷Ù£o ÉÔàbþçéó‹/¡‘tRNÑZuqùÕ£ük ·ÌdÂ…Wrîâòù£Ï7ÿÙî w!„³ÿ¼üü2˜î—
~ ð÷—WÐúãšD"l¾LW^¸Í›zO–«Ü“Ö´'¦Pºùív'§`¢œÇ”ªSOZÆX‹íNMA{k7ïmw:ÈÉhµy½SôFÄ°yµ5“õÖÀœvÚ‡IØ͸rf’!l ?οÖÏ-Q›oqFY#±my~“:uÒl®Z÷äùËö««Úôç8ª™”ÖsÿF× 9«6Ï·°4'ŒÝ¼¨¿¹.S…¦7Ý\r_ró÷6ƒÛ6ƒ/à2NR{Eï^ãr夵ß|S€3ЖîÐn ö»íÎÂPNhº°ÛWó¨ÆXL6NÆÙåÂóó 7›ý
^
ÖÓãøº¶Å¦ÎO1ÄÍÓ-ÈD°ÁÑþ_mQz´u“3EX¾,
9aÞé&ï.v¨¹ý§Ux_Uþ²Þ{]¯®êÓÛzï³zõ¤>½~W·õ)ì˜56EmvõæpSÆ)øÍGõ^ëðº^å Z¡šî±Úò¡ê~ Æh §ÜIѼÝ(/_7)©{WÄŸ' "©ìfßDOFû)Ät ZÈJ¾U27-y\ˆNjGÜ12þB IT9²¦Á\`õñ,y,ó{¼mB8móÖ*ßÉt@l§LÅ´Ã?KXæáYü„g'㧚%ÁºY<ðfG|íÏÝÚ5ëÁ×-D E•SbRxœ7[x.<¬v£ã|\>nžµ}¯÷àX´Q“’ˆ =¨©ž¬°îBS32´'Ð?)oüæ»Fxö†—º*J°PñàÏ€×=éàv êt†
ë?€80à ˆöÓÖÁÍHqÜëyƒ•©[©%í¶-ìY“Á%Ðâ]ò«ý-øy¶†¬-ÏV ;`aÙš6쯷,AÙT¥‹“$ó€äÁŽÁ¨"yRS„côUò8F á›ßl/ÿ½êI!*oˆû³¨j¥ñIýɦ²ž,;U v£,ñÜ®5 #X ‘0¼R•Y§®ëU³qžQú›¼G%ö逴øø –þ (¿¤¢›ñÝ[z÷uoűAÁ¿ÂÉ$òFšƒ”—£šøxØtˈ&»CÑfª›¬â•*v’•U3¹ÒÍ´Ý+'«ü €ˆrJtüæ[vCØcè7W+59éÖOl¶Wäæ€d“$Ëö¼]e{i„TEØpÒí—š¦¨d¢€ë"L&¢±‡k—6çIBí §úÝÖ9
Šš”ý5ùO–7+el½%Ü'¨µx“[H€2‚̺1
"EûŒóÊAéÍD嵄, B¢i„s×G5ê.B¼!ìZ¶ßèÙ}@³Ò®mnYæÓ6-ÐMSeÓˆPÍ[f¬^l>nÒÛœDª£œlU”Ö2ó¢Ýü-ÈPÈ>Úz7Eá=nX$ MÂ>r—Ž¯›Ça#0&užC
Í&…ºˆ{ %ãf÷œžL ×íaÝÞ-Èap½Éƒ®ªbzì%V¦n°˜ $ÁíÇ®¼]?ô(¥ ïq‡¾3ÂÂ0Ô›ä ƒ#×óaH Ä”³R±Nöߘ¥ÒÌ-g¸B8Syr„i{‘ã–UÑ]¯Øìs„ežÞ{3Å ÂMzRƒ—tŸa¦Œa¦žŒ~p8ÒÔ;DšpXíZ¤)qC àÓ`VHOw˜È;±Ls Á9{EA }¦
ñŽC`hqŽ‹uDv\ $ ½›ñ¿’ƒ#Çû•ƒwrDáÏ;°Â,hÄ‘CuÂî9DkC>å|÷=‰ pl1: ü EˆÛ+ € Uá4Ü–‡p@ÒÉ Nt ®jYtRÅ©èH
½7S" ,€ãìu¡—JtÚ¦²’«Z ü2€Mös8Ê^€X{!%6¶e£÷(Ù¹¹BÐÐRznÝt
†*ß t¢vNh²MÿS DËêƶҽ•ÞöÃR*5ŽÙ¯Î§4<ÉîbÚü‰ý
ÃR–†wÕMÈÑŸØCõóN«”EªzÏe¥¹WŒñ‹ö+Ò`Ž4ÅØ°š¯`±G½B,†ÝÕ¶ö1 ï&ŠÑö¢(“¸ÔÖ @k)e0+è\EÂ4…
ïf”–5Fh
U½vÔšªcCI 4¨¡vzeíi1'«¡—É´µßëIKà^~öÌ@ÛßýA÷]Ô‚éWm±GípÐmÛ×ÛÈäÞÓa‡¼W÷rØ}× ýúÏì ÓIAØ€ÐaÑ93–\]•§¬™““»»åH ðQ6à?:44Âmà'9Šc›1HÚ½mÆþ”¨ª¹(Ü£8 î@ýè•j£'#
sØ †Dï¡;ŒyªÎJžxÿô
¨@³\êjCæ!BVšþ’qZ‰ŽÍy ¡RžÇ† êTÿtfÈD ¹þ«2?e¤jÿudéqtÕE`ëïLj8 zÈ-¶¦o¶œ€¬qÂÎíÊaQ§:®Àp|°\†Þ»˜aY…F¯°HÛ›¼ohÒ~þ] â¾^f£1º•ðà
'Ã- Â8£%“‰ÓÕ´XŠ ¦PÑÝ…Æ·¦äR–êš•æA3@žôjˆävó,HÐåÅÂoB+A$Œæž^óQi6uØ%·IÈ’ 8fàà`W²È°‚ä€ôlì óÈúÿ2Ìlð Y˜&ŽÇÃú#’ã#'¤Á"Eƒ‡^‚ñ:ïuþ¤lPŸf§Å¥ø,t}Üü|à'V$™!ûPÙãÆ0ÉãyÙc ˜iÂ0(…f aåK$ÈVrqí¨Q6Ƈԕ ØwçŽç\ÛƱ9WîH‰B°¹þ>8„ª…UÄ AãÍÚbÒ«\mâϸ IŸßy3–ìW*@)ü¾œ‹‰Çcáq0d·_Ì7íš ® ¤ÌIâ™ðÑáÁnôÇPUí¯ÕƒZ ô"V6)ì…Eì—%Õ¡:y_m
%I_Ž× Ý×ýŒÝþíâÏWTsJ¥«¸{¢$W³Óq…´ÍÄ5É%5p¬n±áÊ (ìäiÉE}0¹².’±³µ
Ç‘ÝÚ×B$Ø…ìÆôCÎÀ¹cõt}ÿÔÑÐ"Nî,âÆzõë>:Ç¢Ruò› ê>ôÞÌ¢Çë
¸’ͺð Ͷä]²Él€šVÿJÙ%–¥tkõ‹`½É1j ý[ÏO˜š× ê½O™§¯H…íÎÂô#OJí!âu‹‰Ïn™Š‡àjv9ß64Ûyï%2[½÷Ãù8†§¢(Z 8×ù‚ij<³Äˆƒ?‰&÷nøj@ƒŸ>O (Üí†.AêM#”OÎ!œyf=/"öXÕð†ŽÚ•Q&?ö,, ‰s:ÛW#Så8A¤Ëj&{q‚ÎA×Ü»šÆÂÁQX¸šã€ÝîáÜÐ=â" „\,Ò Š»,ˆ±Xlt$þ‡…N ¨¥yŠû
›yd
ËèÖÌþ™ZÛkœŠ„ƒ tÀ™Îààzl(/èæc‘’Ó ÆnˆeÀ âÝ«‚‰×è^¶¤óLú¢¾º1¹f
ac¥hê »G+BŠØ iË£HŸª
k02Tç
´$àzúߥßwÚ»TÉrR™v„Á½=x «•}‡÷j`ý˜º•f6ú©S4£j¥EXÇ8¯Å
ž,_ˆ¸È½÷Òµ¶ ¡Q¥„%ÞrÉ’‚Ð2rŸô/¤LüõÞ§õÞÀÒ½úÎ
góÁ*Xˆâ<º¶6C»@—‰B;qÈÆx3©-K\JI›]
’sÎÑ2óÙ2T5¡êaÿùÑå/?ßüÏ\¤ŠØõ3÷¼ŸE¦ÑէĪ"S±h“ I@¤JÞE6¨Ðè$§å-ÂRCš€øu"ÕÑO&O§þ–ù.Þô:d›0ù÷åÉR•ô]‚é!¤²]:Ù±ÆÇ™—;°“\áÈBUc4ÉI I6Çó}VZg&Æ$+'L‰Dßo ÏÙáÖF7Ey ®r—gDTl•À é͉¡â¹l˜Ñ®®„fgÀ}·! h67‹pãÈסŸb‡ƒESÆ #0q;ò ƒî“\ ÎÖ“™Ú
Bì'ÖIøOð9Ü2ôæè&s4K²¶¤¤öA‰~‘ >‚ˆÈ)ß…¨
Á¾ z“e$‡þ–ŽÞ\Én'é†ìçëñ`‡ª-Ö
TÌ%¢M ÿ|©]ÎZ[!{ÌÎpÖõ(C|[¯ÖHœKÝÚ >$Lð_‹Ï࣒À‹
@»
+ýåW ªN–Ž™ì¼ØU$Šç€j¾l+Ãi ß~·tzDΓ§«dqº3õ0cF?,
ßûÂQ]*[Ô=¤î’^“Ñi
ãl²€Ífò¢0¤Kq‡·PSàK¹Í5ã –B4Õð{LPObˆõh4#³íu,^O†æQj1@GA8^¼g•Ðœ ú.ÓiCÊœbîêͺ–5O2k¸ fUÒú›fµ·ƒ°wxóüCæs/™|IžæpX©"‡¶ÎOŽŒŽ1[*½Æ’¾õÐ}qàj ““dŒM™ÓÉÑ?ö5 ‚ÉK6–“C¼S£ ¨G‹ÖO öÁâ?ÏKj–ùMp ôÂÓzÇ%P›´^”6Ç.ˆ)£A¶!T@‚ß‚Û -2sÔ¥¨&(xæ,¥$ÚÕ ¤£ä8"œt‘ÑÿB0Råp8ÒÁq }¡í¬Dçü½ê„rÇξK~JÛà(býŽrÔåyÝ©[™é:™š×ÚT¤¥×ŽVÖ”ä¥ì
Ñ®{s´¤‘µ¤5¯Dû£cªÒ†ò6},yG®y…·³M¯!éó¾R“MRžOïPk@äÈ+ÎÐEœùq|<âE¿\¢Ä ¨òé ³ùG}ï½ÿ¸ ~¡G¹ú9"Wº)9ùzË= ¨uS(ÖjyßB‹ Ýi6 ¯®–ßÃiOYwQ¶Oì n¯øõSRêΰ=0Q´\Î,«xpT’ظ͞u}áÖ¼ßÚW;¥þë‹p‘êþ˜Ð_¥¹>¬Té\®Y‘kqÎëÛ%Y¶¥ë‡
Ô2…Z
hœSqŠ[a JxôU@ÄÔŒäD"3FŒ ¯%/ÑQ—æ-¥ RÑ"Ò²ÛWh+&Ûí®3Ðzˇ$}Aãp_|Ð,YÄ †XB‰(×
èÔ¤ºðUíž#<%G?8[c¶Õd³¯U3Ób+ÏÉ·ÛÚðµyèßÁö© Û@.ŒË¤²·¨R9Þ,w¡Ô…``Û1Ôœ#Èn2C³álÄýº3¹) ‰lÓ›X¢TkÛ×òˆî^Í©W-;“Ïa ˜ÔÝçNÖ©Û‰E¡ë"•z 0zX‘*™%Üõ±¤Æ\µõ´Klü‡ËGƒ?ÿÓ
äendstream
endobj
160 0 obj
4350
endobj
164 0 obj
<>
stream
xœÍ\Y ¹‘~×ðOØ~2ªŒ©tò&½ðö †w}í¸±/c?H-M«¬R·¦GšñÌÀÿÝ<ƒÌÈ:Z²a4%²˜$3ü⋃ùÕÕ<‰«ÿòÿ7¯Ÿüìswuûõ“ùê×ðïöÉWODlp•ÿ»y}õ«kh$Ý•S0F^]ù$=-®|˜ô•“bšíÕõë'_l~¼Ý‰É;#Â_®ÿ óº{ ~ó3>|ý ÿn+§nøÍÓxåf»ù[½÷q½zYÝ×{_׫¯¶;#ÃäƒÞìêÍÿ†›nÚ°õæ\úIs’ÎÍÛIØY–¹}´Ý©YLBÈÍ[|'-µ
0“y
Î
½y±ÝÉà&7_o¡+u€×ØÉÉ+o ¼‡ÆQ•Ùì_oŒëBؼ‹ë9øöPš‹RÝ\ªˆþžpBºÙ¤vÒ\9èbÛ¹IÉY‰+=)‚LH Y áØ·œ¤ 6\íºG¾Ù=I/é ÈdËË-Ô¬àX=§•ßìïZÓ[Òà l AÇñ»*Âgí©‡$b£Œ¥&å] =íïÛõ v
ú«A²_ãµL›¹Ö~s8Üo¥ƒÝæÛÒ“ñ °_ãíæ9<%æ©.,ŽŠx-aÉ?MÝh‚n„7jCÞi—:ÎÒ®¨Žä!q%vÂËÉÙ«€ %±ÿ¨ IÐQ•È³9À ú
S°Í @ôq>ôÐ~&]‘‡Š4ñ6¾B˜ABfó¦Íæåb6ÖÐ5¬ÃNÛTGl>dž6€b4I¯.a WÐÙÉÃæùºWd˜‡¿ïo¶JMfÉ¿Üî4,¼Qró%ö%$A4v_Ååùõا7°Zr›Nj?yöÆ‹»çü&ega‡÷–Ñû&æ·¸8ðvž¾% *²‡Å3 ÙáÛÓ•ƒG<¢ ¹IöN‚¥YuÀŽå!'ò–ð2t[¢¬7ÙƤÏÛvÙšÖÑãÞÖL2n
€–dóœhÁ`ÇBáV¬r‚Á «Õy÷F °ýn …±–ïÙÍñ"5Eù,>ŽJT¿ 5k ˆ³ïZ³VxuW¯>‰Wf–0~¹÷
óD³ˆo‡_ñÙûeÏœÒ9 *bÓ¨Dâ2V`sÑ )åÐvo´•€•Ò h©$(»ÖkÀ—Dk
‹ì ÜËF&ÿܦÙÔ%¢Ÿ˜E\+e I©†¦‘ål,Õ»¯°Ÿi›·sGgv¶™„—R&ø$®Gr™qÕñÞ'õj\õöDσÞ2¿ÒUߦ Ïy¦ÚRÖ+sLS„ ö”üXˆ¥£½r @ž¡Øm;
5äݸ˜¸ dï–¾LÇ
öIñpËÒEc x&:&…&B[Xž#Êf ›a b–P„ûø¦Ž•»•_° 3Ãl}Ç/ñ®šô1}ÏSXè;öU%ƒïš¦¦ŸÐÖñ—O?oba¡6_
¥èœ -2Žú&¸'N¿IGY’VÊR7i¢#~V ³èá frïÍ\ ¡Þá`>Û9# Çlä茖ª` ‹ïCÓ„†<û»¥HPe ºi OV¸q¸Ÿ ° 9ÁfÝì¡©tG:+ i oí—´Ì´¡?žA ª«"è!û–èÒq¥ˆ3«=ÅÔ¿ELUÚø ›7ITE%J.o3ïÝŧœ*(ùMDhÄ’LB_Qcq‘F Çê(ÖºmÏ,+ÌU<ÚkÚ %˜W¶¢ÆoV9CiÉL&K,Ƈg˜ÚÏ@CX†Ùm¹Þ F!•¼Ð`Xÿ
ŸAkKìóá;$àè&ìiÄX7ãÕ*"êÙG/
,™‡wƒRëæ ?/h(Šœ¥¡ƒ›©j»-”t ™av7QKb‰ˆT`NÄé(`>k€ývaR¢.Þqþ<;+ºè”ò’vû€¿ƒÒ‰uù© òƒËÇo†€X
Gðûß‹TÃXÀ-×ÜçèÞK;Z^Æ=r·ƒuý(O=Èó>Š§ œf-’ nÑ#Èómʼnö¾å~^ßjãfŠ$7ªÅå$÷× Éýf ¶xu—™¨áÙéõæßqRë:¼¬4 m?¦Â!*$ 1‘Ð$³êî†m(ÑV‰2?ÁÈYƒj‹Å [ß)N
“©[¤D³¯¤H‰%)é5'²} q J_n[Ó—t¤h½ïwäårš¾ ÚB~^En«%
(€-Ñ0¨Íæ—(Ç09/ñgü$® . XˆŽ ÕÕVuµ{® Á®h ;Q
…9Ë,T4™EÓî@Ž^›Í¬ Ô0[4LÈ6S1
ÖŠ¸: ìÄÒú1ÈCÈä!•Ë;T¯!ÇUÜ<‚B⨌Øyz`ºt+ ‘Wåu #€Ìj–²jUZÆ\ (ÜÚ:B¸ïof°t€pjÛø ;æ@`öb4 {0£ó'£‚œœÁûîêC‚î0(€ À%¬d–Ä'€Ÿ“ÈEržå èÛ…rkж‹ªì$n
€‡æ<í¼=£ˆ²OìÂJ_^÷œGõÝ—uÈ[üâ” L ,Á¥ˆl,ôfO¨ñ ö?O³‘4¦ýt!üÁ>ïé5 P郓ÆE†ü>j¹:1!L@õá¹è‚™3 3uÕÏ!‹¯¥ˆy”k&’\tHU%Øn“mrÂÒ< A›Ì£· î+
·”AbÄ1€ÎÅöux“ ³u¿,û#ï·Ù_¤Y£Ö6z±Þ,®£3'=&êZ—Àá| UmÓÓì5£€øk ®'G_m%þPu—c¯É#’ý¢Þ¢ßÙԶΤù~¬ÄÅw›N·P ö(<àå #Œ`—æÐg F²WZôŠ€Í)Û-3QÒöjr¡[ßb\L©UK’Õ“‚WU
*Ö5À•äæSho¤vr³RÅü ð…è³;l,6<¼¡‡3RÇâœÎGd%pJ@–]±ûê wIñ!i>lš¨‚Í Ó
1ºz32Ðá©ÑMðéþt1VÈf¤S QÄŒB”›™œ`6˜]¡Â)™
lÖäƒ!
šžÞ׌Z³jí׶QÀ¨<ÌQ—ù†Q¤âº‚é}_³ÏDjŸµÇ£*)»GIgQ*'‰ŠÒàÒ/5wŽý›Dùo–:Ñ~d¶è÷Õþ”©|i¹Ÿ’ŒU..YŸz.7Ïó¤˜{9Ûuk™(zlq ¬d á\ìÃä5S:Ö¬Ðð YcÚ+5}X%c<ÙŠ‘*÷©›îN éßB-+˜ôßâïŸ(e29]ü0å¡T*3ISþŸ$šÈS
Ÿè ñ£[½w¥ÓBøUí¡¾c¿ _5ÑÄ?2yѧõÞ«zõSÖ²«Ïë¯/†³¶ Lã$æ¿'`è³:+þÁ*`$>ŒxéøËñâŸ)§”IÖ+±º?oêÝ êã)lÄæ'µ"áÏÛËÒËŽh4îÑø2¶¿1£ úÇ@ç`¢kœÝ{%Ü͇r «;
;rt§z+mÞoÔ„3©@C¤˜™AÛ“ºÂ¸ `¢YõlñÐȨ‡/ º²:ÛmÌ1Ü…‹ƒ‘\ð—É÷Ò7+$ìgÒEYh°h•Ùç3°kpié›fçÖ#FÓ²‹Ï%Z‘pÉ.Á‘ÏŽFÇéÑ¢ÚúÚ œ€^«Ï9ÇVFÉ»’Y)
¬_鬽 ) %y³C)-òþ¢hräÚÀà+n ©,¿ö)dÚ8ÛLe¤§ÂQ‰UÇÎ ©¾H'i…‹žELŠw±HY¢
£„7{<–R.ŽoèuÔÿ¡.ýŠbS ¨N¥¿«Íû¬-Ž°¿É)HÉóî®âÅE•—á8â'çòƒEQc
Gyp̸|Úðªlj{™:‹(z“ ³‹¼B¬º ƒç˜\?\ç¢ç$4(«åŽlþ¸]hÆ{LïaƒìƉÝ%ÑÝ-C-âX&uIÞãüôÞShç1hûÄ8…æ £ß€nY•Ó(b'1šPÑÚ =R)Ô|9¢¯¢Õ* ˜ „´wj’Šd£ò°•ðL´Ÿ|„ø–ÅÕÅçÜ{md=në#y ßÁ‡ì YÑÙ¸ÕÝe®cÖfaµ±[‚ɼ{B Bž¢£‰e¶xmŸŽ ¸ÎØo¿ÈÂ0zeÜçÈ F}ÃÀÅKLNƒµý ¢rë^åcd#—ÿ[iÒ:›yîCÚ(ØŸvÓêzi@/eV¢œT4Æ &ØL_t d´Þ}”‡Õ
•›âÝžh×Kª>±]^ÒW?ûÐ \k‡sÀS|E'„¢Q–N°±æõ²ˆ(/y·~,ßÁ ¨5
7s%å @Ç2Ç=Éhty’exŽ+@ƒ
jÞª¼˜°u\a¿Ø‰ýŽ\çe”Ž#DäïšV‘–…T¦’¨T}kÑ«-Š†µ?êh%¶-v7FäLÜcÚ ×‰èo‚IKÚظw ²qÛ2\ª±—X‹óøç+Ñj€‡à©_&i Qòu.›jÃ÷¥j˜
Ñ7õìq©o5ƒ«lψ‰ÿ!ó
î‘`«÷}²c@i0ÿj\Cå̱5»Zë…Q)4LxlFð¹yqBßÃLAÒ}ðI]V#}“ñÌ¥áz&pj8K=Öè•à俨F ¤b;¡cá+€º¬n»›ÁÌÍ3 :m‘•9«¨–·1´i`0Px±ÍÇ8î z j%Qª2žÀŒ˜ïÇR|‰SNæ
]*,0ˆÈz©ƒ7q¯bè¬IÛó¤}úG±s+ÑÚÅ,%Vßÿ×ÁH´§yp´‹«Áˆöø=y¡»ØT “fb„\DN8ÌõÁÛŠŽ¸( ÷¿L8î»3“Ðë0u'OsP.lŸ%Uæœ
C/˜ZÏŠ•3ÀwWO°$'1;³†Œ2 BË#ü|ËÐ.Š°/™á—éÈ2HÕþEVGpS\•4[E+»7ÿµ½þë¢kƒÐvH, íÏ ¶•Ægõ'š&ˆ*kvª‚ »´k•%©}k+Äž²!åÕ§*žÛóìaa¾–?ÏPz•ëj•¬KpÉO^Åëσm €$ ªô8ÒòMA×âè¾KŸ`;–“@ü=à P»¹ Z0ùt»R®4äÁb äˆ1Ë+ÅÅÔ—âAÊ>æ{ñ*…ìõ ûK´I·Ët44`¹²XaÕÔ?.€¦CG òù ÇÜcLï°’À&•ì|†ü@ÊâIŽNåØ«’ ¢ qhPÊ9#ý» òbÝ-é;«² øŒÊ±V¯Žl§(µc%&Qhž
M¡Ú·³CçÅ5ÒPÑïÎTšNë’“Ÿ–~ŽÆB—|Üg[g1½îér#ÝÁ
&º»l|¯‰ÇBÁVã4®ÿ°Bw$ÇDßt• ]rY .½á×—??D‘ÊìV— ýb6xQªG.ÿkŽ‚eר¼ŒZ90ןî—vN#b•gX/AJ¯/?„~Ø£pt59WK*S8³¨'¦”¡‡
ÊjP“KïÊËßK9PžÕ9'ÝxßgØP¯–~¶ž4Ì€àfÊ0ð2n\#Ž¡rLþ¤ýŽ¹JÕ€„õÈ>JbÕ†
§3sÿ*
ù¥»= Ç!çÜ[¤•tE"à´82 ÏŒ'Üí›2íë=H…'àa?6§è2Ò6òÿÑS‹áûä¨y,q«_ù´8ú›CkG|»ïG‡16¸+ߦxu>ŽY|×՟|‘J ±¢ìz‹ß*šËî¨×tBíªýzhÓ —iÆ*q£s½QÖ×(ÞçoŸ\ÿô‹ÍŸš!!QÁÄ]¬¯±QKì †1 ÐyØ-> @º²¢DËV‚Þ°[¬Âï2•DÙæpºÓk9ìN h~…%è.ž‰î jÀcåZZž`ì^Ö:že]
pK˜—þ'z³Q\æâ:àc–·y¥D¸3\ìÐ}‰Ÿ{6›H’ï,gÆo!ðdq¢àç°~|µ |§ÉõyššÍkñ‡ª¼Š=÷Þ‹h•“2
ºæ¾ PVYvTŠ9Íø²‡åLÖÖ8ˆJ žÿ”Õ"ä?nnOÖ-×=OìÞ¢ uð¸%y%%Õ„ð°š/à KŠ ½zäæIæÈ‘- ‘pÞG `›d&iš´¨1Ø¡SENu-Ï©I“çO¾i ÙÔ~©Ák)yÕ—ê~΄°nO|¦}"/• óñÈk¦ÈøÝ2ÙÏæ*\w\r_ÄìÙo„âŽ5)ïÿ§¦œdKD@ãô^–lâÚo¢èoؾj"×ñÇÈš÷u½4b¸€©þ"Ðåí¿gâ5(Ùì!ýr@µXë1—l±~‡Áv«LX)káÔ»¹ Ëgb>õ¦²Éá(—Pã÷4ˆ~7Ü&ê]výl—¸Þ*Œ„vœöƒ¯Iªk–_EªU½¤F~üzV_«òmýuª÷^Ÿ[|ò¥6N>S?–f´°¼j€ËHyzóð™JKÊk>ÞbMʆ%}N$ª3 ´ô¸ÞýGFµ:Ļ˱m˜[·Z]9ÁdíS©f&𣠗 Ô¡åù¸oS߉¤û'>ú/1¥ƒ9 Û‚„qá£qì?Ú#Ý|r+#°Æ_´ËO´í‹¢î—EQÛÈ_0j8^ᯠ•{É ý}pøö¼oÁEèÏÝìêMÿ9`à ƒÛQM$m<ìû/Ç‚Ñ®ºŒ–d e,$Pòéõ“ÿƒ¿ [HwÜendstream
endobj
165 0 obj
5090
endobj
169 0 obj
<>
stream
xœí\Y ·öó ?b‡`ÆÖôò>€<Ùq`‹äÁòà Òj Y4Ú•-çϧŠÍ£ÈfÏJ†ÆŠƒ…!/ÑMY÷G6k^/ÙÀ— ÿ‹/®'ßÛåÕ›[þ
þ]-^/xè°Œ.®—_žB'§–œ^k±<}¶Gó¥Sƒ4L,à3ËÓëÅ«?¯ÅÀœÕZÍüà¤[݆‡Ž¹ÕÍøš™ØÂg»Üz“ßžäg¯rë,¿Ýçg…òÛüv›Ÿ=ÍŸòÛ!?»N Oÿ±àjPËÓo§Ÿÿ°ú6óp–;ï32å¿ÞsÊ *¥ ¾}“ŸÝ5"©g{òT~ðƯxõƒá¡Èc~L-dìä{.¨ò6\ŒZÛ9
¾<½½ý´eZeÍêùš
ÞjÎýj{±–rÐÌ8xº‘ ǹÕeè ˜w«í¦’¨§Òuß껎‚qÊ‚EÀR.%§ãGq ¦M´Zœ?KÚDŽ6c @®’yz¤$°Rä!ñTXº3* Mv_Ì;[¼–(‘–‡=QÒà…’»>&]ªW…TR+Z1²GH€‚ÙÕvÈãÀô$˜ž¨Lëz
A ‡Äpv»"ì=ò £ÍTe18jÆâQÛÂd
b±™]}0È$¿A†aÑrg±ŒËuÐ,¨oµE3—lÁ%‚B¥ LƒŒ½T=„.*‚àòKNPVWâ¡xI‚K"3¬cd6K0;©Ì™#]ø;:· ã1sÙ(X%îÁî¾Á™4hRa¥ž/ñ¡ Öz• nkà
6¤+ äÐT$ 8SbL4Jø15Á‚¡U—gh c ÿ9PÄŠú50¡¹Em£ü¹ – ÇEj—É¢]{) 4&¤w)=ÿumÍàøÄMåt‰AY½: CPŠv¨ :@Øã2Ór
Ô•Œ"O‰³#ŽÚDý4LjË8xàW!Ìk°Ã“Òõ« û¿À œf »/0.ŠëgòqÊ≰ˆÆäíÏ9ý'ºÅL ~ iê7Äˈþ ÑÛ4ÉC89p#îÍ°Û`|ÌBÈî%Û«®WΦØà˜Ò'¯|™t\%’îJjˆ„ yàš¦2~ƒ´ K©žêD+<:¤¢]ÏÊ´1ª ÎJ’Ð|eÊ{UhÃj \Œ‰
˜#YêœÀ´Û™Uª²Ôv{#?#†…ècÁ3P‘èD.{Ê<å p>bî» >†„ª çÇ°IPÉõZÄÊ‹súÉPR#ÏrÜ*TFc$8éS¾æÄ‹ð¾B/¯òÜ` ˜H©„(f# BÊëüþ®›6Æ9Ñ“¨QÒv‹Yp)ˆ !ä£Ì À îÄ5);xé»y'º€Ð‘AYñ³¢‚PËEŒiæÝ%5I‡ó*©äFì¼7 KuÉ´ÛÈì ˆiñáè#cÄ .’ˆnhð =€§ g¦¶†ÆÞóÝ2é,ó EFc5ízS¥ÑAü Lsƽ]•GQ ¶“ð3¤¬ 3t®º™DU õ—±N\#*y7Ã/KÑÆ-ØcʤFº(Пáâ"?Õ[ë\2 Ú¸Š¹ÀÁö–“J²ñ'«BAd‹ ‡ÐKдeœ‡ƒ?h°½%ÈŸ{ ™ÄX 9dižZq¬I`k‡ nS
þ † tsÝ94Æ<.™oz².K Á#€Dp¾`À9mvñy+ ¬+ˆN»þ.áª<%á1j w7 JèX@zhÁE›hZlQ`SÂ`Bak4»W ¸ff¯p[únû¼ÞuÇÍx£g/hÒ)¿½Ã@8ÓóHÅîWOždFµ×ÇiBÔdÔz9úÙ :Æ 0q õGœLÂÖÊÒ=R%®]ÿPÞxˆ©¨k=MEulÞ¢ŠÁ…£JL»oKÏCJ^Øþ!SºÀá §Q ‹–ã–bí §yåà¹Êtwž6Œ CƒŽ²êlÕ³Yƒi>JX&VÁBû#ì2`{´îÙX{*מ
¢YœwN˱j9C,'‡Ûüö%9Üh 49-¶7ž¦z Ï)5d©«üò¬9»ÄÕzl]æÁe ×¹•4=qÑœ—HåU5,Î3;ᮜšb«·þ}‡“vÑi’ #KÄÿ¦!]¼¬I{Î5YÌ! ß+ånP¨slþ†ÃŒ Œ GʯšUÌ )&9ÝC¤,ì¼Ãh6$>‰NdðUvg°íŠîi#: œµ51–ž–‹nßvS…ϯOß-^/ $¾^@ZvKÈݸXj¦-þ½¸^|ùxqòøŸËÛýÝÓÅÉ¿—|qòwüß—ß~ ÿeùÙâëÇËï>ðC‰Ô
rÇ2|‰ßI–zDYüÏ ‘Ic% + ›IÅoÍ#Y\8̆éû6^S1’ÛÆÃÎ¥ñƒ)œÃ†^ƒc-•çò˜œs‹œ+“µÚÕ„³^.ñnßq‰^ }ÚѸÖ(Ó·CÜq|¾!-¢au§~zÞaè6›uÁókJ…f
°ÇñYsvœ¦ËZ/•í–@VDP² ¦©ÏI¨Ä³Ît»ŽáÔžÇ À Ó ®ó
o;Î× 6’¹Êô’ËYƒ9íx.gF3p€©ÔÄçžuÛ¶aƒ~=Õ Dì*-#tв öa éýÔD,IÖíâX86ˆTã
"¾õФ ¼`ò£ÉqbÏ#=\pÚÛFÌh²3øעɮ¿? ÊcJ…§3ìè€R)6èO…'Íãˆ'+iˆ{O8Ù*·ÜÌ©¡£Pð;yLvL&¹vE
3ð¢HÄÐ\4ÖúF ‘[ kg£žC¨õxpxŸ[`ŠÏ®:Ùà¦YO
æ£×:gÀ ÚçûÀ
¯æR1«ðïÑà äQ'ýÏÈl£'IbX 7ŠK¥0„‘ ?Ÿ oñúO‚78 rƒß'ÁŽY>þdxã2ám'ØÝtDßó ˆAj _2ò! bíÿ €ã#€Œ@ @ÈoB Q³cîÁ"‘–¼Ýƒýf(äØLŽ(¤æ‘F>C¤i´fþ¢cÈïò³éE^}Ï1qÈ&/:†÷.·äAìiçU Ñ;šô5@ ø%üï¾ì0»Ÿ°X®jO–[ ¢å$âYe¹¯{éò°3÷ía•mGŠ·Í[ ÛK9ìÆ 9_ÉyW
áré½_ qÿÁ¨ÄOqâأỻ˜ Òì#¨uÚr[ ¾å¶Ñi±äy2µNk2˜!¥è¢‚ŸE×HêŒ*uæÓƒìÙñeB¤ö}é’/{ÇÍ/2o½Ç °hÝw 7àÇpSßaûÝî7$óò˜ÊKû
Éå ÄÆã}Ã1f ê€óy‡±‡Î†àÃçòßãÆBçŽyÚ7Š=ûÓl,ŽÍ丱¨y¤Žl,º‡ø‡· Rë 2ÿ}¥\Û«£~ñ)W(•‹Y RnÑδŽTË °‚s¹R{5ÕÉ)†Ý²{a{ß½:×Ü~×*ß2|5¹4km¦W7Ékr£&”¿m·óÅ
«p¸ U:'åÒá\éŽb@^õîO§"7ÂàŠ^Æ>ÏoKÍYË]u5V1.£ök_/±ƒ°!î_Ú{Û©x{‰b(ÿnY-ÈÛ’ Ÿäšæî],š³ƒÌE x³2¬q¾L(pKŠ8ǼW«]©T vÑÎÒ-W|+aPïÒå&®«ª)f¯-A‡çùÙYn
ÙgžÓhÛ:ŠDU±Ì9Þ´|Ð.Ý´Åz°^Ùo.àm\¤¹ToËï\ßN·¶W²šîUc«.^§(i’¯JÝh]X±† î«ûšN4æÙ¯DEx]øãÔa)ºä]›n¾$fžÊêÚ…ÃÅ`Õ
æP,Å8Þ–&å6/cÑ‚À\M¥W:Jª vÔ3²‘‡Ê¬Ô÷((@RÂzOç'¶g4 5Sj•r©´ì£¨«Ì\¥ÎEËsµÎ¡îÊú¹º«Qþ=wÕЇ8S9 kSlý[ WMÚwŸç·î#ÃÜ‚”gäªã§—Ë&–2W¾2*ÍšÙ˜ ÕÓ“Šu˜‰³Ýì:i½ÈçªÀˆû;†}ÅtK\A™ž¬ `¼€ÔÊÊ~X&MÍ™‚iá8~=Óù W0KÁô·©É%“R§¢e€=äánj–Çóv뜖·Ûüö—°`
%dJ]u[M*µ¥T3…Ï<`ÿô»$RpW²ïwUAfλí/íL‹g1%Ô8:ȱÖ
b¾Ç³’iÆ/8j6ý4u˜´¢F ˜È¹~íÖ?"ApKIžÝê¦qÛ
ñYÇâ
ÎÇž]eø!éü
…Øöq,ýÞÊ¡ýÄíÁ…¨pž È<*u;se‚£B¥ Åxdý¡ Qaä‹Œ•¨*ø&?ËcFm+-ca¯•®Je9+m?¬†'šDõ ˜7<˜=›É·u…(Öž·õ>½"Ÿ¼§¸#?[S~ã#™þìs<Öé¥áOç8Øìëê÷+¶ŒW–(Ñ`‰äó.J¼ß'€˜Ók‡vÛªGÇ=wXÜ 0MáƳ‚`œ {üWm%wÃfqb
ó˜Òu" 5a~¬¤ôÔUwÖË(a£¤–¦šjn FsÁ†ßô<»ó‹1ÙßæÐß6 Hþ
8›
n‹ÞÐÆ/#+’Î ß«ªŽ¯Æf <ÇC* ™=•‘¢Üò»ù¨å»ÅÍ–ÿDendstream
endobj
170 0 obj
3812
endobj
174 0 obj
<>
stream
xœí\I GrÖ\Ûß}{ðe^[êbî‹ °8š#k1
¤!±©æ=6)ŠÔHòŸwD®‘YQ¯»I
ÖÁÐÒ…zY¹DÆòÅ’ùÝN,r'ðŸò÷ÑÓ³{ŸùÝÕ÷gb÷Gøïêì»3™ìÊŸGOw <„FRí¤\¢µj÷ð›³üµÜyÿÊE¸Ýçg_ì¯ÏŽ•2îŸ_¨%hoíþ%¸ÅªB¦Ô¶)XßÉ$÷ßC·Ö êJ´öu%ÖȺüêpÕŸŸdøF lû
þ.•
®æ`
¤³¿k³˜“!ݾèã^âra
ÆÒn±¯ —>ÿËÃ?Ó*Ââm ^« ®q¹Ð4ûç‰ žÖ3ÀïKWXä7)FS¸E ëöÇò1¿Kd>Q§~$]_·ñ®úw¤;Òi÷ éض—uQÖu!ŠymÇ÷HS%Ub^ â‚›ò‡sï–(€Óˆpþ¼×6ù@ ÁS…øVyÊUG)Ò
&btÿy¹ê ±àD¡G²çrqÁµ¿×ÿ׋2±²VnqÞ²¥Q3YœQô%!ûñøSžƒt[2ÐwæâüÂ.J(/ö=èO× ×“o†'b_›.‰;¥É‹¶Ñ-Æ•wòós‰Qê&Úç¡ È4ð—ñê¬È`
²_ûæ
[ÂN…@·yز ˆƒÚßo[Jzýº÷ 2š(œöuo¯™¼Eòƒ"…
úrßןØ2D‘gìWkªä’:ƒnÅbBܯ„,Mì' djkC]q¯7í/ßÅ‚ÒÓÇ/Ïû¸Àø ƒ=g¹Œ§Âñؘþxø¹é¯õ۔̳.õ×eî*q½ Áv É«¬ÜH¨ÊЩstçØËÖ'3®\úS2Fù¤h+QË$>Mã4VëÖ´r}š±0ÏŒ8[V¡÷?¤˜µÐÏX õÔH„•{®£—¸ØŸE š†ßÁa3Âém3‘.÷> fÀ&^/ÂÔ¸ ÊA¸ýµ§ÚÓ¿¥'+i÷q{ú¬=}Øžþ³>å¡GXäОÁæ”±Gs©#¬4júö aŽBuC”ÿ§çÇ
È ö
zÃPÈQ/pW²€°!þ;Õ‹•ý¨5}6˜Ên¢»qƒ í*sg³Žuª@Œnù ²…;l„‘…¬cS ™ .K ¦…„ 2_ÌKÖt¤¿O˜µ¼˜ÞáZŽã¼£Lš`½–Ú¯mð ‹«è|`ÎÿŠMÜXDIk°É…ö · Ê<é »â .ú(Ðè¤ñ— É8Pø_P`.Df+gëBšXFž ü¬ÆFƒïÃâîã÷Ö8_xØÁcÚD˜5X‚çù+£JOÒý ¬ÈqÀG6¬ÌCEû¹n_÷ß9Ê è€¿>{øO_ðñW02êKÅäš"‹ø \ŒÄŸØêA‚a„¸Dö¼wÀÀ4Ýü“Q›`¸ ¨ƒÏ+Pü5HµRw>FúB™€cò¦™…ÀÈ%Ú§€å¤\JTWC ¬ú¾&lIþAÇ•è¡QÍ ‚HžÙ¨è …¥5o¢>œ«â"}Ùó}–…¦ ˆ wíqß^[̾’:˜a.8C|Ç9ÏÒ–9©IhAbmÇ#ö$– ù>o¹‡1ÈFÑê>£lÔtÃKÝ5Þ€IÕM>a ¹ìh €`éèEoÅÔ r¯V{>€w‰ûaÔÍx<9 øÍ·
_ñRRcnœÕï¿V¯6é¨PŒÒ2‚‡_•Ð›ûw3z½ÉP&¼Ø Á„Q)d#¶ˆ÷Z¨Q~B‘Ø…’a±¸Kèi‰D³*
}á,Ï¿9=©$³_ù:%„“ö4Ú»ÔT½)H;\Ñ š, ~ÛH·¬é‰á12íã1* %ža¬¿ÃϤö4>ÓÚË„½«°ž$mX_´Ž f#¬ÍÂB" Z8•øèÛ!Ù®€«îT(Ë H€ÑëYf¼h§àH ýÀ :F -ÚìSá=æ ÆÁ«Í±¯EÇÂTÊñµO3yçø=²Ñ áf J‘
èÏ…Ðô Ù{0ýñ/5 Z"œ@a% ק!Ìö3¨¬‚é¹Ï€‰q¹
m@CW
ìêVdl`yh*–MQý¾xûƒCëÜdé ¦½L^_öMø¡JÒþÐßòI¢cq®,>L~{†YžØ£n„˜µ%$—óv€¹Â°ètŒž6ðÁ²æêçâDÚè âÄq^G
ªfݦºÏ {—Œ²GÐHšàUñæ•ÃÝu& :¾ê›Ãñ0Æ5“Ǩæ Z
iĶYš? OQ„!
B Œð¼Ÿ¸Ä ”š²Ä—Ôh©a fôqJ˜(©;ÛTôáxäù:º†ojiö÷‹Ï§õà¾J «ŠÍ7°AWWÙ‡% )“¿¹x½ßáôê0Ø"¥çœƒÞ›»Öš¤ŸJ{7¶·NtþæâƒSŠõ€<æDó»1W±páþ =Œ{ü Ž±Î†g$pJ
2ï@÷\æAä ‚”xvƒ%ÐÅÇ7Øàó‰œã´@ ‹/ÿÏÅ— ºKNˆ_ ¬{tÕð+VFr0t•Êꪩ!èýjÆ ç˜Èâ "Þ ‡¿ùI ÞÉ«~¥òSR°e‘.0)0èË·MºNÎ:i…FrgáoC^·¬zÎ߀+$Ð!Ež?2ƒ8]¸”TC›TgéSX•ñºæ&mñƒ¸”Ö C›¦›ÛØdJT à¿[¥Oó=ÂÁDxV×/qüðáÙ§gßí‚ÄÙ`ÅZé øœ˜óܘ>þ}ôôìƒg÷ |´{ùâÕã³{ŸïäÙ½?áÿ>øä>üyðûÝ;g >Ø}zÇâ,,R2fg´…•çãŒ<¼b ½Dí•á(ìÊ¿kúúQàó¶öïœcøWÇ‹n‡ì±ŠIU
ó ¶NÌc$
ˆuZජù’V£:tñ²ê g_ Ÿ¼;IÒj½~´.`n¼•îzÔ "Y³Ä. ï4†åVÑÔíjî“Ф=
‹è²¹¢ç4ór©;vB¥[àBè ˜±i4«Ò{ý ïPy‚î&=ž`›z|Œ§üz\ÿúõ¸5Ù¶‡ÂHÛz ®µüC쌅'~9ã,^í°F¯”Vš'º¾.®dj¤ FþÍÿ!bc¶cÔ3qCϤ¯ngK+ï²¥³>ÓE“oÞÝ´v¼°›Ì¾[‚®E*‡LÁͬ¾¨ñ†IЉ×J€WJ×kêx‡ë—pi̯T”«KÓ]Û i
>.ÂE©ÖYÞ(2¡ë“= '(ŠŠÇJ–Fc³3¦Ý l*ÒüÍÈ8.qršN.‘fF0G§½áý°HÇ¿%z¸ A2[MDySo*€‰r·ˆƒ¥¹!í4§|?…öTSŠãJ+‡˜ä›"n±õ¤yI;xa‡J|¶dŸd™*
¶Þ¦GPxetÖn¯iøíÿk‹[j‹ÉòzºÒß y7iÂ=e„cÁño_¬\ª æ~e0O˜u<¶Ç]%Úb"mBÓŽ5²¿G±
2eý›Ý°©$à-
Ø›Yc÷+•¯‚Ž +D
M›ÖÉðÞ…T$– 0ádFm„Ð{Ž“£·/q‰
g~å!nÆú&=Yb8õ¿v%s:¨tHnîæ@£xù†UKëÿ®uŸ,w‰¡dé«U7¬v ´ÕšºZX§Wkc¸í@®°€< ®¥Ç`‡Ï–yÊ^ßN¯O^’ʙշî%Ù1 vg ‹à‚Ö™ÎÇ1u lñåª.}H^²äOXLC|)SÑyÀŠµJ}êšêžœÔû…ÁÂ4)Z4ò< r¢i`‚M2g(¸‚- ©9\Í ^ìžÔëIÿj5æè/K6®Ï© ë±’©,a+˜7ÑXRÌ×s`N\„Tß}‡Sd¤¯Uå²Ï£‰¾)cœKŽb¤øé½z€àÆÔöO˜|÷‹½é”KigÂP±;TiB‰yŽÍdk.tpûcÉ}XÇרÐÕ
$+'ÙZÚc¡€-Ñj U›úý¶¥Ë;(¾¼M ô—£ŒH‹iš=o¬JêªVµ„Ɖr͹V eøl÷aU|‚ÙTÒöø¸åË× V$Cƒ©†U25ÎØ
¶Jß¹0Ç’g!‡š÷¿oÙ쾉 ó¹“hh©ï”ß–˜eÛ£
¿xÿÆéïc?XSÔÛæ9D6Y»2,<žWË<Æ E{q‡Žæ«Q9ðR1 ÓKåðvëDÞ
qé“Ÿâø6ÖêM®Ïx„y5›bGôb^³œ«ž‰¢*-3$Ù®QD*ë³Tá³KJ ˜gž~ÛßqåŽÿˆ=™E™mn¶€Álx}ò ë®gr˜ÎÙÖ¾uÔ7"¬é ðƒVÛ¦@;¹h½9™, ºÜ†….WÊÅ ï(ðà¢ÈYõ×EßEõ§ÃKAÙ[±3Îr¬Úå±µ¼íºÓ$§sXUá¤ÆK±D \ÙS㹎Qª£Ì€o”j ɯé¹9%i)6†“›Ã@B=ðjûA¸´]Z?˜Å ö™\ 0ÕÔz•CfÛ¼µ¤ëµ¥Ë`ùI¶éѬãÙ³`ãDz.í°"”r:{ÖŒói0[V7÷ÛÉÚHýœö“ÜVo³*„ðá¶565]×ZŸ> ÔÐèlÇêqà--2²< m}ªIÓ%MÿÓOc‚¹}åiöúmgÌ~G®´rj+›|;é½mAA>›t¡£Ì• ôœ]V<Æ»©fX»J9¿nuLm>.s•m±Ú.ì œzš¯Œ”5ô
ÄÑJÊÖ:@,Ó9Ît Xj¾\ø}ð¾J€%§wÉâk™–ö¼"kˆ´züস €ÍƒM2wªÚ|F*¬ zòMŽ„–ã¯ÚÐ$V,ÑLÛXr±Ãd_ˆ“µ~ eKå©À±ÅÀQ—$9F,´Å(¿£“/ ¨
N»½ÜÜ,ü£ÛDÆ+)4"aƒ[J!ÆI³ó>äÊŠ®Ê¨ñ‘¥ ¢w¯;Ú4ò°ü1hÚô*Í{0jFѳÇ{Ó¡
æºÎŒydµÐŒ6o
MôãÏQ o ñt
hé~º=ÝPU<MÝb4.F¤û0^KÔsuK=–aÉñƒA]äЀô¼'Û GõÀó¿Á½Â ULtWÙó{¿dju™€ÃL`ÕºÿÑŽÉ?hO×íée;€ßÛ_m Ôï_ôkà[N÷»\…2éþI'sׇl™óñðÈ_:ØNË
ñøjFk«‹µ€!`3l¾_ÛÆ+í<êíÏ:/å°œ'WÏô€â8›¡–ÕqÚ¤ûyÛ¤]•Á`Æ!ÜÊ0&=Tv̦1È~Ê:ÜpK ’
.}ì?j±àÑ)ýÜ5RÇg«k‘ÈîÖ¨a_Ìg„hï—³òyÞD¡ÿ¿&°ž2|¹J[Ôó—>_ð7Ç?嘉GŸßb>
stream
xœå\Iw GröÖpߦÛ&Š¹/:Ù’ÆcyF~– ¿7À¥&A‚€d̯wDäY•Õ
Räeüfa¡º*—ˆ/ÖŒ¨w1ÉÀÿä¯^Ÿ=ýÁo^¾?›ßÁÿ^ž½;“ôÀ&ÿsõzóÕ<$ÕFÊ)Z«6/ÎÒÛrãüWNÂm.^Ÿý×öõ qÊÄíóžtðq{·;—“Á[¯vbŠÞJ·7»sàI-·×piŤÝîßÀµƒk§¶ïwf²Þ|TMA{k»Ñá%?E¸¼*=kÖ—ë*Þã nò0òŸyv£<¾'£Úþ¥g›‚pÛ{Z²1l߶Ëßà`rÒRmÿ´MÛ³FæYQð칊“´ÒæØà¶oh '
l¹ÅæÊëÖoßdšX‰4©ß´'nÛ´×uÜ}›‚
v× E² ›ŽüFV6Á} êÍNƒ=è«& $ò
D„GÙTû4ª0H‚ÿ¾ø×3íÂØ›‹k JžÞ˜é¢„u Êdb ø£mÌ·uy‡FáöΟv0’‡×€EkSåpmçyqçÒL&-p[ Ÿr~r0ê}»Û¦pö¨ &ãŸÀ_åÅ$€¿ìî Þ…—Œ^²¤CuyÐò·/æ´”üŒ£IpOÇ„§:š‰³¼bŽ]r(¾Ä
ê)
•7ˆôÏ«qVmuÛL„cTîo8òëÓOp
IDºlwÙp•^q;ö@ÉÿV9ÏKк'¶Æ+¦ÃˆÑH`Öq
F474Þra+S ˜0ì2Ù{¸jšvÁ!íÅ’|“¦ Ü÷2A žfÐ_JÎ@§
4ì6ïP5VêûÃ>Í£©;&· ɨüÚ :Hç•yƆŽ6Í?‚ÆÑ qL3IYWÀ1¼í‹1”ÿ‚°·B„ÞI–]Ö}›À ”Øb¡îv_- ‰L¾Ë 0 M]“ 4ð:ì (*íÎÒÂÈ@ êUSßL î;)IcZÅjÄ_ø Ø×g«Ê9ÑOŽEëzøÖ›%Ó+Û”ë%>á'¬‚&¡9L±z%7ÇŽg€âàRëí¾éæá’ $ GGrn®« elÓr´÷ÅWlR»ðYÈç#ðE#)S—\e–ûºéªŽË˜29ùç™úG6º¹Û£˜°dÏØûœ;ÚÂN÷
yîÙÌÀ† 7jrq`]úáéÖðHF‰0¹ÀüR9ŽÛÏxé‚Ö«Û ÚY¯øƒ/—¦‰úÉàÊch>}!ÀmÁUsP h¸|¶™´fæöŸôÛ{Ë@Àñ° #G†éøUo/c×uv¬˜€Å²È WAðЧIÔ’ësZöèŒ1Ñü—äg±_ K{7£Â ftÞö`F’ ÐaÓÊC¸ç¸„½á"˜åæ|wn'zÑò½1户§h{Ò§]KÊ @EÛ»Øðó¡ š¿„,ž8 —@·5ñea3LátX1RE±ùÐ6·Vilïu?‡¦Ð“²«º;íÃ/áØMÊ,Z™HꙑPÑMV»íB!u#]Dt_4Sœ;}´œS«J Т‚ˆÛDqÄP{ýˆûžpQwOÛ+2q äq x?ÒrÁL°–%yuÄ"PV¤šl°¿ÂÈ9Íp#W „Äz@?ºME+¿tð"_‹VF a¨0ÑfaQ v" 2¿Ëqj4
º)J"»9;päE‘¹A$€(áÃØF<ɉ(e9;˜â¸. ç(ʶÓ4RsS„0ÓŽŒê‘ØX!ûÙ«D“Ð}LÌÜÊû…z÷_¥£×: “ƒ¢oÏ=òˆ»È™´3΄5Œ
º†A˜ yÔPãK,ª¹ÚÁ´cõ’IÙ{¯vºÍýÌ×cæ &5°~çÔª×gd˜¤·ML$×á/‡¨íÓRåîþ†Û¿s`œz\”?ˆœA÷yÐ ¸«ïv¸;igÞMIE>àì`µ<ꜴýÍôÔØeê³FzÎ1ægH@üÖ;¯eH6ÑÌŒ '#è6‘o¦I¯ôc‚ž<àú$à*G2`ûéÕCÃO wÎf1üûDm¡g±Úlë÷?ƒÓë¸`´G)6-Ç3¸èÞIë³—Z ´âîÔ
©•Ißb—}Ãàþ°Â ¾ÏÎÃ5ç…?éW] R0´|R(æi»ÄÐ0k_Ó&Em+ÇÃißhé»Ø~ƒK‹ÑGß°ieå„;¢¼ ºg a^~‹n³ûí0½‘N`±š½)г…%Ç’^Ä2ûC›þ|–Ìt9óI~CË]
wìP*rf1}BõR\=»x“¹í é›Q S!âùK¤ÙA&âf0ot,ATË!K†çQCàþ&cO I Фa ](X— ¨0”Â>–ÄaäŒ,€[’UdãLgãa›ª„m%*VÞ3S¨íšU ‰j[ïŠ%ï¼V:É‘]ºH{“X—4O0ãY’\e+½ó˜PŽXü8ŹïÔU ƒ!å ÛYÚfó÷CóÎá¬"8œéø4 Ëc´LÜe'›_â5î&3“ÊÔF‹yøÝK~¬™“H‚'‘0¥ QDQ~_Ã6Ø¿”¯ðÒà2.É^x1 Å»X6ÊH¡Ó¿<Âê݈û‚‹ÛŸv`©•‘¯v(èSY·Û Ü•´§§Àv¸ {^2È Ê ¼óí8Ī5P½|½C_•¯ŒGå ¿
URÀ.0Ù°~+‚n´S`§8»øû¥¸uêmDsÐfà
s9™à6ÄLp¼{Šà‡=ËÌŒ=ov·
ö'‹HÀ„ é* ‰©^ƒEÔ‹`~žbßó4¯
|#5øq†’Éž‚çó×ýØËn°ºÔÃ’ þsIÁ¡öˆ
wu:Úä{ä¼O¤6áÈ‘\;§=) LáéŒ;–WaÅó g¿Á¦ôÀ‹Hi×À2>4>à® ¢DF˜»k MȨ““‘Nn87à1sÅ÷£ÜFžU„ðùBËÊ•/1ò€0bˆ?î\85ž€ÙïI
/u¨‹ü2ð°‘𫈒êýˆ€jsŽáx2èV„H=GÞŽŒéÌI‚]ž@#µCûC'⊠¸Ê'K°îô<¬1×…lÇ…%-½V†Åy¨@I[ àRÎ ÙFYHdúy’Êu 7nÿ 0ê ÃàØ0¾¨ü©\â ýH¯Ó ,
ÿœ3åuHkÆ
PÜEA륅ã`ÏÒ‚-Lî=îsÒäó¸@ ŒÛš¢w>qz^Ÿ¼n¯#‰á®âÝí
ò 8îo/ξ?{·1†
ï8_ â}ˆ`Ü6Ó“^½>ûêÛ³§ß~·¹»½~öô?7òìé¿àÿ}õï_Ã?ß~³ù›³ß~»ù~µ2´J.
&ý>•«C‰D…¿
¬×‰oäIQ0IVFß!µ ] ‚Îwº„ðv]†@¦iä"åð
知_
¹ÞVb$ð"¦°ÝËï*QA1ñ%(DÎØxÞàû5¨ÝÆôÃ.9J˜ÿÆ ßNÍæÌ{£‡ïŽâDÃì©t@åM` Lqü(¹í¦ˆ`h]œÚÈ)‚"}Á®+±hZ^^ÙHX>iZrô¾ãÁ ö€A)UõaìѨ¨~-{RâÜbI‘8¦°«¿C8ÌhÃì{Ôt6BB®¤Ã‰ÿJ±úrWéƒK[ÀRžxùÊC€(ôãu]þõ¶î®&é\
›?“¯,¥o‹Ê¸¾o/_&Å){R&HoŸ ܪBãß•¼Yë¥Gמkþ¿#½ÞßÀN2SpeÊV:bJªmû=Ž^5WHr³ÓXunÜÏ©íÚº,¤¥
ÐO&lw‹u×;¸/ꊸéN–+j¦ÅÇ»(oðOW`¯Rà £È> óf¿šsÏl…¤û¸âëä‰jÔ`1§®-éËìsjRkZr+q"ð™ ›~ÕøR}̼—÷éŒæxѶŠGapi¥Êä³8B,´E6ÿú5SeTsýï³ÃÍüúÌ€êO7ÇèYƪŽp#-¢-·wŠÙøç_º1†þó1KRxõâvU8tÙôk oè>íóy:¾C¢¿é$2˜å%ŸÏgþAÏg'½”¹V÷T çB«eê ñŒˆ‹´˜W|ð;…xß\ÊÚÚÎàƒl{A’¢Ï´Cpâ,þôiÝ Ž¡wrèF¨ÉËØ{K àïtIfPæa’9˜ó +§0w‡Rc𯰒TèÓ·éôlV–NÇ 6t9³\`JG ”sp*'²0'ñ´%HÒMÌâýUÐZ´b—OÊõöŸw˜ñn-?År'ÓË)µîŠòf§Ô˜švKO©¥ÑyÛ¬—gš».)m€pêT¹À²ÆhyPÉ*|1`ëínu{|%©pD°Æ¼\£Åñš=Ï Þ“…‹&L Û k»ž0³2øÕZ@=ÌDÏ*Ók‚oQ˜d
Õ%a¯@ý¢‚zƒ=Ú|:ÇEž o’’s‘Ú¹aÝàz´!GRщ§Á¤@Pä5“¬‘©´Ÿž
efr²bœœ¼â5œ78;¤BƒŽ ¶§²å ÓÛéIÛW ธ†æsµ#ŒK^ƒT*T9‘uRô,QnóÀÜzFÇENX2‡ç„Z}ln93)vérÌ¿ånÓ2úC–1 o† œXÖ1½¦Òow¹=Â4̱<õ¨Ã´^°Šõ|n¨‡ÀÏ5°ãÖG=¨`Çå€0Y :1k¾t¼1µw?< 9¡•iýĸ6þBõ5Êãjg¦+V6‹vdi¸ÖY“Ew†J ØbS½VÁJgÕ.™pT$nÜlçm;o‚‡Ô#ȧ֌Zlsªƒ?õ±â0ºä´hÝ}O ¢Z¾øw³²e7Ø~>ë'ˆµüÆPçCÖÿ
Q§ÁïzD‹@ìBêÀ™`5“Àd!Ÿ8Ñ)hvf¿?€öQØ<$H¹¡}Ãâî_FbŸD8MEEhaâ窱,‹<[½kpIÏ•¾ •1ž*¯ZTña;à~Ñ Kgtu‹²Û⸘êÔÄC#µ<®/: nÍ;Ÿ±Nxù^27ÿæAÞãÇ”`iŽ†fu¦ãFd¦M¯j9^yÝ>¢®Š ˆdInA'ꀣ6‰m"ˆßй®]•kŽ—Û€-Wo㪈*æ9ríã$–:‰|…±Vð"åCæWoéÊ‚÷ùe½÷tpõ¢^=¯WõÝ7õÞ³zu;˜í}½šê»×ƒ‘Û¼Wõê¾^]Öwël#Ý!]vÏ œkj §;ršhõÎã+!ÛwâTûÈ™Ó}5pŸÙavï ¯ö†¢Wkø &«8Ëfûo)\fû ¤ª0øGåŸ#¿I ³KûÃ<ŽAéÀ2…ˆ¡ž\s¤sc©j“ú7`Qîחͯ|U¢Feº@ˆ©ÜÿÌÚ’såøs‡Þæ.×G %±p¶Oíæj^^d1¬§àÑV:MÄžÛZ˜ö€m„Ú«P½7ûø ůbµ¸zPÂ:†÷ÌVµZ…¶éà´¤ÞS •#·¯~7žöƒ?â]eEÍëñ´r¯æçÜ¢^‘š#=" +üÈ (Èü8p‡sÕç._ ø$àÊbÑ©¸s–ex]›å|œò‰K‘䬧kíÃ)Ëï áåvQ@¸uejöÕÈï=ÙôÕŠ«Æ‹]ô<Î?@´þ
ªÒÌkKþ¤×š;'ûÛ€kw_÷±Ÿ›’¼c¸]|/‡Q-—ó•„ß¼ AƒYŠCcÁñ>æ•‚xL »¼ÞEvµÄS¹IÅ\ô
j>ÄÎÉ D“£Òàˆy(¡ S l‚?U ¬1 çÂó˜w¬% Ò–¼ÓƒdmkŽIÉZ"d×Mv Jœ)(3îðâ=#
,VÔ+ ~Ecû}8”5{;tØOö*ñì®bÁKŸR GÌ~îó5j²E$Ê(o’»ÎØðvÖ;ª‚ÛŒÝ=6Ó.¼71@»éH HÁƒàú`iÓH¢¨ Wxª m>^i‘c3ê :´þ·>‰OMSúTsɲñwÑóœúóùçφß,Z$ VÚ±ì F–r" cõ¥WÖ‹›ì£øµ½‹=—¥æË! çbÃë°ùû°@W#^bgª0`Ðɱ’³o1ûU îÃO%/ÉëEk§^œÁ½´J;:çÙò¶GºIÊì5^™ªƒ×Ç ï•Ó½¾?öá¹âRjA/?+GS Û”[ÙNÚàEox î|âo¸ä–Æ‘Še_œ<éáñÒçQï&æ©ëVö¦¤>Ð\5¶ÔlgxôêCõ#ÆŸ];¶Vê
oèÊÀÇêâ µ€¨^ühMaHk¢Î®EʪÍẠƒªc¿?û?/(?œendstream
endobj
180 0 obj
5258
endobj
184 0 obj
<>
stream
xœÕ]K“ܶö)‡Tò¦ršIyhâ
:• ü¨D©Øe'[ÉÁÎA–ly•eÉRbÿû4HlÍ `† <•r4Å%ÁƇîþÐ
4ør×6l׺ÿÿ>y~óÞßÍîÙ7íîÏðß³›—7¬¿a7þóäùîƒ[¸Iˆ cM§ßÝ~s3<ÍvÜÊÆèiEÃìîöùÍûבּ\hñïÛ¿Âs¼Û™¦3-cî9
-tÆìŽpÏîö)Üþô àϺ•ÃíŒã×؆۶µ»p÷ GnxcÞ+øÙXa•qO~|{óùÍËT²…{pG ?ŒT
<¯;Û5Úºî~ðèæ½GŸì^¿zóõÍ{ÿÚ±›÷þâþïƒÏ>„ }´{çæãG»¾)߃68´Ä] Ð’v-´T¨qr¶l§m$ ý RmË9îè\º®ec?K¥[¯¥…~ÎGÔ÷“±®+¸›ÿ: UcAsøþnè~×éý‹àÀõ †ŸšeÁ#”hW‚炦Šà`+ÒÎàùÌB€›RXa¾~¾:€×•\3bÒu˜”^ “ š*ÂD*°$ŸqÍ[¹¿Àlœbçà˜Ø¿ ðP’M:â=Ž”/÷÷ÇÓUê©e·ül¸ÌºË«pxV'\ñ .Sº…1À_r<úi2«,^§Üì‚-ˆ·×ÓO>ýl'j©«ã¤ÇàB7¸*xi?‡ùØ)cÌ’3 ðj=fã½m\¡*ãŬXŠO¨˜éªH°rNºÍÛ²°âƒ‰%‚šˆÎú{Åô>ý‰hî*#' LWWntïÊ´œ’w%½º„'8+„Q žŒ ¼ËÀ3PceRµ˜©’b"õ æ¬
âÈœ4ˆ,ë-0gúº¹ÌYÄÀœ)ŠiqÅ}>©ŠÑü#Tæ1ge…îÜ¢ÔŠ) ®òA踚¹é¡ã¼¡¸rzºšÁŠ•ÁXqÖU³b9^K¬([¹ +:«‘—¬XY<ÏŠHº‰é0+¢PÙÓŠ¬è䘔fA
‘ž‚¬çHO: zµAÊÄ FA½,¿@•Aô™UbšþCáQéõ@œó#ŠÆÒP=7>üXÄY¦ª¥ÚQ ¥&+G–‚ä Ä¡œºšÁ¡•
šz ZŽ×‡re —6ÏãP¦›°Ôi,žçP$ ¢/äcÑÒ$¹ ¹rd)È×ÙéjQN¶6ˆ#qÒ "•ÆäU‰3]’\\Ì ÎÊ †È¡H¯IjªÑ$`Eæ”É›ç ye‘ee4ïd't1
‘Y¡ ’*³‚£Çà-UVÆ+cªu×IŒåx-#crbðÇœæÅÊÒy^œ„C =µý–*%)DG]Í ÅÚŽ´8aˆÂIÄBö±¢!ÝaQ¾µ2†'É-0DºÅ U7êÈ fm|
üXÏyM {žÆJY'ñJ³Œ*áÆÊXnL ø:©± ®¥ý°ª3¥ûaÏ)qQ†7-߶ÄŒƺ ƒ6+e²•Û,¶ÊÊúÃ%.J™°²ž_âr†tëµtN‰ îf…—𸠩âŒF•—𸠩sJ\0$ÕK\V€ç‚¦Î)qÁðÔ)qY“ š:£ÄCò‹)q9 Å.S¼[g¯´¤
?Ï
œ¼NØâ—ÚâùZ<¼B+’ŸóÑ(Ç{I‰K´BK/k¢«é¶‹¬ÚÚغr˜\9%ñÂöÕ-ÊaÐëÒU„tîÁVÆu\´ÅЦÌrWª•Ã <éü7™›Î`äÊxú(š®@D´ Nà—„Ùä›k#ãcjBÕ¢ ]íèÐÕ‚jzÿŠ{GjÐîªJ¬8+ ?Û%Š¶u[b!,°º¸¦¶xcrKG3Z´Ý¸e§Ñ¢íD«\ZÄ!;M1±Åi«ô´LL.Znœ§#Oge}zš@1ZM¤k8WDq±e¢ÓMêytYE¿Ý £ˆ|~šiE³Õ•7Íç ÈçÛD-#¾š˜)ƒe+ê iµ¼ÊÔõx-1'zæd¢‘º¸¦¶xž9‘tt
ŠM·(¤¡7§±r sÖqdNÄ.q+椣Oä2éµæ¬ b`N„" /ì¶Þbe—ÞîÔR7dhe@‰"@é¥]CiÄšûÇµß ¢È¥©’< h ÑÔί“DËñZ"Ѷc[œã ;Ût²¸î¦¶x#‰b饻yÞBÝ
]K–eðim<>ÅxÒ|ºñöát7Lä=s#|ZÄ1…K€íQ"7öDÕ/+¢ä@-§=Ophe=‡bÓc ¢Mäd¼¿2‡ÒUªˆCIÞÉàÐÊ€út/¡–×É¡åx-p¨ìä&J+Ã)Tu7µÅó Š¤£KFè«ÕR¸ˆxNqèiâ¬âHœDrõxë ËLkêKS¸µAô(F‘>ÖŒ¤ëÕݤÙïÅ欢¯»! :ÊG¤%áÑë ÛÔÝÔÆ+cj»WIŒgàµDŒ¶Ýä@iÚ°¡« ð¦¶xž‘tˆ}RT/¸\$Fš§à,ƒkƒ8#m
BKqtZ¯1’§áb!rŠ+ƒÈ=R—·ã¤ÇSd¤j×>}©'¹ç&ƒ,+#ë·alÅÓ‡HW…Y6}. ¹È™Á›•¡ŽÖÅÀ]5k–£µ´WjµÒ)TK%9ÌUüH÷r]£$‡éxoV’ u-uvVuŽ³YiJ"4[gSÜÃÕ9¬¸³¥Õ9gH·^KçTçànV¨ÎY š*®ÎÁhT©ÎY š:§:CR½:gx.hêœê Oêœ0¹ ©3ªs0$¿˜êœ³P\à2‘Ä*[‡¡%¾Å±Ò-NçÔ–ÎçÒ§'Fᢢ®Ö«ÍIWÉ¢]Z%«¸µ¡uµ94¬œ§26þR
z yþ_ÑyŠµaõ뺲tÔKžô[ogìÉýÅäâsW†3„Þž®ô›5¿˜ÂœÚÀ„„ô Y£¥èt…Â]Õ«EÖËu9é
S´G›e@xº Ú%rmõ&‡)ŠN7¦¸,§¶tcê G ¥Hof‹Ìušª,Î\×ÆpÈ\“Œ1<‹=ÏO\§[4£ÌoÑŠne ýŠn
b´©’É6\zSÙÿápû]Ò¸¿Ë”ä ©ö”-sV{tð]R{ŽÌ iÖkp&^®A¯b†A~ypßm6BŒZÕwlF¦Ê}
ª¤ÚFpE6}Ì =>TÍð¶ÕpëQ€wsõCèÞ'¾'¡ â
Y@òxmºõç¾CÌdA¥ñxü^ß.ŸÂ*¬ˆªQ¼ )"¼Ú8 8 ¥ÒRíïG
V§é™pSÑ’
BB`!`°¹ãJó^˜¾¡wÜ#m§¸ äÖ0
³@ÀB0f(áœËtÊxDmƒòõjé ‡ŽÀýê©Îž¡z“;EýSª»ÑµÝܹztŽüVw~Xµ b¶0®?ßvOXÂj)T·äæTâæ”r ÜÎ=J 0ÊûŒC(q qÒ[ÿøßnnÿHèŠÓ”^´Æ²N‘xÊ“_$&'‚9^«ëOá8
6ÌKÊ5çnz#éƒPq&MäˆÅœ¿r“mè0¦¾ßê žùÂ{ìºUª±FfŸ|Ä7ªörÊ›ÔmM=p ¦Å^{TPèz 3..äwãÎå!?8ÙÙÝ}ð„”®Ún/fT÷ÂŒÁ¹Œ çêÒ39wóÄ3š*‹yÜhË g0SOŽŒx §0=³§Å©L‡/kÇ-¸%·¿±ºxV5àZ°x9© ®ÉMöj‹'”Œž‰—µãôx‹Á•th&]Ö§d57[X†4
ˆf&ž¦Äã¦ÓSxÇ™ 4±Ò“ ¤‹B$Ÿ²º ¢¶
E´ÿ8Cê1DvSþéÁ0ãyÝÅh2÷›ÌiÑJI—§åp{üþˆÍQà OºN¸RÆ..õö®´¼©2g0|*I¼þ¡pè}* ýÜVFÉŠ<×\»»×h9ë.¹`FNø¥X®Ösïõk÷Ü2wäîy|Šì¥CrE*w×% #Lz^ƱÎ@ó‚ªÝsÑ/«/uýaë.ïzVêÖ³_í®k—tجëóiÉQ²¶;#0Cèï˜2˜(rù
!.SÒºMN /ǽ8J‘•í wî†â ¶ž2çÐœGÚ8„v‡D)=%< "hˆÛ™Àb íhÉÑ(@{×ÉÁ˜|Œ'ϸ4qòÌBjÅW³ÌŒƒHÅQ(üz{Ð 6&þ|–ƒ:˜µ…Ÿèœ˜)TƒH §ÖJ‚ŠFÂÔÆÑi‹PýZõ¨Ièñ)
ç¨À;)y@ |Ø,Ø™GŒ òÃìÂÅçAu£à]#nÂr7×@Є^éÇ~€¡7rèKŒyêâPÐŽo èK¬ “gŠyñ¥%´×¥|øl„ €hÚ`à³è9ÍP[œô}ŠÍsìïã#ƒæöb» Ä÷#00 »·riø˜Äu‰´Æý™5lÿå~´æËÃt¹ñÞƒ£S¯áÜ¿!dùÑ%1AàýX¤cߢCà^p?s
©¾d¹›Öî^ ¸#=f÷?»F 31¬í“¶Q£Áù°
…ÒnJr¢Þ §Ài76äçi7ís§ë¥ÝåM戬m2çÔ0ûa¹ ad¦wS:<ãÐ £;ƒBèÞ6•[hìÅL
ÄÓÝ=J½Â
¥±
̦°‘¾pWØàjõÙú‘7ìØ››32ñðçfÌ7ËÎÌÈ9$µ>=ôìê÷¨ÿeZ´¿ö:\û:üz~½
¿ ‡_ñª%
^» Fb/m:4è€I—)í:ì þ¿vH
·ñ
#ÂwFàãXÌhð«©Ý{tÝZ²îã8‰óÜjÁælRá«);¸Þe¼ÀS÷|Û˜nÑôR»ÝßMóŒ;÷Zë¦\ÓOì1æŠrdÐ0â£O†ÑUf q§#?…kŸ…_/‚Ü…û(rNA¸Ã]Øþþü'ÿgʸ›·bÁ‘Yáȼ÷Â~l¶4÷cÈy)Á–°úÍ£óòs±^㢳{Ÿà–ÛaR©õœJþç \ºeÆi
7Ô¹i…ÐýýYË2ÃÓ-^D¸ïã™f¿ŽMñ0íp±å¸™š;Xœqd½Hç.Q¸Ï]æâÝ;Nlºnf…“ˆƒ‹vqðTIÇá3µÁèó›ÿl_!
endstream
endobj
185 0 obj
5090
endobj
189 0 obj
<>
stream
xœí[Ý“ µ¿¿ û8›òŽõý‘<™„`À(
x8|ænñúÎØ>ˆþõtKukFã= *2Ô©f5R«õëïžï6b”ÿÊ߇ONî~â7ÏOÄæ øÿâä»™&lÊŸ‡O6oÂ$é6ÒJZ³9ýæ$¿-7^Árnsúää‹áÞv'G ãðp«Ü(„óÃãF¸áj»S£6ÚÄáz«ì¨‚ÔÃÛ q>|Ûy5<‰AZo†szç‡N
ɲUc´ÆׇÎØV·: /ð™4ðoxŽûHùÕé{xµ‘Þ³
£Âß?9ýýû0MÆÑâ«r4
ö½„Do¥ŒÃYÚC{ka|jD pÄV~”Ö䨜†ÃŽøPŽ2øá~}xMï—¥œU|© ÜÞ ß$º• fzç=Ã%Z
û«¶{8Ø÷[mp›:5X? ¾ßšQ„ -NÅå ,‹«Ãdá=ð
Îïðx2õð N…±•NGÕ
æÂfçDßþ9¬ |‡É·zÔ®í†~¦_óÈ õšŸt§
¬ -'–-ðb:¢ç¾A®hÀK ¸˜Q{£l¹–LÐ VÃÓ´2±Ü ]VàiÇP”`C½cB¹ %à.óï1âKíõÀþô þ”&"ш6ž¯Äˆ^¥ùîìðì䜶`xè•—&šwÛ HR!m»BÜNەЙFºd\ö¾^áÙ Ë‘5ÍÔ±ì 3ŸU¤:(¾|]³âÊÃ¥ÁâVˆÀ'¢@j7º¨‡¯áiD¼G.!ÏhûŠËÀ9Ääæ ƒ N
§!(‚p|ë/[ïÆ(\àØ3¿šÈn ®G5GZåà ęL·›oOZÚTÐ'IYÅè9Á èeñ¨øêwèý£ÇÌšF 3Œ]Î@ù;œe$; hü7äB°Búrø`YeQè µð³†]@ýíŠ ý
˜1`g¬‹ÃÛu=ܶ6–ënÄA#
ÁŸQy©bc4®æð °èãj^èF‹ imÜ ¸b þÄ9&ƒ»ZTÑu›¤®ð’„Ò›]ùùïÍEèät6¼Lê ‹IÓô’”G©,G—‘®B¹á¯$Lò˜höÍõÊf/‚ãE"ÙUæ>†5‚‰V…t /•èàP€)€{CWÈ ŒžnüÒ;¤t "d¼*àþ oQô‚1=:3‚ú Ó®ÿÄÃ¥˜,ÕeHXº©:ãk’Îr2 â½°Ù®5³\¨ MÖ3›''’m2ÜxÎËAg¶Ö°\ÐĪÑüqO‰pCòÃL³8¯µ—:Ìì=€ß:ÙI-—ZÏljZ$‘Y vXζ¾ Þ!óõ€ž2Ö1̵NÞ´XžÙqУO·5‡Šý™F.[µÒ¥IO#
½¦éiV
;нD½ h 7¬èMÕÕ›ïÀô¬ S>ÚK…ɵVàP¿Ÿ4·'Ö/Áµ€O5âEh¢äRÐk!©yP!•UŠ
_”U¾ F³ÉYᯘ{Y u’CnY¼q" 8Qœ€ ËžÆ=5€¦Y]Þür ìIb »A¿¸L ~¹ÄJ®Ü¼¢Õêu‡Ž·
:@•ÛÖÿÛn½³lÙBGœÐ)6#C¦®äÀbXm؃*ŒLØ#
žšîUÜ™8áLw0ÑíÚ¨Ã$— .iŽ=#óoßESÜJÃÌ%TLqL\·’1hüœ†LÍÉìZˆ¥kœµÔ+è'Š…^)o% Y’ 4ÓÚg`3•à
Œ÷›€½79fÏ:ª}æ¢Á 2K5¦`Â0‹CÎÃ{[ÚŠÙÅ®¨,iÑŸ˜xÖEǪrBÊsàWƒÿ[QYôˆ 5æˆr`‚„º½rŠ]A:®œÄB9*HAskŠl3Ì
ÜŸ'yP7-"Ìä0TÐ0?¼ëe0ß¾
„d‰Ù¦åÎ>Ûˆ`BÖ2[¯½w&¼kòtôt÷ðMè&4}ý.›¢lð ]ðzŽa
ˆÃ¥RN1kß'º\ÐÖjÓCè¢ây±…pÌ¡H9°ÃŠ UµØCp+NǬ« F¼Öº¢Æêë16!X€…š”>>vôÞ ‹¦?ƒar§ÿ§°YÍ»lfe9.á€ÂvDz-dí–ö|†€jσxÑß.h–H"°2{ÞWNÌáes‰¾·«fý´šÀ®]/„¸Ÿ!6sÊâN莶CÜèlKƒ@÷«@³ÞÞÉ
l €·™®tÇt%ð-¸NO¥\dsŠ/Ý\ÕÂæ7\s0Z ƒœ’~èŽ33NùRAO癬;ìÏÛ¨ ì$O±*@kLÛ½:\ȨGõ[P²M𸒕YÉ*)|V¸°¿Pj-ž1·W·ñ¨º5\læž7>4¯Á»ë+Þÿ}áN€sõ›p'~H·‹°ýuH'Üår¨ú‰ë <àd.LXî7 .hÜ&çæKî…¤"¬2v`&Ò,Ãôú´’ïÚ§œ\`ûbˤu '|z¨"õk„ ¼,¶ÔX\—€~R) GÃ<²ëÂì Hù?j€µ&Q03 µ ÚN¹7—¨’"ùå;è¤\$K… ‹6j*,t‡<Úd^›QIy?Õe9’d'=.I¡+Iç|ÆÛ‡õa7ÆèE6¬?ïÔŸ«ÀEžÏëCü|Kœ€ÜÀ ¡˜U¾áÜÓ
ERò
u“*Ou–I÷Z®[¯õkým1 gddÓ0«§” ¾«Úƒ €½Å2Xì@RÞl;óP²«5Ò7¥œ ¾IÐ5ßîèpúYF¸™Z
c©4´Ô'©t„/)œ+Y»©x&uJŽ5II¾ KwŠQÓð€‹"+ÖÆî°—Ï&é`yÆØ•Žµ<£Ø:xúyÆ´´1\ÑŽMÓ‘±È9éÿê½ÕF äV.êÆèšž!bñã
¦dßಓjEª’ós5ÝÆÉÑðWWzÑÞ‹ÃrÐô‹YxxXÖßØ×b˽!Æ¢yÝi´Ê Y}É¡-²‰4³.Í´-6 Qþš89Gu^§†Þ¶JÅžÚ‰E‡Â4ºÎ$ëAÚ‡ÞDNòs¼pn¾ãÅ×RrÊdÌ-AµA; +EŽŽN^O¡ÊLå»lt•Ý€ÝóBÊÔ+!³%1©S¢® DAØ€¶G¾ßg!áv7»æÍžQÙwTèJî
Ê5K“¶ïÖXÙv³b4ø\„i¥¨²¦¤^)²’Ðí³o÷ûr›Êhm(¿®"¨ßnR¥Ñσ3“¯YžK’‡U똚K=§%3ø#Ë
NAi®H~N tìi1´ÆhæÏ`I&¦ŒÂþUU›ó6Ip‚™éÄcm ÌùÞ³¬G
æó ÈÕh׆È|3ÞøÒÄŠ! —Î^óÚõÜÇ>wžåÖå{°–gñ=ëëÝú_ÏïfýÎÝlT=Ù¤ÚTnöŒ!íMɨ«…¾L&õc·.˜IãLW½±¸±«;»y©¦ûÝ‚ f>µG÷A¯© °œ€èùï,h`ÜK’ïa cfá®vàxËÏ]Þè:ÔÞ%Þ‰‡‡~@ÐjšéÀÊΉ y¡å4÷'Iìh{Ñ)«£˜:—¼T.¦³þeŸ*¹‹¦ëd×JϵÏ=×»üåÚê›NåŸÁD µ~ÊW9J¿j&ï
¤ƒC${ù,…Ï©c.šÔY¾Ì²6ÝŠ{¦mÑÓËe…ë÷Itú=S’!„²^EJ!ê¹OéZV›z>áج›±+"Ì{¹Cd1¯~j õÃçՕ¤–§ KÀ)Å`d¢X¿üa¿à ®ãÁåŽüÜ|~ƒ^d†sÄFPÅ€Ãy8Ÿ]õäß¹U× ì^úéÓ~,XœÒæ2úY™—9h–FsÐ%ñ7Ik¬¤ Z'¢M•4]û5AD¹~¼Ã‘8ïäHI2òWÛw¸,_Ã%˔֪=äÜ·í´n·eîyr”}°1óª‰ìÞêu÷ëF(§„j·ÞÃlÜ–VÕL‘ÌM÷ÖÎ8Sû©æ€jç?žjf6²—0œ2õS)ü.ÁéŸØïTv}0ç—‹¼ùpÍÄîyŠZIþ‘E ¢Ï›5A—zXþ™ÒÒzré«ŠÔð ›Øƒ“ëwIºQ0Ò„Þ|p§ÙAŒiòë—ÛD<Ä‘®ŒðÙÓ:úCýõn}F£ ê¯?Ìžáh¬¿>©£³Ùn8º¬£ü†hu§gëh?›×¾»¯ï>«Ï®ëè9{c^$8ÅŠ-Ø#p—&Z an:;Ÿ1
ëDúùÛ:z:c!Xr1¾%xmô ÂﶨÕTdiï2¦TgûdF²3Z°<Š áÜ?ÀQ”àà2Bq"hcD]ã4ñcGxÙÞlšHD ¦g}!³µÁ
–<ýö<‡ÜXOxtúÒ׌ÂûùŽ®çÇŠZ~™Bt«µí:ÌÒ¯µ§‡¦ßìVè)p{£NôÜy ¬=¢d‹•'sÅ5o·Ž§ð‹N£ *¸ŸµŽÇ†¬»z¥kT,†¸ÚTÒC©E^µfœ§š2êaæ0óL?Ï㥠÷ÊnNûÓ®¼´HP±áø•—W~qWþº^ˆÛß7öBðÛ^y0V|Âk4Dç[-û ‚³æðÞG}¯j¶…¥ªÛ…JoN×ÿ<ì©l³ÚAÀ}fýgå3#BíÎ º÷L¸U5¤-ì0ýs¯“)çe‘5èò`ÄÏ VÅ×=èØîÔe{¹p µàxå/w&²—oãü·OO>†ÿÊ•ªæendstream
endobj
190 0 obj
3907
endobj
196 0 obj
<>
stream
xœTMo1½ï¯ðq,±ƒÇ q !¨rk{(I"’”¦THüzƻٵ Ñ&ZÇ3~óæÍs ”AR¦<§÷rß=¿ŒjóØu!ßM÷ÐÑ N¯å^½ZHYE„Ù{«wÝxšT´ò!4A-öÝ\‘î-&½®ËÝs&ùAðRÚàL ”x$¸¦“‡µvèRÌpÐsôD~
{!%x&ùB¦€ÈÑŒ1| RÙä·cÁà-,µsÈ)dø¦=£MvŠ:›š¸–eˆ\‚»²K–Ãý˜|„c)e‘ÙÁݲõL•é£fô‘åø)ê\„í¡’*µ’+
Â^;+J‘‡§ß5¨Û¦™]a–"F“
ž£ÈwŽÃæ¶S¸Q£-Ñ´v( šÔ¶1R Äð¥’i`ï+lÓE[¡i~¤˜3K›ÅûÎ1£`‹s+q‹LÔ™¨sÓ)k|€âñ”ðOºhWF· ±ð¡ÔJÞPlðok[ÿŒ¤ ?™Ç¤0ŽE¹ T4~«cÀlÂl#fþXzÝ{´lÈ–Nzg
&Õ#íüÔN*°y4éNdØeøZí½ží-¥œø#D×Psg¨U•uìÐ3൮™EM¦Áë çKÖÌh/›9Xn0›¹n—æçì*æ;9 „)ŒfÌÎÿg3ÎDK#RÂÊ›Yºb†QhγÁ
éc½~“àuZ¡í_wzÊ]5ùÜÍð?"ƒb™Ù™®'¦ž€*|®Ë4Úž2ÚÉô¡FqˆöBO¬¤ú`¤
Iö ZI~³è>Ëó›T5õendstream
endobj
197 0 obj
604
endobj
4 0 obj
<>
/Contents 5 0 R
>>
endobj
20 0 obj
<>
/Contents 21 0 R
>>
endobj
39 0 obj
<>
/Contents 40 0 R
>>
endobj
44 0 obj
<>
/Contents 45 0 R
>>
endobj
51 0 obj
<>
/Contents 52 0 R
>>
endobj
64 0 obj
<>
/Contents 65 0 R
>>
endobj
69 0 obj
<>
/Contents 70 0 R
>>
endobj
76 0 obj
<>
/Contents 77 0 R
>>
endobj
81 0 obj
<>
/Contents 82 0 R
>>
endobj
92 0 obj
<>
/Contents 93 0 R
>>
endobj
99 0 obj
<>
/Contents 100 0 R
>>
endobj
106 0 obj
<>
/Contents 107 0 R
>>
endobj
113 0 obj
<>
/Contents 114 0 R
>>
endobj
118 0 obj
<>
/Contents 119 0 R
>>
endobj
123 0 obj
<>
/Contents 124 0 R
>>
endobj
128 0 obj
<>
/Contents 129 0 R
>>
endobj
133 0 obj
<>
/Contents 134 0 R
>>
endobj
138 0 obj
<>
/Contents 139 0 R
>>
endobj
143 0 obj
<>
/Contents 144 0 R
>>
endobj
148 0 obj
<>
/Contents 149 0 R
>>
endobj
153 0 obj
<>
/Contents 154 0 R
>>
endobj
158 0 obj
<>
/Contents 159 0 R
>>
endobj
163 0 obj
<>
/Contents 164 0 R
>>
endobj
168 0 obj
<>
/Contents 169 0 R
>>
endobj
173 0 obj
<>
/Contents 174 0 R
>>
endobj
178 0 obj
<>
/Contents 179 0 R
>>
endobj
183 0 obj
<>
/Contents 184 0 R
>>
endobj
188 0 obj
<>
/Contents 189 0 R
>>
endobj
195 0 obj
<>
/Contents 196 0 R
>>
endobj
3 0 obj
<< /Type /Pages /Kids [
4 0 R
20 0 R
39 0 R
44 0 R
51 0 R
64 0 R
69 0 R
76 0 R
81 0 R
92 0 R
99 0 R
106 0 R
113 0 R
118 0 R
123 0 R
128 0 R
133 0 R
138 0 R
143 0 R
148 0 R
153 0 R
158 0 R
163 0 R
168 0 R
173 0 R
178 0 R
183 0 R
188 0 R
195 0 R
] /Count 29
>>
endobj
1 0 obj
<>
endobj
7 0 obj
<>endobj
18 0 obj
<>
endobj
19 0 obj
<>
endobj
37 0 obj
<>
endobj
38 0 obj
<>
endobj
42 0 obj
<>
endobj
43 0 obj
<>
endobj
49 0 obj
<>
endobj
50 0 obj
<>
endobj
62 0 obj
<>
endobj
63 0 obj
<>
endobj
67 0 obj
<>
endobj
68 0 obj
<>
endobj
74 0 obj
<>
endobj
75 0 obj
<>
endobj
79 0 obj
<>
endobj
80 0 obj
<>
endobj
90 0 obj
<>
endobj
91 0 obj
<>
endobj
97 0 obj
<>
endobj
98 0 obj
<>
endobj
104 0 obj
<>
endobj
105 0 obj
<>
endobj
111 0 obj
<>
endobj
112 0 obj
<>
endobj
116 0 obj
<>
endobj
117 0 obj
<>
endobj
121 0 obj
<>
endobj
122 0 obj
<>
endobj
126 0 obj
<>
endobj
127 0 obj
<>
endobj
131 0 obj
<>
endobj
132 0 obj
<>
endobj
136 0 obj
<>
endobj
137 0 obj
<>
endobj
141 0 obj
<>
endobj
142 0 obj
<>
endobj
146 0 obj
<>
endobj
147 0 obj
<>
endobj
151 0 obj
<>
endobj
152 0 obj
<>
endobj
156 0 obj
<>
endobj
157 0 obj
<>
endobj
161 0 obj
<>
endobj
162 0 obj
<>
endobj
166 0 obj
<>
endobj
167 0 obj
<>
endobj
171 0 obj
<>
endobj
172 0 obj
<>
endobj
176 0 obj
<>
endobj
177 0 obj
<>
endobj
181 0 obj
<>
endobj
182 0 obj
<>
endobj
186 0 obj
<>
endobj
187 0 obj
<>
endobj
193 0 obj
<>
endobj
194 0 obj
<>
endobj
198 0 obj
<>
endobj
199 0 obj
<>
endobj
95 0 obj
<>
endobj
225 0 obj
<>
endobj
10 0 obj
<>
endobj
88 0 obj
<>
endobj
8 0 obj
<>
endobj
226 0 obj
<>
endobj
86 0 obj
<>
endobj
35 0 obj
<>
endobj
227 0 obj
<>
endobj
84 0 obj
<>
endobj
228 0 obj
<>stream
xœ]‘Anƒ0E÷œÂ7À° Í&ÙdѪj{0CÄ"9dÑÛ÷ÏtQ¤oùñýåñLyºœ/iÞLù‘—øÅ›™æ4f¾/ Ù |SQ93Îq{’®ñÖ¯Eyzë×
ð´ó{ãòÓ¹ƒþªöP\F¾¯}äܧ+ÅGÝ„
Nã?ÛÙ=5LÏãÕ‘T¶Ž–€©€µàD*` :G*[-°îIecAäDÀ(Ie IwdRÁ•lS“ÊÚFîm<©€^Š€G` §U·×#çA/YÇ«ëÕE^‹Ä
D ^ïÅ®èz%²6Èó ´ ì€xP ÚÍWÛ¤±2¦×TL|äÌiÓYê¬dDsâ¿q¯Ë*)¿X ”N
endstream
endobj
33 0 obj
<>
endobj
229 0 obj
<>
endobj
72 0 obj
<>
endobj
31 0 obj
<>
endobj
29 0 obj
<>
endobj
230 0 obj
<>
endobj
231 0 obj
<>stream
xœ]Ánà †ï<op¶¤‡È—öÒæiÛ 0U%ˆ¦‡½ýlgíaH Ê°lþîx>˲Ùî£ñ‹6›—’ÝÖ{‹dgº,Åx°i‰ÛŸé ¯¡šîøê÷O%Ë(ïþ ®Ô}Bïõ—ß‹âšèVC¤Ê…Ìäxá”y¡¡’þ s?šóó:* uÀ 7{ÑŒ
8S@ ¢€!°ö€
€;°¾pà ïfzåO ätà&ƒ6gÑÖ$Pa•F#8îC}Õc|y ÄõHÇÆ{kT6ÍT3“¨–BÏØëZ¥Ê2æšy›
endstream
endobj
27 0 obj
<>
endobj
232 0 obj
<>
endobj
60 0 obj
<>
endobj
233 0 obj
<>
endobj
25 0 obj
<>
endobj
23 0 obj
<>
endobj
234 0 obj
<>
endobj
58 0 obj
<>
endobj
191 0 obj
<>
endobj
56 0 obj
<>
endobj
235 0 obj
<>
endobj
16 0 obj
<>
endobj
236 0 obj
<>
endobj
54 0 obj
<>
endobj
109 0 obj
<>
endobj
47 0 obj
<>
endobj
237 0 obj
<>
endobj
14 0 obj
<>
endobj
102 0 obj
<>
endobj
12 0 obj
<>
endobj
238 0 obj
<>
endobj
96 0 obj
<>
endobj
200 0 obj
<>stream
xœcd`ab`ddd÷
vô54 1UH3þaú!ËÜý[ö§×OÖn æn –Õ?J„¾×~/çÿ^,ÀÀÊȘ_ZÕ5×9¿ ²(3=£DA#YSÁÐÒÒ\GÁÈÀÀRÁ17µ(391OÁ7±$#57±ÈÉQÎOÎL-©TаÉ())°Ò×///×KÌ-ÖË/J·ÓÔQ(Ï,ÉPJ-N-*KMQpËÏ+QðKÌMU€8OB¹–æ¤å¤ç¥–&æç$敤¥&–¤! 1000™Ù10v1v3032²ÔúÑÁ÷sîoÙ? æ3Þûñù§ùg¢Ó'NšÐ=cZÓ”†¶¦öÎv¹?{Ϭjîhén–ìnîo™Ýòcïï3Zz»ûº9¦M™2mFSÃù? ¾w³þèûS Š)µçûŒºIÝíÝ’õÍM
`CäѬ6û~Ctö¤þIÝ“»g´ôÕMü³ûûL‰ÚIíÝÝ
MM
u“;¦·ÊÿXð»ûÏÂß=5-íÝM’
Sš¦õõvOš!÷cïY¨vŽùÝ-rNýžßØÖÔÚÝ€¤ˆ¯tá¥S¿+Îfû4}3×fn9.óù<œKfñð 1/ ÊýÝé
endstream
endobj
11 0 obj
<>
endobj
201 0 obj
<>stream
xœToP÷ÞcÝEñ¨ÆMqbnO%Á)6Æ(Aiâ?BÁÿ„NìqÇrw€Àqwp÷îÁ‚çáyS˜F¬ƒMB¢1ÍÔ$ŠséÄI'©6 ÛN:cMƾ{óãC·@ò¡3é§wwæ÷Îó>Ïû<¯ŠRÇQ*•ŠËÙS“‘þŸï§å'TòÊ8ùIHQl8V‰4$ªÇV²«–aÛR¬Jƒ? h•ÊRçÎ1[ÄÊ
£U·¶l.#;;+U·1==[·Íd+ËôÕºÝz«Ñ`Ò[•Ÿ_è
Ìe•kƒnísF«Õ²yƺºº4½©6Í,V<¿.UWWi5ê^1ÔD»¡\·Ã\mÕíÑ› º…ñÒjŽÙd±Y
¢n·¹Ü VS•˜c©µÙõ¥eå†ü£•BåS?§Š¨ýÔv*‡z‘Ê¥vP©]Ô…-¥¦ìÔ*Ü¢8 GÛé¯Ô¹ê‹ñG˜år§&±]ˆ={AýFî‰Ð1<ËWï¹– )&Ï‘ “×I *_Ã-p%.î…'¸Z½ByŠ$ü”¨ûÙ÷.þ
ßBý›3ÿzø’6"øš¥ÎSÀ†®³¶²CpÂÙÑ-mZ|ÂhÁ¦°
f°å Ÿ¡ƒð§ŸE·ÎV çDæ¦ßU*Ì2l©Û•§ÙQéº/!xß3æ}'qM˜Ís. ¸‰íD#?éïšÐÎ0¸ ¶–•Ãód™@TŒF>Ô –ÛBªéi<1MËËe‰?
=.¯×Ö¤u»[›:\†_ ê/.ýg;·¼QÕß"Œ™‚ µ_uôzFìþŽˆ^çŠË wÔvO”hOt¾íx{Ú¤Nà ÐÞ 'ØFhë
HRhPë÷÷vFkÞµ~ Ü?~çóå“ GÞlìÚ´û=._q°ñ"ŒqW&ß¾‰
“„£ÝZ_;¸ú€;þ3‚FŽ)#‹Š,l/†iÜ+ïá/ù7µa¶ÚûŠÇ6(ð™$E ‘½Õí*ˆ‰Žø '7ÿq3Ò€ |ôPú”Ã3¬4y>4\˜=E^˜¡Z2ûæ:£PdH K¸ÌWwšžêÇg”ÄœgåZ9O~‰o ts‘qRk¼{=õP¥’e¾ÿÚªpÏì®ä€Ã×~
À àvycräÆ”oPRPí ‹×0×5ÑyÂõàìls;Éjr?YÁT|ÆÛAÕ¸ü¿¼ë´;à„fð¸Ü’9›‘ì´ ;¼ËÉlÈ7*…`®x‚óÐû:Çá$ô€oü/ –1¡‚žºS•àZa®€cŠe"Òï|A‡‹žsó
pÜï˜àÈRäy²—ù;ºâ5ò e†ÆV(Ô}‚ƒ_ÒòR áo
\Ÿ‚¸¹ •–Œÿ· ñ‹ôí[·?~ùZVŸ@Š1wÞƒ_3÷·ÔVÔl_#5ƒÏØø»‘úÃU;Ó…uŒÑÝ5)à>V#¥lÙVMß““ÎѲE6ðöÐk—^P·žðd1I%©¨T\þíŸO~Ÿ·öU™{³€+&ë#hF7œ›úôî~òØÁ×.¹z\„[ØyŸ{Z•°ÅÔ–Ëç“výK¢ü‡qW=BŸDm
&‘á{ž¨šÍäçÆ•5ì ±;Ì=¸|p !déáiÈnÒÛ6ÚJŠ7 7 çú0–ÿrηéaZn’{øÙüïT£T“±£X/2ÇÈ’Úd¹Â—ZPe÷möýuyBˆL^KÝ6m.f3sÐÅÔç}DÅ…Mì.)úf&ŒI!y4¬Š>ÀÍ!L»ŒÌZ¾à1þbà&õÊÅÊ$ù¤d,å† Ä ’‰…ï]I;üìPÚ߀ûvø^/ô9{ÛŠ¼ùjJáÔŒšnq¤ä$¿õüê{€F»pÍýGH£J¼kkÉòÕ/jÍ ýí>à^,-ûë»Üföò¥vƒ×\Ññ©Óc#oL~,:Ð'hbI +`£J¤Ñ£Èþ¯Tÿga¿¾‹+ÈÎ^G=4¯¨¯õ´)ƒÒ'¾aˆÀoÄ3÷¸
ì]G¦É6t$c>¾pVºÜ¥$ÓêiòŠJ2÷+z³ÏpŽÙ›9-$÷
¶/b.,Š.Ö.RgÂÄÄèPâŠú7mŸcV
endstream
endobj
89 0 obj
<>
endobj
202 0 obj
<>stream
xœþý CMTI8 $øø ø ‹øßùK‹ ‹ ©øu÷]÷X÷T ns‚Copyright (c) 1997, 2009 American Mathematical Society (), with Reserved Font Name CMTI8.CMTI8Computer Modern cd D E gøˆø§÷©Ý¯§÷Ö÷pâøYø
`‚‹f‹ˆ{–z¤¤¥Ÿ³½\¯Eûûûû'%ÍHë÷$Ü뙓~˜„…Š‰‚ UIvjp‹o‹«—‘‹–Ž— OµƒhI;P‹\|¾³º¨÷
¤¹ ³Ô·Ÿ§‹Ê–6 ˆ}v øC•÷tŒœ û`•¬
Ô
7Ÿ § %ÈÖŠ
endstream
endobj
9 0 obj
<>
endobj
203 0 obj
<>stream
xœµY TSç¶>1sê€Jz*¨ï‡[‡ªÕZ«¶ZªÕ:Ï2ÊôçÞûþ°½ëÞ÷ÞZo½·X+‹pÎ?íý}ûûö„qèÅH$™û’•“&Ú~{U "‡öÿCêKŒ¿I;R ¡¯ú:ì*œs Äüþ¸v #•HB£RÝÃÂã"·F»ö ã6iúô©ãÜÞ˜8qºÛœÿÈm¾>¡nK|¢ýC|¢é—`·Ua¾Ûü£ãÜFÏŒŽûõ×cbb&ø„DM‹ xwÌ8·˜mÑn+ý£ü#wøû¹Í v[êâïfßÜû§{XH¸2Ú?ÒmI˜Ÿd(Ã03ç„Î
s/b^äü¨hå 1>‹b·Äù.‰÷óߺ< på¶UÛW¯
™6ýí™ £Ç¼ÖwÜø„ ¯OœôÆä7§ g˜áÌ2f³œÉ¬`þĬd^eV1£˜ÕÌf-3–YǬgæ2ã˜
Œ;³‘y™Àlbæ1ó™÷™IÌf!3™ù€y“YÄLa3K˜©ÌRÆ•Ì afóÓ›éË„0ý'&ŒéÏ `2ÎŒœy™á™W˜æ]zÆÑKKJ$ï• í'UJE‡‡;ŽË ÿ!›'«•u°áÜ8îÂK)½çöþ´oŸó}ýû ë·¸ßA§aNÆþqýÿ1àèÀA/9Ov®“/”gÈÿþòY~ÿ•¡¯x¾òpû òA]r]nº_oP ÆAŽ²d¼>Ó †L×U.³ÍÆË°Àa]›Ö6$Ž]‰¹ªFŽ˜Å| É
G¢”9‰ÇÁ*:¶)ÍÎØëú_$?„½ðO*YO, 5éj¡†®½§kí*8¤ÀÅì/WN]8_°f¥@ÿËw×A$èvs¸Š…»`
nN,ÛnZsÁÃ;l '¿þŒ%ÃTŽÁ¬üÐå¼ô
§Žõ4*͸ÏꌊÛxæÑÜ'ƒä"FŠ½xÔ±†ÜvÈ 5½µvÑÆ©Dª¸ŸÊ?ª¸t®qß¾~‹¼"tö
®–]7¨Õ¬üY€Võ®,•¡ëw÷þúíô/ˆ´P±„ÜäÉ@™‡6·Q5¸œ}Ü6aÁ{ë¦T8‰•Eœh–ÔÝÆÝ·¥bnçñåQÏI?2p,‘„ÿå5| ûýô#ÊA¸šíÉaO{Ép
8—ãJ2'‘Y
òòßÜx{Ž]Ðx"û.)½w`ù®)0ˆ4vYÀƘð•+^¥a«»O>ÖcrÞsK)Ö¿œãÉûÿýIÅÓJÖ¢£üQ]Ò–óï !Üð±ä2ðÑ«ÈÑ8]†ÖæzΈÁ<ÆBP\˜2*)1(ܸ¹Kï!‹}.ß¾öUÛ›k)ºgPtŸµbã ½‡-øšÅh‘âÐ|Ï9¯ÉÚ°À1RI&DÏ%³#®Ý@5}Ç>*zKaÁòHÙUðXa¦Ëº(ÁËp<Ô®.%
Î" C¥cçÙ 8‰Czþüâó»ƒä×ñ ü†Ç^,QزmçüÐïtߧo7ÔÁ~h‡ý[ v°s´Í
œ@irïË\è ‚F“ \XåNs¹¥°¡!¸Þ[_Ÿ ½iFÝè1Ûx¸ë˜«-8Â"ovÌà;¿ geOjeMÆ”8p ší ngÇAQ“uwÙ ò{<5eûkÂÌé>p_ŽËªR"Ð;‰‚Ê,¾UáÜh‰üã,Ñ ’ßC?\Ë›3o%€;·>ÐwæÔ€ÓßÄ
š"]V
pI § .l<¤dëõ‚Á †òŠƒ>‡t•Îìá?~"dwr¡b{ƒ_žO T«
ÜTÓz{eO
6úÔ]` ®²+?Ùi—¡…ä$A“™’š©ñ¯Û;iöœü¬
,
«U*ä÷"êÔŸ'R$º¨,8Ê„aVœf’ür S ÌGò8ÂJFàâH™nzˆÛ˜LNù
©gIÿ‡ÉÍWê®\NG®f©¼o] ÷ËÊd•YÙF3û¢pÇŠCnò“X Yàheç¥å ¡yEdɨy&óÙ77½?wjfûq¿é~r4o(ÈXv&LÄq‚<ö ¬«ÿ„s¿usè=)*ÅŸùfcÁM¡Æ* ÔÌ 5Íf@ ‘&,¸†½iìf«F5Cˆ°¥ô&Õž}pšì)`gh(†(U•â`«¤BL”Šoâ]~WUÙ‹zÎÊFkCuÑ›
ñzÛœl‹® b!U›™©úÉs!Ø .¢7¸ÖìƒrÁʆèVi£! |õ!ûó¥.
Æ‘]r
EPY»²òm·kÙr›ÐþïñåGEM¶e•tY%„‚§!¶kÙf9Ž~Wƒ6#i"Ùå22 uÈvÝ&ºj¨n½6
B ´gÕ(Õæ'e« Brc§ —qhÊ(¤ûÌêѵÏLX«èq
5…AèL~uÉN4¦ÙöiÈÉ.þ ›]~&-Y*ÛŸ\‹Àhß;U$s¼ƒÌ5ßMzpØìÜv}Óœzé*Õx÷K>Ë·Ö§ ¸ÊsÅ_+NE®bWDªUÛ3e èÁBì hñÛ·¡tpÓç{, 1Å×Ô•›j
37ëµMG
€;rÚï
ÅVV~àÄzÍ<ÍâÙÛ"×÷ö£Èó]ä" Þ_ÑÎ¥ã4~;Î}›çÆ-MG?j»Ós§ŽòßA"Ž§ò¸ çäå8öµÞÕÊFh‚h‚`%l³#…ݯˉ†THHIIK'Éq¼Â6
® Õ6XÍ¡°ò‡ÙÝ°ú °ºFaµ¾è†Uû®½4¹³ÈQÓ²Tæ¤îJ‚d×?ˆ±¹»j‚½Ýˆ];²BÚ´ÀV’BQ/Åý˜ÌïÞ»÷Huµ¹µ¤Ý‹mˆ.‚&y!© •Ú¼$jÌR’2ÔKfºÌü)5Ÿ¦8ÇJJv™ì#t µ °<ôá]I¾ z]û²Ç„wOúlZ±\»\ƒÙƒU_õЦî¥1½JÀ\ßxîó/G¹ä©Š(øRSw†Ûlßný)ƒ™êÑ>ÝîžÄ¢ë9;ù)¦G˜qk[Šï¤*ÞÇËÝ2n'|çC «×ç׶sò#Ñ%m®
éÑê1‰L!ß9¼=â¨V—ò¸……
Дî;õQ^5 ‚æˆjÿš-Æ•°¶j—…zîöß¾bh„F8Òã/FB{BlÖ³¨þ[¯ì¤l
+×0æe ®£Ÿ‹¾óŠ¬ü-ÆÏhE݆–?‚_¬î!™)‹ ХǑ°Î³.4`_6KÚ,ø •ßÁâŸø]¶ºÄ¥Aœ@®ÊTdŠ£E–ósE ö¢¢'“‘†Î~©*ÐB†kb.MÞ–•á2êFRIï ^„£‡ê-ë W;öº}ÔNqÀGüBGý.=GÄ_þˆD̆6{׬±Í1| á‰üÇÑhà8´ÇÒÀa¥ña)X´ªøMžJoÎj¢öF´jNSsÐb8[¨Òº·ñ$åsÛN«gA<Ýg וèJœkv¦¦=õb¤=Ó˜Íçà˜;–=À=Í'Cü$u
2³* ¯yD<÷úH2PA=øÙXêÒœ¡´"?Í‘ªU§i…À‘“ 6€ïîè–á"4SAøVŠî¢; û—?LúÊ%îÂÆÆÕ”»íýö{îüÅóyiûŠóÄ¥½ç´Hš-˜wó,ÒŽ ÓùN”Å%ãÅ8¥¤_ƒr
Ë|me&¨ š£˜Ø‰Ãß`Y«ñg8LžB« ¾ìp(ÞcÓŠ±âò¬
è
”l/&SìmU—Kˆ6Éó‹Òç/ˆÒHkW=ì†ýºýÚ߉ò”½ðÑõam« Î56>3–¾W§ÿØPIÍN½®¾ë½ ÿDŽï»è 9Ô@d]9›ŸwþX›¡Òf¢B5IFíâCb—_¨Ðå« b“©] Fœ\Äèb’
‹ JféE)Îëø€ÿ£õ)c_ì÷„Áªº- ¶SGª²²cµ- ›¤ ñ_ÜR[ÿ™m ÁZ_»ý[aˆèÚÇq]eÕô4Z«&‹:w¸U¢A]lïFêOƒ…— Í|ê]7·! ķ6ãâ;;sÉÍÖA²³‹i7ríŸoÜì½Û‘ÿËK·ÿ«Â•øíœÏ—u_¿¸¬;Ò}Q£¬Ã?ŸÆ2‹sÛÑèƒXs0ú¨í2iª¸™ß¼;s”qç>m»rõÂ:÷•~›–
æüç-GŽÃEîÁ§'Žz{΄8ƒg›‡PÜi¡ä|º"tʪу‡ý¼à:~û×fÕ!ÿ6!¶2!Ñ~n”ýgÖŶ‡ÀR×9³×MŸâþÉí3
¾iì;i~p§J I·òÝÐï;*^¢¯ðA,I±yEüÞpá`^}™5ªD™’ê·àä–o¨v¡¤ d5ö³7VoŒóô¶xFûÀlŽ üËtä¿žƒÖ¶ª3 ð.Ÿ ›!ø|\ …#pÚ+[jî-j¢¼jÜVæY”µ6sÓ¶,ØÀù ÞKî>—âjщÿR“ÿŽèåèº 'ì—œê/ípǯø’
0™b!QÑùƒ,1bb* D!~OÖòÅ]Ov*:ÿ*ÛÙõ¤Ø–Qx> ǘœqœY‰}¯Ù>ÉÿŽq__“˜¢V :N§N ÅY
¹ŸŸÿDQhk[\nFV†jÚ,Ò{Yµç¦òÚ×¾ò¿æ$ºcåo«L’Çg¤x‡¤ó”ñ†ø22ƒpàxÀ¹{q.öÇEÝ“dÕ)“Þ'òåÂzÒ+™H)g~ dz¤ÿÝòËÉ2æ*~ŸèÜmhäá†
ûFÇeØʧ)À©33ÕÐVÄ)~ }šLâdÖVò @œ“’©yÔpê¬Ìœüï>CùÇÂ1ìUˆR¸CéY>íÇÃ&‰è¸_*ŽÇx›q,îÉiÀFY1TÄÄ@l¢@I#›Ø{¤ßd‰k2AE±Ð}·n
>€ì½fÛý.~`S†£x[ É ÎMÚ¢ Uÿ}•¥,qNMÐÙbî*¿Ój!q鎲Çw÷²»9%Ú$lѪà Û^“TQUUºûãÕms&>ë‰D ²2ÿ~ ¼ÎR¬’5•;ðø°Jç»ø’ÒlóÐ^zþBT«o`\xDDYxsiaN^¾`08êõºÄEaK½<j5ÝU&—ž™]xó&²ówqÙI–K± —ñgHù
–©a1S*fb oîÌT²vvtQãÄ¿2ÃæI»Ò{J $?èðೋlàá
Rw©3SR4ùëßçf$Q¹Öºªv¥gåçí•ÀÜáb–ì»y·¥¢7^åá«Œ¯¯mþaz©,ƒ¹[&ÍϘ ïÀì¬I³¼}5ÆÆä/+~ßp)ûÜäH ¹ÊûÁrKܪ³ð >† p1ïdöùb—…voã*F篂Y°fÃûªE;Ç ñ´Ý0khº[¬)(ïI±½ãe¾ ÑÂ’E“!h;o¢S ¯á:K¨Z$O‚lný[Úì‡o»Ýz;ISÐbã0\ÇgÏ~²: }†^÷»šùuþùSœˆÂÙ“ðÄe“¾"NÄqÎëo¬:
Ʋ¦ÂÖš¸šÀ4-è4BÕ§'[Î wÿÀÛÓßÙ0cõYM¶«l]”«ü™ÈÊêp.íë2BÒ½Rv¦§-¤ÂÌÙ«èÚóŽ¬ÂÞ?}B+):¼õ3¾ó`ÖÓArÂà|Æߪ=s™FèÖäS¯½:kÙ¬íæØz«É\Ôv
Ö#‹škýH9)Y»"ÂK²i›&R—¦‹Ò¦Cš.])œ¼S¥Ê…2á ìVËûcÈÐù¡^Þ³Ë>T4eXÍ°—k7…F%zM|¸%ètÿþÏ]n-¾1¢²+À8Ø*úз_§Æéü›6Ó;GØa38Ç©±mƒÝ§»¥úö‰u”¸‰Æ>'!Ucû¿9Û¹ªZ¬<ÑÈP#¾äØ%e½~ÄÅf tÛùèãMVŒ½g“5¸™Ç>ÓŸf“wB`€€ëX“º1½ºÀþ—ïåh²Óu´”d(bR7Æ, _ØœëQ™fÔÒHs)– GØ8H+Î5s²„‚Ò–“_Ãq°l΋+Ýjðƒ
œü7„eQ>Q~[#6S]y"þc£Î¨£Î¶±ÌR] oÙž˜¾yÊ¥±è ÿŠÜÏ? Ü^ävÂ>wnľJó5Û‡Æïòg£y÷ÐÖTœŸC½²A¯×g€ÄÌ t÷ÅKÉ]ÐFÝ‚Û_bo[ÿß sRšE÷2 -È1ËÈ–BÖÚûR ¡·ÃTSß—Ì»úö½dêÛaþ…Qu
endstream
endobj
87 0 obj
<>
endobj
204 0 obj
<>stream
xœ•”PçÇw¹»½UO !Ûa&º{‰ 1ÆØLÛ…±‰ghBm%±8¸ƒûÁíýà¨=ròÞaH8ÐãøyäŽ+4HM´6£Ói'ÖmkzH'ÉL 5 ΘLÍ<Ûyý£{zØþÕ™}æ}žïóc?ÏKò ‚$IJ£-/&ù•+>HŠk3Äu²Nì£ÿ¦H%C*y|--¿ eAÝØ{ !#I3ߦ±XÝ6Cm]½A÷¸º`ëÖ§7©·äçoU™ô6ƒ®Ò¬ÖVÚëô¦J»d4¨_²è z»[½áÙ:»Ýúü<—˵¹ÒÄo¶Øj ߤvìuêõ¼ÞæÔW«wZÌvõžJ“^*ns걘¬»Þ¦ÖZªõ63A÷™-6¾ÔQÙäÖéË
&‚x˜x(#^"ʉ
Ä^¢˜ØGT;ˆDñ ¡%öYRÏ„œà‰+d.Ù‘‘ÌÀ2— ËGäXQ®˜¡VR»©¯ÄX¦CÂ5AÌ &c¢Y ñs¦íwdE
ȃڪ±êö`Ž¡qt”ûŽ:GSSVd憯)` 5œ¯0[ï=lDSPÀàlªwæ ðÝ'i?pö4öXèT:ø£@~€²„L,…“ÌÍ}¿ßZô²Îëe㾎-¢š“ŠQ4À½ƒg«Ò–”n šÊÞÌUÁvjanúô©£ŒÅ¼QÙb‘¼b(ÄÁÆe^””¯S€ y.#R> 40ùä7˜Æô“¹8g-<P ÅâœÇh´¯}qþüÅ‹çw?•¯Ý¡áKžHؘ Íu8áyÈË—o°êXû ¢ÇG'ÆÝïü8ïg{m6.®ü·×Èb’j5-M&g·¥-èKWøPºÂKô 2±DT3!3Ú;tøتA ²#:ž®Û|«ùJ+÷~ÛÜTA×êMOiu#v²¯õ›G67·EÙ‚,SÁÁîx=cü
#
G¿:iŸÖOpºxuOIißž š¦‡#S7¯v×»ýl ~ õ!zE†’ÍzØ(À´@Î$ ,¬ª˜Ññ¥zqfú §¼ß×i_@táöÁ£°aîÛÄÔ‡Ž‡¸Ãæ±»‚°N™ì¦éàAƒ‡Õý¦:X+u³z=~ï»oá P; æjßBýÉ vq Ës˜Ô@ïᢆz¶¸E_ˆ&&XUþïy€Ê;oþüìLhhœ}Ý A!Dò_\H?õ‰¿\ȳ pJy4ð6óÙsŸàu¯<‚
CŽøP´:À¢7ýþ#>õ#úÓ5åœÿ܆×}ôü7ÿ< ï=Â4¼ë{ÑÑ·$q jÕ·u örÛ>fÙ«›êÜÕ]¿BtYÕÛÇÎBF hÿ2 N¬W [\ jå0M¥XŽ¢anWAéUE8–nIžÜehFb¯Ç«q¾¢†j1ß!KI…&RÞn ¨O1¥pZïìΡOö]‚8&'¤ÞwŠ$FQÔè; ìEƒô”yX,£<’²ÏßnçÞð£0:`´ïhÞß²ßñ“ÝEùŽv VñSx,'„ÆÐݽÝÁ
ßÞp
up=‡bR8¨ñœîv¿ B¾Æ µ¹=†F{¯w(§kÒâmu¹MºÉWgçgçþ:ÆÝ]¿'ÀxC&`F=½ÎÖVdocݯê~-ÁôLÉß¾83ù dO„u½Îuwù»P[À<âGt|h4:· íÇ;Ë0û¬ZÈ…àáÉ…ð’töPI ÌÑË2q”1C4ªÒ/1ƒ×l|Lº VÝ|Öº“WÆ“‰=Þ.‡—sý²Â[ŠQñ{Íó´ÿúøO§t•ôì[ºàŠhOÜžÁ68ÈÀ
V]úòú×Û¯á v¦YÞæËî¸ï¥)µR"/ÿ–ºq¼¤boå®MÜ£Ô r.AÂAIú#ñ ç#&Ï›L> Dâ,Öâl&͉gñŠeŒü!ÍA.üƒJíNJXä%$]’êâ…Å•Ã[–ÅeÝæqÖ2{~‘µ³YwK#Ï|Tò‘‰zxŸC /0VµÙ¦i˳´ÆŽkGÌŽZ]¿ˆzMrxVYÏ/¡z…
%™çQ=åg'N ÚÁbÒk^r¹ø¹dzƒ¢æMØ ¤pSRX™XÅ®”»-ª‚J•P&ˆÿ …Þ
endstream
endobj
36 0 obj
<>
endobj
205 0 obj
<>stream
xœmÐÏoÛt p»É†¡ü*m¬Ä¾ ubê:$˜Êø!T‰åÀ@hEB3—¤©“Ìvã$kóÃv›|óõ7nl'Y²4?ÚPš6TT@ZÅ®C 9¬—^¨´Á®^=íðžÞ“žô>ïá˜{ÃqüìÌìõWŸUoÙp{|Ä~Ó‡ ¶|üåèqA»süßëVø5ËÿŠõÝ«˜ÇüTœ‰D\Ð ¨‰ù‹Ô•éé«—¨w¦¦¦©OX† ÎÓaj– K N³H]Ì!AM|„èû—/‹¢8I³üd„ótñ%… õÃ3\ŒñQŸFÂõ9Í2Ô nò$ÏDØè’ÀpÔlÄÇpašwê r60 s%’. ‹b·ñÂÉa˜û
? ‘íü¨Ý.´íÃ+ÔÂ-þÀemÛïÕA¹Ð“ÒÖj»ZÏ4r}_œ_•B$+g Ë Ý×÷ÖûZËüÞ'z+÷¸X"X0n”‚^”1çÐe”UY#dò¥8$|9V’µÅÝæVÉ =£¬Öà”ÐZ,5 ø5 ~Õ ÒEQ•Ðj
Ö¡ZB5¨ÿh×´#xDÀGP_ù T¤_@—xF¾Ù¶® Ø£O¬OÕ¾±0
»™¾ÔÎמ¯†ºÖ7•}ÛÄ^)JÐQݯG¼(mΣèsÕµvÑì“»Cm ¨äåPf.ÇÂA€®ÐÞ¶ò@ùÁ ªŽn›øwÎÝ ÷ò}i[!Ñi467RÛ11Ÿ
Ù) òïªjþºÞƒS[¦µ¸‚Ê7(œDwŠ‹fØŒ G4%Æã5±»¹U2vÈ Ë5TQA8ûm¡ Ý\cáÒ©£—ÝË5½e ‚ çK‡?µí7œ÷ÔþtYO,4vøàçZ·Ú4L
6‰FªžP ”ÒÞáøTÝš@ ËÂó鸼$i¬š%QRŸAÂðÂÓsÙR¾(A"‘ZNŠÕ53GZo6í¿µÂ¥ÏÇe)ãDòîò†Ž YõZãOï ß=³Ô”«Î¦Ž™ëÊ^ÐPþ›–çÚ¹ïEg
wëVz]ÒÈQ~ëøãîÙ!Y}aÿÅý—ö[ /cØÿ×b @
endstream
endobj
85 0 obj
<>
endobj
206 0 obj
<>stream
xœ¥y TçÚÿÄÀdÜp[P;ÃU«R»ÖªqTe_B [€¶7„}_VÙÜ«Ö£µu©ÚªµêµZkÕÞ¯}¦ßËýî÷† ¡W{¾ó?ÿÎaÞyöç÷üž‰ˆ²éA‰D"‰‹›§ç“ÌŽ†Š„a=„wÅX)þpµE}ĨMã°áÁ…¥ © lèO‰E¢ÐÈd—Ð0¥Ô—ŸÌqÌv'ÇfÎœ>ÎqÒĉ3 ûJý·o qtÛ&óó
Þ&#AŽ«C·ûûÊ”ŽcfûÉda³&LËåÎÛ‚#œC¥»æ:s”ûËü =|#|¥Q¾; ‡†È Ý·û:Z¬s¶ür
‹”ùJ ÝBwøJC(ŠZ± da¨KØGዤ‹#–È"—FÉ·-Sø,Wnw‹Þáî»bçÊ]~ þ«<×
^7}Æð™³F~8{Ôœ¹cœÞß4vœ×xoç-&Æ|;)nò”©Ó(j8µ‚A¤FR«¨÷(jµšMyRc¨5ÔZê}j µžZH£6P.Ôxj#õåLm¢Q¨ÅÔDj õõ1µ”šL¹RS¨eÔTj95r£¦SîÔ Êžr ÄÔj(eK
£Þ¥$GñTOªÕ›šMõ¡úRs);j ÕšOõ§P›©”5ˆò¦S,õ7ê j%ÉeCEQODž¢‚ 6="z\O·Øô³QÙÚÙæÙ¾¤=éZ¤3ý™ìžƒ{Fô<ß˽WSïE½kúôéƒú|ßwIß»žvmýfö»ßZÿ[
¨8j`ÚÀÏ9úbpÐàÓì86åoÔßfýíÅ;óÞɵß`_jÿ“ÃlÝ C‡´y5tÜÐUC †¶½=lÀ0ïaß¼;æÝïžä¦sgy'¾Ìq°Ph'"#Ø…¾zQ½°U Ÿ Yõ>9’¡ ¤JMÄýÛwÛÈPHH=*á¢KêQCC
âëÀƦÑuØÆ6(âÏ·e(€Ç)0—Ím< Ù'-“•¸£ŒSXioÑxÓ(úÉž&±0
Ž±?{ ›¹d‹¯"šÛJ¶sKé¸p"±ŽH<Œ¯øX¯`4]RG„£8Þ–Òϯ´ž5xp8ÆGòöS´E_Œ|Œ¢'&ˆ1‰/ Àv 6›\Ó®Ž ãÂ:®ŠyH¤A|áÑëM³Ëù“eçO ¯˜+ïá „ËYðþ’ïjÜvmÞá>Ç>ÂB ¼#y©Ÿê¿Ñ×mO´iŒðQd4x·‚X0ñ9JM ƒà?Œýý÷ ~‚ Þ„g°.n_?{úÅåk×¾Xê<Öm¾‹Y€Ê(”E‡LpöŠXî±e¨*T™’œÊ¥©ÕÊ´dŸ}^¥ÛƒYGÌá%xôÀCa ôüö飦(¤Š‹I‰NçÕxÀ¨ähÄ8OŒ…±zröÂÖ %¼.2_£GL ªÐ›Õa©&½ÎH–I ÞXÊv s ]¶?¤
1¿=}ƒ ßôŸG,ôÚ’˜Ä· Ò?çª}O·\ý&IJçÛÚL_~0vÉ’æï|p’ëH† 6Šî™ Ü$¾ô:æôíjy·To¢}ÃaL™c±mÛO²‚ú™˜3Äo÷]‰í°¨› w¢Ã&Г°»
Žlª @‘
N!Qèw ZL&rc»Gc@tãpk•ÇÞ’Îä•,åFÜö¦]ØÕg|8ÏíÆã ¯]»ýuë,7‹ým„í Ѳ7]#ñš
‡Y°§ý¢¥UWp÷%Õ
?ÛÃvHßH+‘¬¹UUr—%MšÿÝ¥¶¾] f½Ó-¹ùÍü·’.û—a½Ä¢øŠ‘¤ÒËo‹!V±ÐûþõÙ9(#›ÓíÚ–‹˜ê²òªÖme>ö^íÅ ´(eê×øʼn1ΰ6ÊðÎF 5BˆQôÊÃLljo B# ÃÞîÛ0훾µÛX½ilW[¯`„Uß&º«U®¡Ô(f£:*=B#Ëà¶×x!9ÉØôÈþ>5¡{|³²!å^üÁä»ñÈ“Ùéïç¼l[íWQ\JIZ¡1Ä"9?Rƒ"wå£Ã¥Ü1ßÓiMˆ7}
þ‰û6åò“KW #L}Sóϲ¼Ã3¹LyEZ‘µTF˜e„FÑ~Ô‘*Z~¬¾®³"p7·Ó)îaÃg"fÖ\Ò\ïƒóÝßîœ8ã;º˜×I+QA§DxObö'Z“’ÆÅ4n¯Ø‚ p¯Qx(vÅn¯°ôl=R± Þ^C%g‰ÉMã¯úŽDO&z²g»‡§Ý£-9)¹™Ó,åkÎæCœM;áÿÕÙõ¯ô¨* EFq+<eˆ™ƒNÖð¯…w!¯0„íÈØŸð6˜ž¹$Ò{6Ú×ÄAäÍûEô„‹¡ß|v ¶\ÏíªAåÜå7ÐÖÜàIloN²¯º™^eôª]ý^·J¬²žzÏ,$Å EÕ‚ŸX˜MPgíLÜÚ‡Zšàê-LÁ-ÛÚ·Ÿ¨£A‚ŸúW¡JäP‰ªPá ¦K|© k‰øšÚ·$ù8½m3èÔº˜¶Äf¥)( ¢T•r™|IrHš’É ×Ñöx7ÅO×¢þ"~šãW–V ¢Ì<ýÕü½eçtõdjã³C
sõ g& @åHr÷3–ÄÌ2þfµ™@AR3 ö³_{ÜÅC·½‡UÆVå´d Ñr([«5di‹QªF{P‹t_(
E!+ÓW¥ºÉ7D/Û…–0 }¾âió¥ì}§9}ÀÉôˆ©©±D6\ž™Ç»^fÉpòQøEoFiˆY¹µùð…ß÷@_¾+wÛÄPÿÍÂxXgÛPÝ™—éÖtáØ` ½¤+icé¿ÀñŸ¬‰• y ð8Û6þõý¯,÷#”·bÜ^² ±¶{»Ø"´†wþȹ¿ÚV×üÇ ³¸½4ôÆcÉœaëß
xzXäÈPÿ>Æm¥¯KOlÕá× JwÀté—o¶I{¾÷ÌMÛÀýÅxÄ=mþzþe
¾€tÈénN¾o5º¥] Ðm.P–¹pORn™ JÎkÌs+ — 7ŠŽÜù?z%t¦þ0΃ÔmJUjab½3dØW¿ýp=
Ž¸=+¥£ ” >%6T“(ݼ)[«Óå B¦:¦L&–ù6o?ù¼Ø< ×ç7I ß63 ['EjYª:.…‹ôܨ‰@Ì4—ëOO5Ô¾SoHÏÈçsÓµ(EçÓ”‘ƒ˜ªÊÒú«£Ð<Ï;NÇvOGC ²÷E™µ2¯´A%)ÎOŽ÷‰Ù¤ ΨONÒô¬„j9"tgíë¬ãÛÕ’pi§C_[ü”¢p^k%9Aº„¢]×q„}¦:?´´Sy^^EvéhA%L{äÛ TKê^ÅZzÒ¨ÔáLWÑž0ÁaÒ¹«[T˜•…*˜–H¤àðC:@à·Kºæd5äHðu|Q•šŠ”›8øÍ’ÞSÖ±ïk%ÝËqG9Ô~K9âYtL™Ï wÄü}ÂX<÷{èô«©õ`U%¿
Å ú3D»‚=»Úkæ|—U7 ÿtåÊuÓñ•ë¬…ù¤
ÂH„W7YÕ 9ŠBŒ+ +íÔSÕ®Ž´hE¥ü/ÖÚ‰„ã'ä‡W¬§ööEþd!¦±Hw€ò«,8!E±ühkUµ+2è´Â¤:å©Nt<C ^ÊËba
x²†J´ z.ý‘ô3ã<š°½/ °Ç¿¯ËI¯
Rh’c5¼t•kŠÍ@K?Oø†Ñžc‹ ˜N~Ž~A†iY˜.:}Îõ$z[ÀÈÂѨz¼/
Ãø¨! –ÂRC=´rرQdM±øSè1:¾@× O”œk,¾‡î fUÉÚ¢ÍhrGnhnš„õ‘Ψ«`0ikWÓ«»b@æ™Ý·[[÷=Iß¾†š¹ô¼-eÕE»ÏÏC±ó>Ü:‰[3Æ:ÀÁWÆu‰yÖçÇu’3# \Jï ZúÓÀ\ûáû§.ßcšÇAÅ*¡·5Wa´ ¶ùþ©uÑZïÇó7 ÇÊ6XÜflŸ6Ѭ6 4Á2Ó Ó;ƒâá)œgÏ57žEg™ïÞǽ8<÷¯šDݺBéA§îZׄšC«£È|ÞŠ¡Jÿ²ðºXÂb/ë¯îÓ'G§G$%§mW†¡£ç¯ œÄZ~P||C„^•Ï`¦‰]!7è Ž®Ø¸qËŠ ]ãôÉc$’z9'|ÁÖÊõR©\.•êåµµz}-‡çãaÖìw|Óݪ¦Éêõx@wD²«£N]‚×ÄÂÒÎ5*]½MÅmlõÈõ#(4oÞä•{wähø#ÛÊSÿKz+º<µ6´"²@ŠB™5[WÌžê²ÿQ
—QšQ ÜIÞ1×ÁÞ
™yGŠ¸s[¯& &ìÝöú?¾¿¶õhZ¿ý°"kT,gG¾:Ó§4`/ú„9sòÓ«·NmŸVÌé™ñ»»m´
£pÈì÷ñ»0›xÞþVÏW¼ö¼•ñ`×>‘F1hkèÎ0¿PA–mtS‚öïPÊâC\~F‡ö F§NrŽ¡oa±äu8,ÀYg‚!&pèd½àð–Åh€e,µŽ‚OaH»zS·:›ú ’YìŒ¢ß (ï…<ÒñÐ˶±´Œ²æk/§ag[ø§EŸ»õÎ'íjïny ÕmѽOß¾I8Ó$ÛÀ×oqÀÆ*>ÌRìB–QtËñ¤¿–ïê»±†ÞÝ0?§±ÈuͺµËÎÅÁózÉ_œû•lïßñâ» ¡/÷Ÿ;Cç|ã»u©]»Ûu»¾Ô-vf“ £¨BŠwbaÓkÖ:Þ¢¶5ò³ð×ñë£i| 2hÍÁ„#‰‡'¿ík:- o_MNjiph¯Îße CÌ¡Šôü=L×{«3mÀ˜ÄÂhc«ØLöóÙÆiJ#lBÞ((D”Ñ …”ˆ ~-³‰ÇW$‘æßMGƒxX.¹¿ïÌÑÝy~›9¬–D¿ŽÑÿ§#](ÄÂ.€Ü†N·Xã^MoÅß${$¹eø’¤\ß ëQf2!iIä…’¢R“¼ñÆ” ©Ê¨O/I9´^i_eÍu§¨”C"ôU»^'ÏTìAÈ€ò«3sNƒ<ëS²ádyÆÑYIró*¼eêu sØ 6ŠZMIõ"âu8(«‘+[š´M%œÖßwàÀ±°€P¨bÆœBß¡µšY)ÚÕÙ;† A^Ç‹½ó&¨&µó ¾cïÖ|rµ1÷fÜÆ=qÏsf®:±î7*Ðw1ZÍ8ý0ìÀ/Îí¼ö^37¿½úÓ³çŒ'¾ùƸÉsÇÆ9<¾l3uùg—¯yþÞ}ÓŠ¹®šn0Ü1@Ž^ôoJõ5uÿñCñ¿©kÿ¦«Nnð'›Ôö ÝÆB¼Ý^›
¯G»‘¶N[ÌÀrØÊêNøéÔÈ©wf¦b{mœ6|7ª7Ÿ(´0øð #¥e‚ª›b /›ˆ fO€(T§,ÏÎÑå£|¦2Î «mØ·á7p€žÀÂZÈ’Ϧb‘Ó4Ü÷úÇ”žk3 =Äá‘vŽç—w ]½pã»ÝSBòymJ×Eh5™
¤aÜ=VÏîè;°…m`+/°Ã—B/¶%¬&$P*
® ol©©oàðu›7þGžœa8"îÀæ‹çõ"ò§Øâ‹b8(œeÏhH‹¶¨’2bQ
VW‘½/³uO<ˆð¤2n¿¤Õ…„ °8ÎW‚©øåóÑŶ07Á‰×‚Ð=‰yºb”ÇÔG–(Ó|‘×’#“€çvJâPXCª+åH€*ýüº‹Œ»žà¡u̪"ÖµÈë ú8qäóƈ›ÙK Ÿz#O´ÁgÃ"•9Θ7@¯ÿÛcÏö^lÒæ0Yx¼:5Aƒb˜øÒè²Ê'§¿ Zïï ¢(Üu<Ý „óa³^tNc~ãÏäæÞoPÅréêŒt” vÀ÷ðUrrR9 ear^
|‹}ísSó4ùˆ)(2i
ry| Üm-µ@èþ£h·)¯í^ $83‰ÐÉz+àM¡ãÉÎ ²ó»œÂ\"¶¬û>É j ÉlRñÑG³-Ÿ¾nmíq%Ÿ••›KB½¬$:)0eÇôï\ ôýù1ؼœÿ3[4²m xvj$¤ð&T‘÷†‡lØÿã—ŸI5T§•Æ¤¦¤¦,Q”DÕÕ•VVŸñ9> ¿C>vØk@¼èÙïÏ @ è9åшõ
¯„UãC¬c$ ÓjµÙHÇ£œÔbTÄÏïÝ>÷ñì)®+\8;U‘à’óŠh¬Ì•{™zs½l”¡}zûô1õéKQÿ Ç–
endstream
endobj
34 0 obj
<>
endobj
207 0 obj
<>stream
xœ•V pg––-:œ€Kc;$Ý ’@’!@˜ìP’œdˆ9†lÀ‡|€mÙº% ºÖÓÕºmYjÙÂ7ÆccÛ1‰mØ!ØÉÌì˜ L’ÝÍ [³™ªìßN{6¤jv·jgkK]%©»ÿÿ½ÿ{ï}ßÇç¥,âñùüŹyyo½¸qáçjf%Ÿybó¤ ŠuÏ}Ú8Š§¨]¹¨Scgû:’ýÑs€
5W—¼SÌ
Uù„Qfm
v´·üò?Ak(¯Íc1:ìZ+.ß,.)ÌPïì;ê¡š úê0J±™ŠÑŸo,x[ªÁí ÷ ƒ“ Pk+5å{À†Ùxm£Ú‰¤³t‚ ’ŠÒÑ´æ Ýض+?¯QO˜ÆJ;J äj1ØîÿXËt|úÀdvƒMCÌèE¾®®îhs(xºk° ô±CG$lªô!Í/*Tܥ̤µÁôu0éͤ…4.€0° ÂÈV¹‡AðÆÚ\#УBÚH0ÿ ä?ì¯'J¤Ïíá8æÚ@¯øn&òÁ·ÓÈ|.3c Ý¿&jÛs]?¿ÑºnµOEY0]«¢Œ2…L¥ó™½6<`쨅CP)yAY Ù]Vr°ŒÏök†/vÎxZ‰a´ÕK΀'»El¨1KeÜPZľbSØ´ ÈNŠ ¤^_¯âVŽo…_·öù.Œ¢%D¸×® <¼¾Œ}Æ´ÐÒ'וø©/Ï
œ,uœ´‚R{Œ(`—ŠAŒº§ o …;CÜø¿o £dw#4¿ëst‡›¡fè¤E'õƒêItt ‰í®Ü£6âò_çy4€=“Ïf* ‹ò¸ˆ~$¸™èl4P$SXäº#D%ûdÞš!Û
RPF|þ ctCX-«Sž,º¤ ¹Ü?x>G÷Ž©¸$¿D™m‰Øj²µ?ÝW|°
uÇù6O4úq=Ñ2Óá"d» M\l6ÐèÜì(Í º‰_˜•ÌR‘ŒÐ¨³Xõ
P©Ztñd'=t¹ðìN6“û<Å®zirë·è‰{ßE(‹×fw8ŒF|×ÏÖ6ˆÛ©˜;Ózàc¢ãÒääßB®’ôq.Ž÷² Ê!þÐ
´ZÀÀÜ‹"§ÇE €t ææ×:HCJš œ´pÝÖ|Åi4XH“ÃŽïfmúŽÚ¡C §²éìjöÙg§ö}|õÒÈé."¸÷’¶z ‹
Dû›¯û…Þ°Wý6GÂ5d턯‹Ø Yµ@6ª’cÇ +–Ÿ¾Ú‹RâÃDÿíKœÌ}ÙÌ…lrÜÌ*Ùã4=Ëh»Ñ wã4üs4Ë•÷ fµˆ^˜7$/ ãn¾ã‰öH@Â4–Út5 }€ ÝÓ:8\Ô~ìxÑÉR®©0”ËÙLì͇´BMüR¨YWÌ*å9Ú—v¼vŽç5ñq\ çƒZ«ªµâãç¾ F»ÆBxì·WPÜÛÃú —ó-VÞ]Ñô9’O~–™Á ?£Û"Oš9¦Ž÷ ]Ï®6[=6Š£Ç º?ÖËIB"¤¯x(kç—©·ì? Ù6P‚:˜ôÆãÄ¢º¨¢N¦¨.¾ =ë Æÿt
Ïø
=>·YtJé×ÕÊë
aM[{G[×þ7•‰¹UÝüɹ=æ?˜[¢þÉÞä¸'èôÄ0Iq
'5ܹª][ú”‰SDcÀá!ÎÚ¹AÐAC£Üá`oÎ[³^gR»'\¡–ÀCÒªHÐâû…;¸¥À,ºT w¥nbvþßÜJ°7Cv¼œËãÔâþæ§Ó¨hUþo&Æ*]!}ÚTÞNê³m
–:NÄ©ÇÛ>ÀgÉåŸ@ËÑ"È^x)ËWìùk¦gKYQÉCÓÓîó„ˆØåQ”SLÏ›ùâ½%¸}òÄÈ6Øok¤
Ðÿçÿ ä’$˜Íÿ”ùF0·†©Å8Ñ
™üzÒá°4âóƒ¬Kc"Í`ɳÓ72ܬˆÅåpòûCéÓø‰ù02¤þíZ8)à6\xg~¹²š(ÒIrîÆl0éü¶ˆ…`B¬a>ÌUFXˆaòÂ.§“jÆÓQ’ÍO m÷ù(— C6Ñ”z¤ød}BÑRÛ yÜår‚04ZOX~±ï„^$'ìV¯Õëÿí'hñÂ.pŸÿûûôöeQ·Œ–Õ¨d²š¤*ÙM'“\6²îÄ÷ûiþ$³\ÀlŸ+“j6øLV#(L8ûå¿o‡¥Èl]Ðì§Î„[8aH0‹&ùèîE
3ËD(UX˦hwÀ¬XÞùD,Þê—¹¯½÷0€;‰¯1”"Œœ†¾6õ‚N~*”C% ®«9y,˜ÅKR>§›òâŸNÀ)À>*¶I_ÚÌæšê¹cY0eÌèöw ‡ñè8¸‚CØa“üÁ)Ô9#`¼\"Ù¾NÈ>ÏòØ-lÚÏ®¾ö5JC"”ž?g ”&ØÊyèݲs·fдfä²òÕŠúMûˆò½ù'8þOgæ8ž0&˜ßÑFzÅ5š9Hgf ÏÐ߈j?£LÒÛU÷L¾ÆfM´2\ØþÚCMÎ ù]^“h9×K ºrcG’»ÃEϳz6‘eÔƒ
œi"=œt»ñ®®ëŸtô eeeœ¾Â®²¥,*N þ‚;yÇx³ÏⲚ 6N“ô’ºÆzh‚z8†u7å³ÚëÈ€Ú³ü§“#,ŸÕmµÛAoàÊrT9‚òéfåŒð;Ú»ÚˆàÚ°¯© â€uL@wLí{WZmo¨ ªZtíœIºþÏ_µ@Õ0NÙÜv `áH$ Û7¸“Mùñ›ÛË’òV ±ïDe> Æv^?ðG”õþ—ÍÜ[¤ÝbÃõêºv `y›£wúOßè'zâÎ@Wð.ð’Q›ÖDB9h¸ÜU^ÕF曳|ôó†€éc¾éôeЈÆ`ÀC}x²§3Þ R>7„ `òZ¼’¸¹Ó ¶ûíáÆ*³5)Y¼–`¿jµ ÖÄ€óGÊ“ …PmBÈ .nK»±OKÙD/}¤Í·t)÷Ÿ?Àl“
endstream
endobj
73 0 obj
<>
endobj
208 0 obj
<>stream
xœcd`ab`dddsöuŠ° ±T~H3þaú!ËÜÝýãÿ Ön æn –Mß }ü Îÿ=D€™‘1¯¸É9¿ ²(3=£DA#YSÁÐÒÒ\GÁÈÀÀRÁ17µ(391OÁ7±$#57±ÈÉQÎOÎL-©TаÉ())°Ò×///×KÌ-ÖË/J·ÓÔQ(Ï,ÉPJ-N-*KMQpËÏ+QðKÌMU ;ML:çç”–¤)ø槤å1000V00D2012²ÌùÑÁ÷Sª{ÿ÷ûp|ïý.ü]|öœ•Ýû»%÷³çvÄu—w7uvgôíåQgŸ:§£µ£µµ«KÞÌXãëÊýl uÝQÝ•ÝP%Ù¿›ÿvý-ÿ[µ¡¡±Å·[²*œmUßÎî¹Ý»Ov¯ë ªÙÏ^ÑÝ6¡ÿ;ÃwV‰ï,¿ùXsÃÙŽöÍèÞÓ= ®Æ•¯væ€ißãçNÉö;n2û~®ï|Ür\,æóy8·NåáùηŒ‡·‡‡ Ùä—S
endstream
endobj
32 0 obj
<>
endobj
209 0 obj
<>stream
xœu’_lSuÇï]»zŦ(¬nì½QŒÌnjf‘7J BDñM[Ö&öí]K×Û?ëºööžÛvíÖnTÚu]GRª)bPcŒ‘…ųÌ'
ÙƒùÝíúàuﾜœ“ïËçœÏÁ1y †ã¸B§× |õ¿n‡°
¶·OËÀ³¾míP+(e ”×Ö·oAÆ'Ðû›Ñ±Ç1ŽÛÝÃésY,4µÓ¸‹z±§gw'õRwwµÏfvY;¥7гÍ@KÃ'Ô;£ÕLû¨½šv¾ÖÕåõzµ›[ëp
¼¾«“òZi uÔì6»Ã‚›t‚s
4OÃ7Êgi8“¢õƒ‹™‚R±
Ñ2 Ã0÷‹íÿ;"‰è@ÐÁ¼H
sÀóÙR®úú 2Dn$²ÑPLó‘Øú^§x q³â,$ ”"TÂ÷Ãu4ý RÇ—VP¶)LB›:ÈZ‡à4á*˳ŸŸ¿úóÞ™Cb—øœø”HvÞ݃Ôèí{óáüHŒãFs\¯õîbíÆTw—ÉÂùë×—` ¾…š›P=9\Úëèãkøýe™°ºÖ©æÓÉŒ”êåBœ(t qAhÂ?…Z6›Òp $Ø çÿ¯.P±^ÒKÔm¢FBx^Ä–ôË·o~U’¥Ã·Gf`æ¦K«—ÏÝ‚1"ÉMú˜DÔ ×øxN˜€°² …)Hɽủ sL"ìÂhºðëåfý&Y»qíÒU î—z£$hUk=õp]®£Fc‹€PËÂÚ·2B¿ð·z¼Î'¿¢©x¸èêµ0º>i< ì— )*ûÔfPÛ h¿?sOìÖˆKŠ³Œä¦ Åÿq7(©ˆ³±x<£|œ .@
Ó5øÞ‚EnfÙ2d é,‘L¥'!Íž‹Hÿ†ó¾d i>Êý„Æ:¶~v(þ¸b<ŠXGi2üa< >bßÓ+^ù«’‰MìH4¡¡ûOI'pæ~¨d¿KÍ‘|.U†qøåÝùSBå) º\>œe…x*÷Èü¦åÇ4›ä»§•Î§•J ûª ®v
endstream
endobj
30 0 obj
<>
endobj
210 0 obj
<>stream
xœ¥Uyp× ^!#–àØ4T‰Ò]5´á(!„´
wKܘ µ
æ0±
ø’¯ É–Ö²dÉ’u ?iu[²°äÛ²lcbl.›hb'¥¡I¡%™&-CB§Lûd2]CþèE§37ófß¼Ù÷¾ß÷ûÞ÷q°¤9‡Ãáedem[;ûõlâ[œÄâ9‰ose }—œÑÏ…d.$'õ/žï{¾ÊSѾ…—ÃËô’¥´ª¢’,+].xaݺ—V
Ö¬^½N°E$”V•‹YÅT¥PTL±‹Ã‚Ý’Ò*!¥,ÛXIQ5럾¾¾~U±H¶J"ؼ|¥ ¾Šªä
eB©\X&È”ˆ)Av±H(x nÕƒ9C"ª©£„RA–¤L(c–"®‘fÊ~VZ–[U-Ú° Ãr°]Ønl)¶{û)ö
ö"¶ Ûecc ±T¶Z, »ÀQÏY8çWÄý2)o.>÷OÅû
OÅ·áú„5e&MK1NbÑe÷.*Dkùt80B‡[ÞGg<~öôøû€·Ë ÷3©©hðÜÓ’±;£H
h£ÖfÔY Ùºâ2!à*C ³Ó×è&Ã#ãh \À?ÊÎXŸ—/Æó‡Žî‡
RªÃ²BÝk`Ãõ^‹/äpõx‰àÙÈÛ' ïñHë”f…¡š´Ô;-åÌŠ4‹Ú$ NE
¡H8ô´Ç7ènÇS̾8úþò¯qÏ1ó
¯Û ¥€7jA¡÷›Ýd \ô‡pÚ^˜H^â
C´¥´àñ{# ô£ùdˆ¨x p”Š¾‰žAßûÓŽé
9%"1)ÿàUÐ}—:Ø´ ¬ÿ€74¹8
x·—’é,2›¼¢â»[ÁŽŒœ ë |"š°¼N ÚIÖî-8TøVÕ5¯ÓÙì É”„L׎&n†X؜Ϲh/"øÍcÍcq‡ÓÛçpÓþîÑžî£}ƒî4CÄÞ¢-Ò›ÊA×µª;zû;Þ><”»õÀÁ9Qeë£1þoœycƒ>"eæGãq46ÌA—ÑUþ—¼]*±tÆZÒn±Ø“í é@ˆ&ÞDÕ' GºËÐhmz•¨ßD)× ¾‚÷ äö;œ£Ž–òЂAéåæZPZ¯Ù×âð·:‰ÚìpƒÜé-ZP÷<¥”ê ´z[ÀÖJ¶Ûh[–Ùn±61é÷úÒôB›a à
¶«ZjƒD/j ¶EgÿŠ²'ÉåpRd
m¥!ð¸Â¬H´ºØøMôÝ«#1Z<…^¼ÄM,M$ó)‹\ R\Ôt„šO^ÚÞÅ<]¼r?Ëæ1 Ñ©lµžÓ
/ê jÕE¹,ß®luIߘtzG!ˆ÷×xµªíž—„·ÐËÇPê‰Ë£å^¢À_æ…x¤õ½/FŽ7Õ†YrË!ž¸ ç$ÒáûÍ7 ê´Õr‘Í.'3xK@F·¨@Ñ‚#ñ>PYìv«†dž¾7ø€ôYØÍV2QÏë‡Ã
Ä~vB ÷ÜÆ&›Qm$*V1IÌVÀ™E<½Ó
,Ï>§Ïéa©(ÒÅP÷Ígü:j¸ÍM<—XÄ/1kC=.î1„Ü“®©©mÝ9Ì3 ÁÁÊéMˆ‹Ö|òç_ç5™¬V“™Ø¸ŠI%à{‹â¿oûëéKäø…‰Èq–ïSö 1{ÇØKA“œ±kÜÄÐÌJþC¥àn‹_k9lµQÄnKMgezc Ï€Io2T›ë‰|&Oß* ˆtfóC2Ë–¼ŸsõÝó“m2’ùK{tŽøZÛ†[~.Ücñjµ6“ÔD4îQä•N飱(ÝL‡ÈŸ<ùZfžüuÀP'Îîý[Ç8Ù7uöÄ)À§£/k-Òå¦ZRS6]ž23*ãèL Ž?‘˜ú´ïÎS‹ÔlŸfØ>9hö‰_ç}|U¾þõÊj² *·iËl*iT|”:ðùGð{ü³åÓ I0gfUüß{7+Þh§ÓÑF^âÝ‚>«pϬv5Ð`U‚³”;m4øÁíô8ÜÓèHÚ¢³èIÞXAI£Qb–“±®”øæ÷ª?ülôNtöñ5Yõ;Q—Y$^n‰ÅãžqWœtõƒðNÙÐ>Ö)Ñý‡]áßäüárüW\49“ÄïP ¡jÅ2QÝUgO_W?Á<{ËßËfµY
éù#o~ñÏ.Om()aÝU«u÷vy#¡2Ðèmî ¸žæï @+>Q:´E1#Ð>
endobj
211 0 obj
<>stream
xœ¥TkpUÞMÚd•|E©I€‘‡b)y(2¥8ŒVQ:C)Òm›&ik
’%ïä´y5Ù>cB;¥axÐÚŠõí ã ê u GgtFánzCuÓÈÃßþØ9{÷žóí÷óÝK‚$IqEÕö+Ër¯‹¹ù$W"à ÂLõô挽Š„PTp¤DôûÝèÛ»Ðä\4v'1‡$-Nˆôžxçý Æ}V“¶IcQ.U/S®\»vÍreyYÙZå&=mÒªUe•Ê¢¡õ* ¿Ð)·ÕZÚbU.Ý ±Xö[±¢T¥7—MMO,[®lÓZ4Êh3mj¥”[Œ‹òY•žVæY–æC…Q¿¯ÅB›”UÆÚd0kõZÊDëh=m°˜T
¹?éŒM¹`4© M{M*u3mÑÑ–›«YÒ{U¦†½: m6ë[Ô‚ î|Ž‘/Ím*.ß÷¢FÛ\BeÄ1@˜ˆÝD a!ö~Ȳ“ A2D†‰»ø>„‡8JRäRr‚üQ@ úW„5· æì)8Vðg!Ãy%™-ç¹kçÉ÷¾çÞú^˜‰sRtÏöËX²hÕ—S¾~ƒ~%ø(WÈ z?ÆöÉã= v0šœ’K2qÔž&¿ã0³µKâHX¡]‘=)j·B[[ |¤Ñp'H®0-ä A¤hLt#¡QQ?$ÛÚÀº_ŽS8%¾QŒRx§n‚q¿ÞZ'’ #hçò‡+BTÒQóÁ`6 CæÑÑ¡¡Q¹„óâ@’k â´ é>¢ãÜ5)¤‡?Ed$Ô B˜b À,)«Ùä—ãWÄÐ Íê—4Ú×âwû= pÁ¡0Äü<Mlm€ 4Q¸V *hž Oé/0§€b»€ñ‰ Šg‚µ©ƒç¼Qè„ãjøc 9Õš4ÄŒ]ß ‡÷)ž2Oiz;ÏgNZˆVeöHãÏi·ÊgV‹`M$ ÏQŸJ¢ßä7OÈmãÕ]-¿´«Ë.¸´
ýtéêu}š$§MæõéðmRP¿ü4&yþÃBô·_&¿î#^ß)H¥ =Ùy¸#¯ f™o
î:ÎLzÙ>
endobj
212 0 obj
<>stream
xœcd`ab`dddsöõõ4±TH3þaú!ËÜý;ôGó_Ön æn –•?8„¾Ç ~äÿ *ÀÀÌȘWÜäœ_PY”™žQ¢ ‘¬©`hii®£`d``©à˜›Z”™œ˜§à›X’‘š›Xää(ç'g¦–T*hØd””Xéë———ë%æëå¥Ûiê(”g–d(¥§•¥¦(¸åç•(ø%æ¦*€Ý¦&ós JKR‹|óSR‹ò˜’\xANbÉ\ò£ƒïǤÆåß—<_µœñä½ï¯™xýMoÉï.å(XÐ8wáºÙ»ÏÛÎ ýõ[þ·ÜoyÓãÆß¿ÛÞz7sbÓ´æÖÎÎæf9[ýßœÝ•Ý ÎÙ{N®˜ùqÿù{ö/ßÛ=³{wç’|¾ïχ-øîøñ{úræïé³E»C½Ý½ÛÛ;:ºÛ8Z&·Lœùàöwî“Å»b³Š s²®[<{vw _ùü ÎS§Nÿ^0ŸíwÂTöÕ\w¸å¸XÌçóp®îçáa` .p¡”
endstream
endobj
26 0 obj
<>
endobj
213 0 obj
<>stream
xœ•V TSW~1’÷X´‚}Ô¾ÄË(Ø:.ã•w§Ü¨ ,a3!,a“% I~‘}[`@6eǵî{´bmµjmmÕÑ¢7ô:ç̦ËÌ™3sznNÎ{çþ÷÷ûî÷ÿåQ'P< ÏÌuÓ‡KG Þ0Íà™fN0½Î¬y4²ß ¬ø`5±i¦Õw6¨ÖÉ^AîS(>'
Ov•…ÅEÉEö~"çeË–8Š99-’Š#‚ý|BE›|äAb©œ¼HDî2¿`±1ÛÞÛ5RÁ©àyÉf!ô`nš§—ÒÞ
ØÀ…ÐG5PõpŽ*ûæé
è¢uôð}çΕìÙÈá¸ÿ ;ÙdHi4Í2ðû|“³Èz.¢°-¶‹)l_8 Wûü²æ°{°[ÁG Õ Ñ¡ìƒ~h…³GõÍGt=p ŽFTÕùdn?ðRyÈ|Âü¼ãv3Ù´ˆ £:yˆ
ñïóÑFËÂõFDýu #%䌤&QWSYZß¼×°{ýnO÷hN=,À³ÿ æ6ÍI¨3—ÆpÄЫU‡ %)Ó›µ¼æ(í ™LKÙRÈOJWB|<§Rï߯5¨à@v|Ah70X$qùhgK¨F)l—Vg\Vôì¿‘kÿp¯…o„~~<‰Ë(RkÀÄCj¬O¡ã!¥è`ffE9§Õiµ]¾=*=0hjçµOzC?Å–UÂÔ,÷ü ä쪄v¦¡êÈ÷h¢v™,‹ËLÍQæ S
9d£Î„ñIF´TÇC†ÐÌF>ÚlšÍ"#v@%µ“¯ã%#ûëilþM\÷åö³×¹S’´›$@¼î–rD.ì+¿ÈÝ3faj5½xûÆ•‹3Žösè6 G9 å"!žO»ÂôÎÃÃWó´\ærrÈ73ÒkRsú„h˜ž<’›RišfäØ£Ûl^uYç™LÆH‡(U°öBìÕ¾CèNUA8ÄBy@•æˆ³lç"}zh ÛN(³†3ÒþÊmQà Òñç +½bÛB ¶ö¨PQ@bëZ¡œÄîQzC,ɶBÇcû!?£@†¦ãaÛƒ šý¥PÙÚ¢ç¨Éö9nÒ&e'—])dçg0£â5 ˆ:ã½×y …]kä›–¢ö‘c¿ÓÒU{×I+ãô†
]]MBY”–k©=äNò_&”Ð[”k•ï‡¾-Þ·B˜Å¿r«£½ŠÓŠõâN`òïd+<)ñ }⣠»€s`ç/ ÷Û¾»¹÷“óƒÈIKŽá4Ñ5ÏÈCçPkh®oj0››õFyó'¼yC:| ’qdªl$ARºB‘¸q•íŠ‡Šb²›,;È9XR;ºÂOéÉc\ü‹·AÈT Ûü [Û:‰"d¾.*»ºE“Cj8 ÎÁ¡ñ:NÊJÎr(/,Öhkêôõ· lur¢õ4HMKŒT3£Åß$h Æm‚mx#3.$¡‰Ç‹³i´8GÖ³Øá×Ê{ùm#}ø|MpxìÐT4áq›¹ñäž{âö 5X’:«¤¼¾¥§²‹˜@›D'- +‚Õ ‡÷wzïJ
À¯6¼MQ™PñoŸm¾š®ñÑ—_ HµîÒm'5jùó1‹_y2Ùœé34…iäø«jMOi———YÂYFBŒÌÏ+rx_MdKX[z ôÀÇy ÕÍ5-]†è…ÞȆíäË’”Fä§GKÇ,/gor&fTuªï{>dzð”ùsñÌ"êMdƒ¦ö¿¨ÎVæ'%«Ò¨„ó+ãÈ™zUJ»¥Ýp˜L=›‡DwjZ ™C6ž•)g&£Þ1³CVˆÏCÚvÓK¶^^.ßT o®¬×sx>ÞL _Ì;@ —ýfn§ Šà,4ŸÓú m›ÐDÑãYÿÑ9žÑý?Ž¨è÷ëË@' í÷&ÿ³ùoÝ%tôÇ ©"
æË Ó˜·Ðkch<wõCÝz˜^nIaÌ o77û.\*ØáñÛÍ ‰âÐW,Üιvø\Cÿ@ÇbnÝÊê oUF0$3Òê}5åõg½ûœ±Ø·-–àd³öÇÞcEG»¸ö¶¦#pAÓì `¾ë /O9‡X|Ý!- y—jZ™Ç'>»Ñß TÁU{ßAÆî˜Àp¯ ±»kt¥ÉµÉòs+ا€6Z Yr—è¬Ì
Z+«¡R«IõOð>
endobj
214 0 obj
<>stream
xœ…’_h[uÇïmÚôNkÃBë4÷>8i t`h¥›hA£·éfeØØ^’´ùŸ›Þ¦MšMî½9¹7¹MÒüo’þÙÖÚZ*v32Ñ=ìEaàƒñeà‹¯ã—x÷`²‡¢ ç ¾‡óp>çËÁ±ö6 ÇqõÈè•ßh©õãxýå¶ú+*P¦®ÆÕèRAW{õ¯Ê1äyÙŸGSG± ·8ƒRzÄjs;ŒzCõOh©ÓCC¯PgN¢Þ6Óã„ÎBêmÖ1ÍÆD]±NiÆMõÆöæÉ“,ËêÌÎA«C^;@±FÆ@]¦´c†ž¤ÞµZê}™¦žÒ
>#V³ÍÅÐjÔ:I;,:gSÓæÖm¦- †a ˜{NuÃnb6ÌŽGqÀÔÍ3±vL‹ýÖF´í©^¬ó݇ˆáÇUKˆí)TauÕóä“ŸÔó.`˜*ÈîºI™®Ô?@¦2ŽÆT(V?۳Ƌpח窑_ŠÛñåÈM=c…ݤ}1 eñ¶´™þAÞŠoÁ‘ç6§hÐy0¤¯j’×FQï”ø4㉻ó@L
Sœ?aÛ]ÝLÊ%rcIŽ•EÁƱaûÂEÀuP.•”1É*za19ˆ-‰™Ä~üGé®´/£cð'_CÑw $ÿ·Âm¢Å<^AÃè\9VAç~FçÙ'{*|9’å·~ˆ]¹š/{ŠÌÌ ž%™0qñâÔ¾TNÝ7 CÜ™nÁ¡] ã’Y³ü¡è€°Kr'¼q—ì”í@0ž9Ö+3»ùL,{\[Z‘$¬A ÏÇ;øˆñmˆg×{ÕÈÎâ¦Æ_X™xòIûzèf"a†œ
pÐâÈ<ˆ¥Ò5X‡ø!G(fO~¦‰Ï¥¯‰öÿ÷Ðêû Ü p‡ ÉèFè+
W |'l4ºµS©¿Ô´Çÿ@U?z{Ra @rÙÒJ îY"/l9—ÇÊèÈ÷½Ii%•”Ò²”†‘ ¯˜5Ê«Ú ê‹ÂºúÜàõH^Â×™S´Jß A™‡ôÍ{ܳi.¿H>4ùï±Ê‘zCül0ÄÂ| ‚„;·PHŠPZ× Î_=ÊÙ¶Ìf‹©ršû<šÑp;ü ÿÑݸ~±†„Và¾QÕù×Ã^Vg‰ˆÇh 4¤> (Ãjå‚rB¡”w”ôšB¢÷H4üùZ …x¼€H¢Û¹Öx«¢V4™ÎÚ3µgk¥®®f>‡ajOï)
endstream
endobj
59 0 obj
<>
endobj
215 0 obj
<>stream
xœÏ_HSqðßÝæ6mê´öPÖõ*‰NL+A
åÄË æ¼Î©Û]óÚEPI͘ óÁ²D“iþ™Xz£ÔP*ÉÂþˆý3 Fbˆ„ÔKò»ò롇ó}9çs¤R †aBLæÂôàp\ŽaäÃ
ùˆDyl/1tJЩ¦ör¢‰5Š”D’óz¤dÇ•k&ÞÕà¶Ûª oMÀ)é‰8ÕhÌÀÙÎm·ZœØlª8‡E„Z\Ä[íœÐ€ãOW ‚+39YÅ$‹£.‰wÛ²±hªp!Wǹ¯r8‡w
8ßâàpP–l&Þáª876óœÛ‰
ácJ*B¨E¡h´ ©ß ªAsˆ±1k²'B^my c óx‹¼ÝRÊcÄn Q˜ ÊRSD£¨ž(âIL ¿‰ž¥ ´ÈP Åw«Ÿ¹f<‹0s]ËÓs£³Ã/`fùáZ_E÷%(…RÏg¹‹+/ƒ6B. œ •ÈI/C"üO)I™ k F‰Iž]Ý™R £å·é}
Um
¯>Ì¿ö³KöbMnMeEl²ªèÛÓú˜Å-2 ö‘5E³¿ìsí¼ùÉ)ÐÒF c&P/i$@¼k±´‘®Ê \ÜhZ†
X‡¯ðiÈ¿24/a±zðü@q— Ò ²›óDcn½5È]I •ž´=ß•äçžÞ0ÞÑųçòŒå µiF`–|Ú=šjhŽc9›z°‹Dv?‚I ÑžáÎçºc§‰ƒ¾‡±Áe?ÈÎî¶Ä¼ß%m;Jù&9k°«=õ-Í-míYÐ ç©ÿnOûÞ,¬/z¿´$üè:=@õéiÉ%s7zG&îIƒ×§/²“_>/€öÏâ™Ì4sN-–¶ÓÖ–Vè þ lTGˆ^ÙÔOœ½·½jj¹£‘ÂüûØ0UºW껥Óùtáý1VDÂ
endstream
endobj
192 0 obj
<>
endobj
216 0 obj
<>stream
xœÍWypS絿B–|c R¥Vt’ ©OHJâ `–°˜˜%Ûñ.y‘Wy×zï¹W»ŒmÉ–%0f³P
$aiR 6)i†¾¦ßU>¿7ï“ídÒ7™LÿxÓ©4IsçÜs¾ßùßù] 6Š’H$áñ «—ÍŒ ýœ,>!Ÿ %N”špò·IÁÍ2ˆBDXï“Qÿ3õ?‚JÆ£7£(©D¢)2ÄkòÊ
2Ó3´1SR¦ÆÌœ=û…gcâf̘ ³ 7 3%Y “¬ÍHËMÖ’?91«5)™iÚ²˜)/ehµy/NŸ^RR›œ[«)HŸ7õÙ˜’LmFÌi…iÅi©1¯iÔÚ˜åɹi1ÃÕÅÅkróŠ´i1 šÔ´5EQO.Pkâó
µEK^/I.KH]žööÊôŒÌÕkrrc)êÔ
j%õ4µŠZM¡ÖRë¨iÔ¯¨õÔ+TK-¤¦S¯Q‹¨™Ôbj õ:õ 5‹J –S㩉*Œ²JæHœ££ú¤³¥_† »'[.; ×…? ¾›ÖŒ–Žî3v ?6jì #ìã$ãŽEþ&’ oß%Z"ƒàC[|â« ‰È—(,-[TkÑëð…ÁÑÅ[³
8“:ú=A€ÐïB7;1Ip ¼k3_Ñmࡹdz¿óHÛ.Ùå~ü²,khUl [ÍééNá:øHèÐ
µûB5è*ñ"Ñ£xß‘á
y¤¸|ⓤŒÅ¤¢UX[ÀÛèË)ù/$&¤©8yË×x\Žã8Ö¤äLl%˜ésncž‘”[ÎlÆ]†ä
XJNnV˺…“$¥N×k÷ÉVÔؼm>ôœ=À´üéÚÅ+@ lÉOÖ铌ٌaCùcªak%$ ýñ6¬-L¤XYÛ.Æy$篡ÃïKEr)ì¥Ï` ‹'âÇ'}ôâ7ègèQ4MVa6+2æµ¢ðîúøÏ0{.ŸkßôÀ…œ©U<:u!“µzz#БÁÄb_pºOòÍ=iÐ|Y‚àžvšF“Éd¶¨–ÎN=»*ð
(q2Þˆ×ãRœ€”˜F±w¿¿ÿ sÿ_•vxs g)3«òp õ ŽzŽ~=Þˆ¦}úwæüÏ÷ßE ÇôT¦,¼,MõV¾Õª"mÀë|hºGüu»DÌùHŠF‹ñŠaÈG?Õl.0!þÒ Æ˜Z+@iR˺„Ó¯^€ž^ŸìÍ"è²{и¦+L½Î—ô!I8)Ðh4yñrܼµÊtLÃ%Y j¶°m{ßþ£ ï ýÛÃo<‹1
‡?7§è†K ‡à&G
óÝ»%E5b‚ýשpvˆW†ùgóÉJäËë\ «c·ÕøOnÿÒ¹§ï¤ÒÙÐâ 8A +WiÒé ˆ.j©nmÝÑ´+×–±*ióRµŠãe‘âcµ ñùVÉ´j@*Nçþ°Sr2UÙþd¨ ?• ·aöýÒ^#s¢¦¯®7 R•©êE“×&v"‰QÅyAàxÖNÊ=°¤v-Ž‰æô ÚÌÝ]Åó6{cC«zWÙQâ4?
;t,ÓÇZ™Ü®"{Rý&÷ê ¸‹&\òg¬,a90ªL`lp ¶f45ŠÐõq ú
oÜ)ª'+ÐSrÂiü”¼-“É«ç%aÙ‹¥$ú¶|îµ”“Šª”P iþüžÂ}œÃŽÞ–nïNk[Ó§4 ˆg+ªòKSóË €~Ór²¹ž·ñNÒ§}œ'öIÐ#祢ñ
û.ÇNG߶ûÑxR
iF¨Kc†¥˜)Æ ©úMI”eeê²4 ãÙ~¯ œîß2Ž€£ÏÞçØåØE¢ÎÖ =]S„f-S5߬ ýÒ¹¢+Ç:/ìQñ\Å,ôT=9UR±µÇ‚ÍËD¢oÀ”ù$èª(* ;Ýî÷n—
²³ —¼gA¡@HÁéÙj¶Ž\ºèÖ³œ‘eâÆL}Ý« ,’‚w
w ½{áÎ÷,*–¯¨r´[·n'ç†bÏïþ*Vû$— JÅb1¨pîo†Ó`÷E°ñ †Lx Ô¡Tä~ùuw]ñð½<¸©jþÚ…+A™on× ÀÉÚ€îÝÑí÷Vzs 3+Ö-=•xã‹/®|EÒk½â>Ipº§ðÞíòñ¶P†2Ȩà7ó$ƒI#kØcJ7p³ž!šÔ¶õ³.BlAxZU¼KhÜ´†M&u¥‘N'…ê2©÷BëªRÚë\)P °¦Z" ºèõ¨{(ܪ ‚69z>»4äH,¬þ.Ô Ž,å%üµ‚76‚²»³ ME{£Oà~k%ol e=ØlÎ&šè§É‡r¼ ŸœóHÎ|€Ø‹R± ýRaÎ7$[êŒÅZ-ÐZCgkCý Â)g;½ôõ׎̶8~v{µÇßÒÕ±+ªUýÇ껀>åßœXgL328—‹{Ð h.ß8rrg›Š³:
tF{Æ §Z?lTY›x—£ŸÆÏÛEø±gjKÞ¨ôÛÅ ŠP/›ðOëÇbObùX*¦¨{÷7öñ#À©‰ÞdƒöûÓkdö>s¶‰ÖW2ø—رùØzŽ'p÷ pF°‰ù$bq(¨~ZÀý¶òî äU]ôùž€©YŒ&¸·óäåPòVk+QÞÐÈ[Í 0+ú–Ràt¥[ׯ/OzÓ
ÿß¼Ž¯÷^búÏŸí!ëå ¯–²?C˜~ œ©04q|éw˜vÉB‹ÉÍN <mØ¢)xˆú)<ïŠ^» XÁ¢ä9àB {-Ï¡CƒŸE;ªy‹¬`çáx=ڹ׸ #(å³ëÈ$eÃÈf†lïaÃ&Ó4¼2¸„l›Eµí(¯
Å{$®!÷9©8U(: p ™»k!Và0 Ça·æ~ÆGòf‡Ùf4plµ‘ÉY¶,e%`± Q|—ëckSøÑÓ·ý{€¾Y?;pØ”MTò8Y®£}hÎu7q`2²aõ¡!ZárŠhº~ìôaPÚalÓ—™Ë* Ÿ.m¬ìènóvïÎîØ2kþ‚ùÕª %›‚ï†|
þã¿´ƒ‡ØŒ%>ô@'úO">¼/Eèš+'†á±?¡°Ïæ\Ãã|ïÿ’=¤Ð?`i§ð ÉÑ Ÿ çø–~.¾£°ûÝ6rú/ä(“„Ç/Ÿ‹Îàâ@+q²=uÇ‹¯¤éè‘K¨x`ï )šwQ¡Ê;Iõõ֞ή@Án#Qœ¿Ü¾ug_y·ÞÍ ÚŒtwØ8ÙJ1ºC“ÛãØÑ\ו™¹¥";C•Ý“îÊzFÜüUéËdÊKÕoÃFÈoÈóè–èÞJ‚ô²›‰(âÏhò^$EcñÏàUû?UoØ>zpèÚ•žƒºe5ÆÅ¥Lþæ”j2üÙ)f¬88ÐÞ¸ÓßÁô¶7ÁU oÿ¼ ·v
ó¡ÍÛyê¥ëÒW½M<õôõOŒaÜ ÿßfªQ')˜Þ‡ } A‹¾’¢Þ TáÕyóòÕÚ좖’în_G@……׌øQVÏꉬŸj0å~Üö #ÉŽB= ™Ö•¦ï’½'Rd²ö»=s‡M¼ˆÈ
ºúÏ–›5C^õVBîdÿ|¢CQ“ñ(41`µƒSå ·¨#eYTéX-«sp6Ï77ªZ:šÚš¶ Xq£ò81s>D(b;w(ë]&÷@j}bS¥ÔžíJ¯_Ò·é[W?þìïÇãñ¨:"Xuª:gu“ú‰Q&é¢vID16¶.»s;¹Ò䞊΢g« ̼‰i—·¡BÙà2…²vù>4¯·Mú yë´ é5NGÆ(Ú”US;èŒÐ „¿Á^òþ/Œt)]ž¸üšÃ õ)(#oÿOKør§—4¤ç½'6-äž‚§¿úCi¤A÷?“uñÚ”•éª7t-þÏyüÿcýÉ—„îkO)¼^MAnqfNgMk Ó׊,öŠñÍHÓàôÊqrC¸oÌÕ±ª1a/x"F·;#"(êíçL
endstream
endobj
57 0 obj
<>
endobj
217 0 obj
<>stream
xœ%Q}L¿[¡œXÙ‡iBƒöÎà"[úciæ&dËtÌÌiÐÄ}ÔÒÑ&ôcí•ö€Âõ»åµ¥×OŠ´å(#m‘ Â0ÓM 2_1™’M4ËffŒ‰‰ ¹«Ç Þ²?^Þ{yy¿÷{¿ ŠÔìBPëêé9ÝÞö¨ÜÏ7¡ü3»øg% T_¾U 2 ÈjÊÿmîã {9ýnîò ¤EM6o`¼Ëd¦,ú~ I´hí ‡ˆÛÚ:‰E¯Q‰ 5©ÓÔ¤Ø çM½–¤ˆ•Ž$ÍG ¶ÛíjƒµÕdé?vàaד:â
UkÔö'MF’8«6h‰ÇôZ §.“Ál#µ¢ÇÔ§µ5:R HÝiÍ•cGñ½réFN!8² GÁÄ‘Ä…ü…Ñ-ôá.Fr„6ð¯A¥ŠVP¾žÿWž\Š¦~¬˜€|†† n„A#à•¨nÉš½£`§“¿>?„Bn\hÚYr_ ºT Ýâ0Q¼?EKP†`ùÑR"#‚yÀFù!bÇ# HC"’ˆÄ±¾›f¹Å{+,ººÅÿ”ð¿G> Np:‡GBCàŬ9:_š/®Ü|÷Ãn¡IPÍÂsí·U¹æß·3Œ/îó‡B ŸRÕ" 0ØóͯV /~W67Ö6`–G³fñSP³ù{¼¹Âí¿ŸcÑõÜ$¼„^~WZHA!í‚!üˆt†“NÌdï0E2?=5p
òÔ¥€K#™Ë_+±Ë7.̾§?Cµ”¾Á Ë*ìÃNJ 48ÆDiðï¥ÇwpêàP[/(`GîF4¹SØ,•q\5Ú´?¶®n¬|¹œS.|3Ë=e¨æúføÅúÏIª œCžŽ%bŒ'FÇv>ã²£ñ£ÝnÚ óe½8Ï
á 1œ^¿Ü
:éNG#ŸT6peØFïnK¸7×å%kÑh´ZÆ¢µT*Kʆj(ÿ‹ò¿ò/ÈÓiˆ@cŒÇð{}JîiÏ ¹® gm·^ìÜÕ^ç8¸3É‹àS -L0¢¹å—§/-¨L¤5!GR4
"OÌÇø˜x,>1¡ä(.µÐœé+žWLØwîv{þóÉXˆq¹Æ® î¶Z† ð6œâü¶ŸE›¼ÂÀ /ˆìº¿•ð#\Y ËE'a ûNsý¸ª·WgUú7Õå‹p }nŠÒ¾.žs¥ ’
‡YF9}§ðé`ÓYv0Höâç„áàˆ¿‚ʺ§2¹D!® G2Ÿ0sì Ë°±Ù“ø ÌD“•/çÙ÷+ù5ÀÖÒú~?P.
.Hw.ÇħBŠ‘ôØt%^JG•
6–ïJ§'9+ÔéºJýO*ëk:
²'æ™ Aþ¸Æ9
endstream
endobj
17 0 obj
<>
endobj
218 0 obj
<>stream
xœXTT×Ö¾ãÀÜ+"*檤Ü+vŒF4ÆXPb#¢XP,Š€ôÒa(3{ z†"ÍQDaˆ%ˆ»1±¾$jô7ú|/}Ñè¾xxyÿÐ$ÿ+k½õ¯£ GöÜsÎÞßþ¾o_ cÖ‡‘H$¬“Ë|÷)ï›þ9Z|G"¾ÛG|O
$ûUAWª9XJÁÒìÀ»C±F2wÀu©D ©t
‰
óóñ°µß2ÖvÊÌ™Žlßwp˜i;/Ð;Ìo‹g‹g„¯w gý`ë¼ÅÏ;"ÖÖþ#߈ˆ'OŽŽŽžä>)8Ìçã±l£ý"|mWz‡{‡EyoµuŠ°ýÔ3ÐÛ¶÷t“z8†DFx‡Ùºoõ bæƒyAÁN! ÂœÃ#"GE{Æ,‹Ýâ²c«÷òm®>¾+ýÜVù¯Xè8cæxˉq“&;Lyê´¦3Ìpf9ãÊŒdV0£7f ³ŠYͬaÆ1kwf>³Ž™È¬g0“f!ãÌ80Ÿ0S˜EÌbf*³„™Æ|À,c¦3.Œ#ó)3Œ±aÞf,™@ÆŠ f0™AŒ53˜y‹á™!ÌPf:Í2cÆ$3$ %§úÌè£íóP:Wú?f#Ív˜ 5ÌOÊ>–}ÃaË8†+ä~ìëÑ÷¤…ƒE¶ÅÃ~û,ßµìèß·sÿn«ÒC, °wà²GM ´oÐ+ëxkuõië Þ6Øð–ü6Þœ¯òž˜eÕõ Œè`—TJÄM]3yå.ÕÎpU†2–hº_SÆ*8+,+"‹UÈvkÏ@ÔÁ5¨V}n9ÂÈF‚7fçƒV›Ó‰C†¡^vž8˜OTÈöh C 쟡¶'tKî‰qòsöL ðÊÈŒ†Ç
z‰¸5=µŸÆZu¥o Ž˜N< §ÒúXtÍæ»ïÓ3?´SÈ´(ƒýÐ ÷áhÏ—ˆ
6œ` åmž/oÃFOÙü´Íã…UØ€#d8jç—þ\›ÌJ\žnm%-_aÜWR±¿8‡¯€Üøt¤Æ ™YÉÊŒ¬à²m: àÉ8 C†ãÀȦ y]†!=¦ Oîcˆr_Vö8XH¯Tkv Yr²1 ,ÍÕBY¥°»â3ßã° lNà "´9jˆÞ%÷Úë§[]°´py! á.Þ=Ju ô‚&1Ï„
=dWËÄÅõ¬çTJ~¦Ðèß&E q#d$ºyÊÔö ööYÜö[¤‰µ» qõzûÉëB§çZvq`PÀr¸TMámNïÈuüÞ£øBü”“qwvΦOgÏͬ=!à#–8ÿ^‹vÌ¥ —5×á–QÐ|(Ãy:s#뢄rÑŒ¶ãô×äXß5”G3£ÌG5<é>ZZšu?&f
¶YûÚèz
ͽå1=áA†^ä1M´âsKsòÎgd}T*ð‚PÁÊž'°uUJ5¨3Rä¤/) <î5?a”E¨Ò X¡=açY\Ðm £Í¨›2ÈÓæWr´±{wèÚ*öçs˳sO™vR%‚Ý#ñõÙü£HwÈL‘'Å„Åó/Œ²p•+ÝÀžc]OÔi6;mgbNjvzA8d€*K©ÎšCV # V˜â#TŸÐxð€À×ñ8±{PnlŽ²
l
iAó*_à®a/HY~¤é£MdërwÑ®1¦Ð«§${i‰¼L$ªÀcüÃù爱ÈpôÜ[×Ø o©PîÚQ(òk ¸¯Z½gÊ·°ä}2u3‘: ýõ7GÛÚ+åÛ@ñ7¡C¦Ïƒ*}*$È—i ª9"9ÉOtŒõ_ïe8ôgdš~Ú)Ð
жzEkø r:Úçç}6FÖVÁ¦WÁ½9ªÐg(© ¨Tòicí±¿yÛ›Âê×1WXt +)IJP*g€‚=£ÕBmå6¨ïUš˜¨¹ÐäæÉŸ¢9JÉ;æž
YömøFÚ½½Q iÃ;þÆOä] Vóž2¥s ½í"àl)ÙeëUïÃØDA=襯S&d‘
ñ¢QReJfš8€×•ää]0ßO•ùá¥9 ‰YYéê,¼v’·°Ñ¯pz·`z××ðºÀ¢K÷¨Œ¤„ Œ$›¨MþÎ !’ Y§Õ4A gׄGùmh÷;Á¡84÷´*CV«Ôò¬¬Äxã<÷î¨Õ· ¾MXÝjâ¼ÊKÞýq2ŽÁ)MÈå
V¯Ž½ÎÓ˜ÃâsÓ&8˜'Jq_*}•,?š•K2ˆT«C3cUÑêXà"²jí·=JñÝky`M ÏÊQk ŠOhX¬í~¹3Y—R6å +ØYˆ]}†iL)–ÕiŸÃ^ºžC]Ï×íÄÇ/ŒÄ‚TH¢Î‚f± •jq¦T\&Žãó A :®"bò«,™Ì5o“é~¬jG)pd¤©›MM¦'PÚDçC¥ ö“•ãzsOYš]¤±ÎAÖËbopuGOFu& {j×lµ‰¬ØÜàL3:|ôTbKF<™Ž6'WÈײèü;w‰,‘t?à=?uO¤´Nþ’Z„ªyÓÉÓºjh…öXÃfz‰‚ôftkÀ{-GêC©èŽ¡|µj•76 –{¶¹¯ Op˜>ŠXÛg8 Çö¢¼4 ÒãÔY‰éòÐ%‹£}zi vö CfÂ]2SÞ=¡·W©l¿„fº^BC/X|[|Ìãd˜ùÉbp$“åDŽT¦O“{ðý‡7ö`â^IÓm ¡»-Å!¸„?zJ©?N|s¹#¨9©@ÞPV“S®ÍÊ ~7‘‹*‰Ù½»¤B_»ÇSá%xÕlÍw§EV}¼0 À«ÍO¾#&Ö—*‚¢z›>.<Ý%Vr®á2üðÎñ?¬h+t¾¾wœ7nçiò“ă¿v9q¯ï
j»†ùœl¹p Jåoܲ ÃÿÆ0^¿ Ðäˆ~’ýÑØúæ®›I†(#î7`³Ñº§ -h7tp¼¸Û°wš
Wá8÷tø â"t›ÿVç=ùåMAp?;ø(ö“ „=IU¡~t„XD—W‡ß1ßÛê*à~.zPRž–£V&ªå뢂a)(/¥=äǧw*¯Æ@Y®’'}±™> ³gº®RO#³äVx‘âEìøŽ4¡QŠá]R¾u{ÓV¯ ?oï&¿Ö†¦V, ‹i—Ÿþƒ?üš/õpá5ð\Äñô²æIÆ.ö äܼö@Š¹â2Þ¾*ë*”p †Ó ßÛ@†ê…ì(PW¼vVèÊšœž2K’*(Ö‡é× GùrÄœ)D²¨yCI‚üØÚúôçO#‹TUQʼn
ÁàÎ)¢>"fS‰¼G§ ê] ýÆí¹öº=&¿@(,Ì/®=µñv¢É¸;|ùâÅ_] I-@5ÀÇ$øIÖ¶ÒaíïcdÑ$…²a>JòîâHànuÿ@Æ+d7µÏ(Þ…?ÁÍ^Ç4^üá&Kò óIŸ ïÚ«ÞèÑA ·ï¢G럋
ó¿6Ix¨*šŠc(¸AD¯ÒÕd¥e¦gR 'KÈhsQÁþ+ÎL™ƒ¯ÃÙÛlYQiqÕ.ìO †å¦QŠVs)Ñ (Øí—4´J WÛã ’5 Ù™ÙÉ%”Ö~I2Šb¯‚‹ÃÑÛŠ]îèEU`×þ_oz¥ç¦WþÐ.Rõ]ý¨Yôíbx]qNÁuàʲ •¤Ñ#.x“Æ*:gÔ'g$ #žÝ¾$@L1ÿ‹Qæ¯Ogh°‡°ž¨,6ü½_~t¾ºÌdG _ÏY½šý‡aysï_i×]Úÿ· #f£7|â 'ÄÝý¤t)Œ‡µ.Q Ü==Kn ;¿¿*rö ƒÿ"Ä4`'éÅ´(ª” ›ÉKÄG|~-m` ™ÈØIÚ° U¡ª€ó”m'@a«)È»\^˜¯ûžšL˨E±KŒ pu%\êXÏ-ꀼڒâÜ\¡¸ŒºÞvÀ‰%hvþgÚî x¿Yrø&ž¹i½ÌøÏwŸÜßrÏ&· ±Y0gÜêºå×·
Ä|]Œ3¬¥æç© þìïݤ^UòÁa÷z,zÆGWÓ#Þ|©¾{dÓb¯XÅÊíéûÂG†c8¸ÛÌšædïÖùÝµÏ ©z¶®A‹ü•îO‰Ñß’ŠCq ¿È2âà“W%4èôzØÃ5‡Tû‡nß±yá ÷g4tÒ÷Xx °˜Äaì,ªÎòGsѲíóÒ+{"[ÃÛß Á=”\¨^™œ#/ÔºÀvna½#ÄþA¬õxóÞª”ˆ“NHEo ãñŒ¬˜B±>”zurÏÊŠ¡.$Br–œeB!8¤ŠåH?É!¤® v—=Z‚¯Ž]CK½iâÆéOÅU|&ù”¥ÞÚ¢à`a3D7
)‰áÊm« ßk¨¯n9±éÔh"#üHaôïZþO퀯p![«SûÊÉ÷{qÅK?\ðPR„R¼ˆ ø‡¤s² DXh€xJ*žÂBÞÐ}j;kjGJñwp¤c®ö0üÖí^^†€= o’÷lý+·JÉ9q±TLíZÅï,‚ Ðr»
c2“Ò…nË_§e$QÓ²‰-I)®È),ÕõÒ >1HÚ©AK0½*Á«ü#Àt’LR€(Ç’„ɘ¬Áø'ýÏÞ Â‹£õaµqe€Ip.ä +yr5·
öÀ¹øGj
>„O$Ç'FG‡¤„›^lœ¦›ml§‘€æR|ÒÅò
*ðæ-%RÓKµE…l têsÝUD®`Û´¿Àaº^¼&Gòž)5€xm:Œ’“hƒ®&ÐiÑŸŽ6YQJ×ø”4ålˆ§Îd²¬eÏŸÿTZˆÒï¿ê€G ZØ^¡>Â|ÜÒ kŒñÕMÍúCmú€ áà¡Î =pÛç:Í^ã䥓@’JY:Öf‡8£§¥ @÷ÝÁ·Úš%ßb t1™²¼Cçuá± ìµ8{¯‡Ü˜_Ú\kPƒ—gPç䧫q ÎüîÏO†ýH&× ?Ô=ßq7œÎ91›éúáºq»öU ªNÙ»!Whký
tÀÝçÀÀÌþ^òP¿P•·*I ÎT¥g2¹ :0MF4Ôqš^Xâ7& ´§ðãÄy²ZuNX¬
â“ò¸{¹¹÷S¬Jlƒö u%{áÉë‰c 5ñb0O®è½å „
Cs{1‡0ØôVb’XÆïM«£þ°¾€KMÇ>££ðN(JR« #EØ·>Ù
V‚Gá†r¥6K›\¤ì“v*çÉ•ZJoBQIsû]še˜ø‘Œ ¶-+ùÂOÞY|°ª9´n[àöØ
Ó¾sÄ~8éñ} ˆV3î‘÷¶x¤ù+ä=Cb8Žõ&žáÑKq>þÊS·~®þxU[Ç‹ÔJ6gÕ„ygÆCçS±g·¡¼ýÌ–³ÃÉ 2{6)Y¤SpØOßRïo;î:齦oPBÎðK!ìxf^‚nB>‡:~³ÆØì‚UR‘èš›+ Šddc.k´@I?ÁÂ̱ҲïÞ|KK”T[ö×XZ1Ìÿí¼
endstream
endobj
55 0 obj
<>
endobj
219 0 obj
<>stream
xœ¥•[p÷ÅW^[l¨cR7Jë†î*“ÚÀ$ &%)¦¡ w0æV K¶…/’׺۲¤•-Yú|•dÉ7y-o`|Û1†„¶´%€II/Ó‡2É0“N þËüÓ™®qh3m 2íÓî¾ó;ç;+!âã‰D²$cWæ»éë^Ó„%Âò8á¤ç¿yœ™ ‰$$Æ÷.§“‘ëÛH½ e?G‰F_•¡ÑšYu~N¾2w•<}Ó¦7^•¯[»v“ü'Å*V«(‘ïRè
TÅ
øQ$? ÉU«tfùÊ7 t:íæ5kŒFãjEqÙj
›¿eÕ«r£ZW ߯*S±•RþŽ¦D'ß(VÉÕ^|dhŠµzŠ•ïÒ(Ul AI%¶L§7(LJU^¾š ö{‰D&qÈ"Þ'¶ÙÄO‰wˆíÄψ÷ˆe¢a"žèZ%8NK~Ÿ ħÆÿ9Á›ð¹”[òü’6¡&I˜tðÂ^"$ÎDfIT‹ºeM‘«èùÏš€lË®ŸãDËa†cÝ ¨#g‹G ö¡U
Ü6oM…›æÔÚô@U8}ÑîàY?ÏÄ> xר+ºË[v Í?~’®/::(urLy•{ÀC9=`mm´‰n›ëœ *%6“[ï¶2[ñ¸Û
^p§Øü¶p´9ÜÑ@' 5‹"QÜMºI
Õ¨Oö· ×ÞÆI8¿„WbâWo£$”Œ^Fi4 ‘)ÔC·&ºQ\ÿ,sîætï9 ¦cG÷ç”á„ÂLæĶClPIÂZGº÷q«hÕ=5¢aY}h -û4ˆX+ܦ
`)C»³-|ºehz»OsL¥?æærÚ´ÿ³§ÎöO?tð7î ×oÎð’;÷юˤ,ÄËòÝžbpSvŸ•v„&rÏïÀ‰©9y†€ƒî(ït]tœrMÛ “Ò–ÇqùÙ“vúR ŒB ÕeöW:•îÌݳ¿Fò1D^ýÓ¶ö#AZÛ”ï‡q*¹õ`´ÇP裓Ð}‘èò ´U„ºô„4Ùï¥ ÍV…yS:‚ÒkëjP—¨j3±œ^ÌZ‰Ó6JÍ ˜ ~hg H3ð¨Ë6Ñرӊ M¡• Í°{=vm+R®zOl†Õ×ßÖmhc’„ÈW1¾6Û9C
Ỳ†V¨ƒªÍ¨Ô8Yk
/ˆ¤ WŠQ‘Wp ¨ãÜxÿõÁÏ¢7´±xj¤ìüáµj¼¢š @c¨¶¾µö÷Æ>»T(è*c ¥†}LáºÊC ¤ÒçÊ._äGúè ò¬a†ïiéé ÍB=µØa¯®š6þÈT Jïêê|ª4ë+¥«gÃ3èÙOIÁ$<+›6¶˜M¬IÇÕ¹Ä,¢Úú<(§Já~æuläÚÀÃè
ÚßýUæbÒ*õ^ù´yý=öµª ’‚FH–Õ¡^Œ6èl1V)özM“êR°/Á¯á´u“;oŽÆÆÏ3ÁÝãŽè76y ,«.ݳq PYžû¡©>´´}„‰}8>}¨ë¾uUÞ;xQ´ÝFŽ»!^2=®Þ#¥ðŠL_]iã?Oc23X’]tB[AÛû‹³Z‘SŒ ÞƒµuíLôÞ¥K@E£åGtŽ\gãÒ«ñ‹ §]Í <.Ѓ¹µÇïë†Õim¶”õÚÜ1óÈhßé Ú_;~ ¨GÓ(…b<cØ~4ó0PŠê‰p—¿/t™iŠ4úÎtÎóó×Åûí‚°•zŠ©{‰Ž=^/«mªk™ªj˽+¸ïY½œÌ”XéÖ)à .Óë¦÷bÎÚÇöäü?˜[ÏÔ·0™²*íž
ÿó¦Õ5L5á dÄòèÇbðÒk€DT!D{%çßû2fRñ¶´™Œ?¢ç>ý¢ÕçôW×x½œ“ÉÊx[s¨w¹OúÆ|gš‡™&^6‚Ö?j5Õ¨åx32Iè
ÎáÃwGzý·^¢G·çItJ<ûûÿ:û·¤‹MC ¿ Œ§Î‰ˆNA›I]U;ejutD£áþaeôÄ+,~A]E°$a§Ôòtæ¤Û¾$m{<\ùî»Âv4 ÜÀÖV†ÏùzÁÿ$VÎ|RyN7ú`Rœê
gŶg‰²‚·¿à…Ô…uÿÏÊë*
í•:¢ì€8/a
§â´5Sû~ye|Âçc
ñ ö"Õ[›!Åj(
F Z©®]gd-…ªáòù¿ÞýÅ't©%´ŸgN‰9Œ‰u÷o¨öx] nÔbaè;ôé©Ý~LÊ:A‹¹´\£ëÎw‡c4Þù¥OæÔC%pÔ¾aCÿ_þý¯Xš¾ (»±;Ö:¾ÌÌ¡Su~§LŸ<\s¯t}múbÅaˆ€É^Zm©23I†.!£•ÕutIqN󒞥 }‹^ÿŸø HL$ˆ ÿ<$
endstream
endobj
110 0 obj
<>
endobj
220 0 obj
<>stream
xœ%[LRq ÆÿG(ÆȤ³f—ÃY±Ò2ÔÖVvonn¶YT¶²uãr48 ‚!t†Ú_
BI+Á3#•|0×ýjšU›Z¶ì¾ ªÇö?u^²Ü÷ð}ßÛ÷û0 M†¥—”W”þ‹*a&,LI 'D~«f@™Ê¤}¿µÙ¨j:8íÍ cœ
%ŒÎn6šX*WŸG¯É§VS[-´Ý¬×Z©r-k¢-Zvª ¥v3z3ÍÖQ¹L,k[WPàr¹ÔZ‹CÍØ›òò)—™5Q»hm¯¥
T)ce©íZ MMoSO[ c±9YÚN•3Ún H»Ã €ì`˜1¤`?xíÃ~
Mr!ÊñÂJ Cièì„Dˆ ñC3¾ZÌ q±¸Tõ´üÊBZŒ–‘bDL†ªÔË{I$¹üP9ðäNß Äïö Ö qªjv(û퇸\(æºÐøÛs<&ä}” ºJ´œº‰ˆÏ0 {`Âkâšj`÷µº“©ŽÁÛbÕ¥ÆJ§‡ä† ñjh„.Öcqë}ØŒûÛ`¸½¥…“ñ»)ˆ'¡•ó4¹=Ê-âPó‰“AØ”ÃEë}gz£!R.äsü£I¤ »Çg¿ùÔ0‚² x5OñATIÜðßôÃ=xm½Ê¹3|ßCÞÃk0„Ç}íµ,sìÐöQã ´ü
’ßú²±S×J*~1côúüî®±ÉK~CŒ¬i Ø ç"Ǻ/$Ï^¿¥,3t+ö’Š?pÓsoÏ \Ž ÿÿå¼ËFsGnkßÏSè#ZB´`ƒ6×7’«mÅNˆ¼-—’íýíÊghs[o(
ã9ÃôŪ•f1/8M ê8M¶ö'¿B< ²ÎÚàVZÖúªO)ÇK7rÐ…ºu¾÷£å§IÅ× À]QoÍÅØŽDO¼—”;y¡$† ¡óüLQKOeŽÍ"3¥k² ¾U&à/oÔKë
endstream
endobj
48 0 obj
<>
endobj
221 0 obj
<>stream
xœ}S}põÞÍ}-19åã†P7w‹ÊÚ¾#$å£&Št4€1 ‚-rÉ-—«¹/wùþ É‘Ëî»{ÜEbH##´hÛ›(C°tœi±2jÂT´NÐáÝ»ß%Ó=*´ììû¼ïóÛ÷Ùç}4¥Í hš6—<ýâòeéðqåaZa3”\
°ß½Êê^‰ë KYÚ£¬¡tŽòòl¥èAeÅCÔlõ å¡TÚO
R¿£ÎR—©«ÔÔM*E3tý½”^[ìñÖûœŽJ?—W±˜[^P°ÚÊX¶¬€{ÒÅûœ67WbóWò.›_UÜ ž
'ï¯çòÖVúýÞÂ¥Kkkk—Ø\ÕK<>ÇúÅV®Öé¯äJùjÞWÃÛ¹ ·ŸÛlsñÜ]ùK=.oÀÏû¸÷¹½6 ï®â÷ø‹œŽ;ñ =*(÷Ù*^áýéR¹ÓqÞ©¦ñÏÝð•¿Wª¸ÒòU-|ßëóØþtèTŸ* ÿ—cwV{«lõ>›=ý¿j›µÊ»íÕN·£Šÿ Ø=ò*ž¢(ãC³ç™¸…y[Ÿ/}Ñ›•MÑ"
´DËt˜î¦÷Óè :BGé^ú5ú õ`z ZªBúazýçŒmJóÍiíJíi¢ãt¼ÒeT¾b ‡Yýµ!7]Õ(Ù„Õ$‹Ñ6 ˜˜> ‘¢Ý‚,„-Žw¶•`¡°¬0ÊVœƒýXŒO‡Ã™é
Bk‹ ífkG,‰c7Éñ“| …@ÚÞ%øœ4 µÿ¾ ÄÞÖþÆH¹¯û¿Õo˜ ã›ð"Ùæ=¬ ˜¶vh u‡dÁr¢ò|Ùe’)‹ „ÔF’EÉ&ò¬ ]ÐÅ´E¡·O†HÔ<9q-EÇIÌá€ùjÓ7ØÛ—ÇXææá1
†UhÂ1bWsh #úû8>•ãc‘2{°³^&eh׿UïÃ0û@X¿wJ“ØïMi'öõü ™Ÿã¼h!óñÒvL‚RÊú³J&æáøEœ{3¿@JË2t§}kj@Ì¢X²e É ED\IFw‘÷«I~Yd5¤2GSsp™üˆX'Iî7F;$ñu`õ@¯åÇR”]Så ›|ÎJ比9dN>…V+ææ}Û ¥`š;ÒVvÊ]–¯ ó)™w‰Xp>¹tŽ$!U©õ;S™$Œ?Oæn ™+%
]¡´©è?$ƒ,›%éò c¡ø9ŽžÂ÷ßÀü®\ͧpå¶*e;«L¨3ÍØ€ëHÑçH]DÎ:ˆ[¤9‰_`#üôÌ78÷ ‘ý’ƒLL”õ4zÍÄOæ¶ÍPÉL¿d€b(ܾô×ÛÊw»›ÛE ^#ÿ|áË1²: Z™é¨
ß#kqÛ¢#-2 ¨[,I±AQ
É–ÝGÉüO¼XzdècŒÉøLÓX27N+©ã&‚©g;ÚDB öFaÐœ¸¢ÿ eOïûŦÍO¸;7V“ÇIÓã
åÉž¨ †îÐ-Jû¢äc¥4Gáô¨l^![˜}>¶è¦¯è½¢Xe1&ŸšiŠ'qWN)ÅS$3M¦¸á18{Ì’˜PŠ§' .Øù˜¹/܈
Çàì-s|úo†[°Óe™Ï1•ª™¯cGÆ7ÆÄè ×”ù×482£5µ5Ž]¥êmq…kßêŽ ~æ@_]m ÅõÒ{• Lž¹þ¯˜¹ïÜ;x2‚šÃ(çôãs'FNA/ buîP‡ šw¬åðP¬ïØ™ oo±Úº¡ÁÜZæ o·“lÆÈêFØd×uV{ó Íjo©± ³ñïªKöG>C ®šÎů’2Õ¦zå€òUODµiÿÕïp°7µ'1;G9¥ÇŸÀ—ÍQá|Çõ†OvŒ4þe׉BÕ0’'t,)×ûA»ö‰]P{•7§+sR‡R߶µB'ˆw'cL6±¤n˜Õ†Ôu_«†¦ã I½‡•“¬¶&§§/Ýy#ÚÚjßÛiNõÍü‰8• ±p‡?:¯3âg©©a傺 ‹ÞÕà¢Ô¸©j†c0ôºYùÐ0 Ã5¨m0•s?ðð™ÿGE_êÃÿñ‘Ú!=Kê‡ £™£˜3µõž¬Yñž¬,õɦ¨ÿ ÏŒ
endstream
endobj
15 0 obj
<>
endobj
222 0 obj
<>stream
xœ=R{LSw¾—ÒÞ «U©ñÑÖ&:2£ÙtòÐÄ SÁ³jJÛQ¬m¡-Ð"â mÏ-Òú g+*"5eXupÕèd‹3.™3†‘˜,™Ód.Æ%,æ\ò3q³ýs É—s¾s¾¦’“(š¦™âE•Ë
Þ•™ÂþËy”ýôù\ûÀÂVG›úû£‘ømýÛ•òáRÐU9ÊX™På æEÓ†®i áDH—c
òŠ¯‚NÏÞÿÎŒ
Y*º”\ × ö tõªž0gหà N½²>d è€5“< éºp]¸Y7¹Ç÷³ògƒî±ÖÍs?χ†…õ¯ P¶÷´Ã~`íàv¨Í8áð×A?œŠ(98{ªÓ?bº
a`00ëzSÌxQ% ×÷›Ÿ…LËÝq|Ëãš0=LåEÂBécÔO ý:üýcå M%³Þd·n½JìOˆF²°\Ãø™íak™0ê 4óøÅ%\:˜Å”Õ8 Q’.oRÇ{aç?Ê’p7œëm…VÕ&BÐË¢‰yVòÉÙJd ïŽ9û¢‘k—œ§=~åÅ@”ëv,¦]£ªeä|‰‡“̹Kp†ë¡RÞøø«g¯±Í¸L‘Ë,ÉoµUêbß"…Ë{nu*eÂDBá ž>+Üá+ô)0g‡zÁß ƒgŒÞí¾v°A•ßÊ%4Õ0=Ðíí>ÒáoGÇŠ¥srÇyI½¯Ìkìò=b°€”‘t²¸ÙY; #áÿm® ÎÃÞ°oÊ’.gW€.xLõiL"³Åzä÷£ÿ2DaØ{y
UÂÈ&ÓïŠ qË;J° g¥Ë[p©À†”þïÂ7/yææ¨X~³íØÍmÏæaÎÄsTaÆÒ$S%o)‚*‹½‰
»
<ÊôÅnôße@¦•j ¢^¯²Tï% (S“W„¥)ñ TŠ’‹ÒiœTFQÿ©‹@g
endstream
endobj
103 0 obj
<>
endobj
223 0 obj
<>stream
xœe“{PTe‡Ï^Ø= Bp<⨳M
šÊ-Í@+.‚
ºN
˜¦°¬²²k», –eAˆKŠï¢ ¸€î‹ÜF o!¤1"sl*ÌÒ,
±hrúvæØL“¦¿¾ï÷Ï÷¾ßó>¯ 1@ ‘'&††L^ÜóîùB÷+"àLn‡ûoð—¸s¾G Ê÷E* ´õeL$èsÊbô™&F“®6Èí\,
_¹T.‹Ò©ÍNe†L®4¨U:¥ZY‚~§Fe0ÉV ™ÁÁF£1H©ËÒ3éï,^*3j jÙ&U¶ŠÉU¥ÉâôÙ¥N%›ê.hêˆÑë2s *F&ק©˜ Ãfè3™låÕ®t-†½mÄ°D,‹Áâ°µØ{˜ óä?‰‰ùÐ/xMÐ/\'üTä'2ŠÄµîfows9‹n²‚Ë.ät‰ÜéHK"ß ß81'ZÄùrÄØR$D±GÈâ”Ü
2JþÍÃ_®]»1òE|H<2ŠæŸà³èK6‘õw¡—?qE &òÊ५_F/_ û¶ú§ ><[Ò
8Œ!ù„=~u[ŠI«¡‰ñŽ
›ŠŠ–˜ÐêÚÀFŸÚ®x‘Ð[tv1`¦¾*°hx²"ZæBq÷ü‰óˆAÈ_¯Îgë’¹qWãÿ ˆÜ >ØÛ…óhWJÁ ¹i¦ôü(\¾ãø©¾»=ha5=Õ!yü«@ŠpÏ!Qüóÿ̵Fb„ÜÇÁ>åi^ˆyÓ| ‰‚mbÒhqn«xTú?‰¦¦2Íb.ÔÊ{»%Ž£Ðƒ$ë s³9Ï%œç=€H4§÷gg{”›J÷å•Ñ9[’Jô ‘ý滸eˆ´^ø
.Â0c]€?—
ù²´Þ5~O„jÜyKœ¼Ù¼yœw¯äÖuè¤öZÓNØ[Û‡VyÕ;ÉË©ÍÒg?tB=Á
H
²x©Úø„Z_H0égBQ—†Pò_Ç`ž %ºN
n ñ'þ*F…h
™¤ì½tùܹ‹ŸŸÙ¾y“Bñ ª&«*Nú 0:r¿³¤#¿vÔ·V ¶Ôd¶”ÕÞÔRßђוTüá~M2m®S M|ÙšÈ7S›v7äч›KrtsAmc¬EQ)°ŠñO6 YhÖ“á {Lý[ŽQ{*›C•” (,€r(²ÛöÛ¡ª+mÕµ8òä®’‘gÏ ±vwÛig£F¿<`…"25~Ð]ÈÓËs‰P¿û:9µoaÓÖxöÓBŽœ–¿Ÿw¶Ä»¸Î cEïÖI8ÓA);ÃåIÍ›ô^/±^^.¯™öHRªã
endstream
endobj
13 0 obj
<>
endobj
224 0 obj
<>stream
xœµZxU»žeÉÎЂƒ àLè½…ÞK¤K %@
i’MïuSw÷ÛM6½g7} …„N€€ˆ "ˆ€" "–ß3ˉþ÷Ì.(úëõzŸ{Ÿ<,Ì™ù¾ï¼ßû½ïY$TçN”D"‘9¬\;Ñ^üÓ0¡¿DÐIx]êƒ3ž˜ »ºwÞ;`ä¹ÞÂÎWÐÁžhk/ª³D"NLsðˆ òñÞb7Â}¤ÝÄ3¦±³Ÿ0a†Ý?Ï w7¹ÝJ· ž~n!䃯Ý:w ÏH»³w„„Ì ?><<|œ›_ð8ÿ ï¹#ÇØ…û„ì°[ëìæéa·Ø_ b·ÊÍÏÓÎ Ý8óO¿€ÐÏ »•þ žAòEž¾!nEm^ _è¿Ù!ÀiQàA‹ƒ—„¼º4lY¸Ûòˆí+"ÝWFy¬ò\íõ–÷š k}Öí\¿ËÑwƒßÆi§Ï˜9ËyÎð¸#FÎß2:¾û˜ ÛÆFï:abŒý¤ÉSM•t³¦¨AÔjj0õ5“B¡fQC©µÔ0j 5œZO ©‘Ôjµ‘Mm¢Rc¨Í”5–r¢Qã¨-ÔÔxj15ZBM¤Þ¤ì©¥Ô$j5™ZNM¡VPS©•Ô4j5²¡:Q¶T?ª?5€Š£8Š¡â) ª Õ•HͦºSI” Õƒ’Ss)kÊŸêIõ¢P¯P½)Õ‡z•b©¾T8õšD-é*éF9‘M¥:S*II’ä~§àNw¥>Ò£uη¢ü¬>•%Ò}éÍô/Œ+ÓÒeT—ä®ó»¾ÝMÑ}m÷3=lz챶²6X×sWϧ½Vö2¼B¿Ò{c ¦îÕµ¯Ö²Ùý}ö=ûÚÌ×Â_{bÓ``ûn¿Þý ¯þ‹ûô?Ò¿cÀì ~x}éëœ Ü5¾;_Ï?µÓÙ5ضûØî§ãú
üfÐÔAË ¼l°aÈ¢!‡Îš8ìá³¥µ)ŒÈÕ(,ÒK„×L+Ø´|Uf,Ä‚J™=; ÚÄn÷\®fäô»Z-ìZ8
Õª¶îƒ´›&È@>g‚VWpÙÚ ìž¨‹(mý6A'§+´7È-µp*,‹–A$Ķ2¸L(gƒïXᙵÐFa€^‚¨ Èý‚TXƒÒXx µ!»åû¶fúÀ(ðœžÎ¨¿—á Vrúƒìd' WÒÎ °Œ¼¤ZÛN^a„ö‘-‡CúõæðNìÌzs±üXÀ!õ;° šáÝúCµ7À>Ø YãQ¿
V€ì€•[ý·l‹ðƼÃ&+’Õ§7¤Â·Â vÏÉÃù€1ÒëT*rk hI-ä´Ñ §R*¢y<×âU¨=%W•™¶†êôFÎH‡¨f‚?¹A°eÁ‡P ,÷FÞø¡
Þü¢B²
í-Ra#Ü‚JsÃé…ªÜ m¥MÃŒ¦ñFIû!¸Zj²3ÍaKA§HQ«)œÓlçÓK À/ÇöärÅîh2ž€–¢éÐ`Ô)2êÔd>OÂÌ£€y¯Û¡ýèƒW~üÊ ÒóÚxPæSézRÞ¼ÁˆÆë…±å’ . âëR¤Â3X >Ò¥A ïƒè§‹úŒýK&m]‘¦ä/Ò˜v93Ù…ïØùà™'ä²Pš¼âºCÇÊš¹vv-™<×W^P·TÄè¡–± B½IJ²¥ÂnÓ 6» 4ŦB×±B–€ƒÊeYȪþ&šJâ™,ë°û¹«UˆF]Á N²bTb*KÆÃÆãeÀà92kSüóM}ý†Ð÷¾tÿŸB}/C³P?4
DŽ¸?gò¸ïσ,Hö[pú£ì6¼ïÞºôÐ"î°N=ví‚n«·O#Ø
~«_ÃuTLzs¹°’
—y‹lö85lU§Ác±
îóÍH$i?XÕÖÈã•ÿ}_®@Y,슔‡„x{y*c€™÷Ö×HŠº_þìêýS6òÖ¦q¤ÏQS½
¸‰œÊ¥¦Þ(‡
•ã Á‹ð R2K3Uܧ¿Éó—£âPÙ”ßÑܤ”YÚÏV††Cýæ"<„)—¢`«ŽV¹^f)Qõ¯ÝÜNا—…}~8ÿÓ
))X,û¨åþÇÙZPgpIiÑ)ÀÈ+Šõú‚šº€Zשòñ)œIe¸ßŸQöÔA
|øœñDðç5’¬ú¬ÚÈ/KVëË¥Âý 5ÿ”¬Rû%yF|Fó3üèɪüF i¿ ¿ÎÝ9Í’î4ÅαÜ$”û<ÝWdh7â$]k¡¯B/L-•ì9„"IÑMa–¹Ï’"B“9ß*ßÌ]¤Š=¼—®O€ Í;øÝþ{“'žJ(PV…—Æ„‚?ã´eÒÒ-ÍOB¹´RШ5ªŒ4P“ ©‘< @GBj®N£1”pº,Ð7om‡`~Šö‘Þ_sðòÝ Và7ª9mÂo½ôËÌ"o\uj ëRB ±a–I„Y–}x³â½&¾tמÙÀdCf1áŒ^„’ûÑt½äû h@¹Í†±h D+Beê±Þ£'(™ðÏq=¥WCNžßsî
÷vèzÚAîæ± ”p–¡z ØhÞë7¥Â×ÂlSzîNo”«f€œ¤6ã9>o\¬À'HÔs×oíM`"òlÝK<ë ÌmâQ):Kÿî.Â"ý[^ ]ô¶°}æ%ôTçEóg¤ 9É¡Ïh¯ _)”\•¢(Ó6¹LMRdðø_µ‰†€cÌšî¤ÙÐ|¡éÆÀ‘^8 ¡QÊÏ] g$å‚m±„™E(Ídm£é¸&ûÍ|jöŸþ*Ì“H¨}1óðxY(¨ÕIXÞñ¾
ÉÊ[½¤Fè$^†³9y"y1yÉÅá‹D6O"²9ó»²&$!Hbdx_ÇëV‘Z(çÐ
¢šWÕœˆeQ[p7QíÈ^†'©béy):)
ççC/3º6¬"·2ÃGâWqŸ‡#Q§ëÛÊ
ùÅ4øëhþE/ë¸Ê’MWƆïØ.ß L ¦rц+ù-å{x}}K}œƒçÜèü(²í‘/™°•ÂÄJ)
3Md ÔšPò¶±rÙ¨‚šd¦c -ÿë2y¡‚ÎNUN¼Ð¯ã¾Mn¬FEZ›¡Ñ2Â%ÚG šá¶ÁlÒ6@ na«œïXJ[0P† Ì~3éœTèƒbØr-”=uü÷À²ICp/lóÝ("Ç» B”!35#%‰ÌO 8íÍ7`܆բ|)c³ÑÄ/Jká'ÈÄ5>$CmX…iv¹¨ã¼ HMÑW,rÇc=^HlñH<™ˆ.4ODh &¡m ¾ï±C±Í7(©ûëǨÿœŠ ð€ñ£xktÂL(S/A’ó÷‰8Ÿ/*1+#¦QٽÇ[³‹T)ù\š:(äLHqtEeqqe“·q˳ ‡r¸Ë ù'øæß*sÑoì¯$‚M´SèÔ)’#âãçÈP—Ÿn<}4ê ÜŸÇ÷~í…¿`*TÆ¢*‹»úZF ¶ru¢Z§‰† »ã©;¤5HÞ½„ .í;FÊ–²G|[ ˜{?ø¸&©y×n~_ËЖ#¿UŠ´T$0±¹ñÅÙ¥ºòÒØÚ =vÅÄr~;
ˆÍŸøæ’¹k¼rùø˜H9™k‚²S·Åmó†Ìâ¯×¢ž¨Ûã“ת’ßY]ÏmªÞ S`$Cd™"7± P’Y’[È)¸kÈ„œ¤(Ô|êjyÀ.ØŠ#I'ÕY)”UÉmi»ýêòkÖ1cóY"¢‹dPù†Œ M 蹉^?)LÓíã…΄¶ZÂŒ¦‰5’ö3èÊ)ò¦°›
œÛà=æòéóŸ éåxªk&§‡´Üç¾9›½Ÿ2
â’¹«¶œ[šïB¼Ÿt¦ýÐ-%.Mî|ƒGC⇑
I§b SŽ„Ô;Â:fþ†EÓWæ pâÖœH»¢Þ£™ö…ßu6ûÝL6?‹ËÈ64e5ºŸ÷¹CÚùæCÔéÝC{x¯CÎy ¹ ¡-" Š?bÍuð¹}ŸÂ…¢.¸,Ø?,4 °<´º®¬²’ÃÃÍ…¸–#Bi½>aÁ•/†pÕºì2¢m*¢Jƒƒ¢"ƒ·´ž¸òιûœ ž ‘IBí• ÷‰[ hšÉv<’EšÏ
‘}N#²'⩲Uz¥& B˜#í±#9o¹l·ö{ØG® `·¹ÂÞôH(ÜË Fª´9ÅÙZ#”y@Žw!¶7Ÿ"ˆúT¶‹rNT¨¥,h’³AéçÛ³³/=¨1ˆª3\H4U Ø™–‘S¢ÎO„h&<K´”䙋ôÙ+Â-¶ø¨Qߦyn“\ü _”à]ué.R¶Te’*éÛ੨ÓUÙÄ+ׄJsÙ²ÉÉ|¾±'¡P™™—å[àw¬µÁ“…TR=Ñ_× ‡jóñ÷<3~]ÓNú%ß9uüb£‹ÉHËlÑ-¡™B±
šÕQ¬‹Ñ)³E9œ‘¡+ýr˜A¸üa>Ù‚E·¥‚¿IÂVà÷ UAZ*óÅ[I §—æœ+ÈËμFvŽA;dñ˜ ax:à·lÀ½u?ì+àÚh@#+sä"#¢ñÑmƒ¨—ü›Úxz$ý7uðß”i»; (,Ì7Ö-kìpÖDiI„¶¹ M×”2x [ Z ø‚j
å5œa©g¥¤õ0:Ü*EÇÑÏl[ÍG‡á3æî´³ãGÌY8Á'קևˋӨ/;rÞü&,d>]ú ’>¸õãw‡æ åð€{l\Ž{5 c.|ÐzñÊ{ V¹8ÙÅ-ÞÀ¢ ³«£ûÂ*Ûys7ΚºðÜíOÞ>¡Îòâæ[ôÂ0òò[(í–T脲8aÓêà
é
A\¦,KÕ˜ MLyLY``tTàÊ6·»èÔÙ"?TŽ;_œ„;m°Íƒ‰O®6· ×søÕ©ì
8žXÝL(朆£Õ¥55ÆvxŒ›sCôN0b˜iž£'qæ:"Å#ÉÝGR´BèÃÖ„‚äá!A~U5å†Zßíü GVaGšoYùä/VFuta‰ñ\´j~Š8VTLª.U—uù*êÒ¤<ç$
( +ËÊÌЉÅZ ·ŽJ J‘J¤—×ð€â$û ÑCŠ‹¬ˆÄB\Ù$i7
”š¦¡ÙÂR(-‹‚¾ãŽ,6"#J ˆîó§ÿB¢FˆQKÐb½-~f5ÉšTˆƒX˜¹xqb¢ø%ž9ÈœW‘ì\H‹û‹ k
Ê4æ/ß—ÜBŸH…׉c”ËÃÂwA ĦûÂóà BÀ Bƒ¶n,Œµ1
úÝPDÚ«>L ¯«€&(¯:rBìaø#´€´ñdsIo!¬:Kƒý›—.åäˆíÇ(Rg/À²•î-ƲòꚈr¿€¸5‡ÖöýG÷[ ½p†áÙz½äÛv)úöKmTÉð§ëÐ @®€6 A³ƒºæZ •™ªM‹›á0Ò‰Û4,ÄpO°/ÄÝNؽƒ»ßZFÄz†N›ÉÿöTA Û€´,\W ^ëóê>ãB0i©ª%¨J¢ø'ÃNã€]oØŠgawUXŠ¢Seܺòí1îøwˆÔ]4U
=ê¦ìÄŸ’ör$¹€
/ I¹TøHØÆ–«5!œlËõ•9þÀ ž0–Ø·^÷ÇþpöpSc%Ÿ³¡-¼˜»…RðÔÅKð<oÅkÐ <mÚ}N[vƒß›¬ ˆÉNh.ECâ‰Išè:"ÚØÓ71‹ì‰e[‡¢ahi·ùvXmŸ2îMßÔ¦:~ÙaV<”Œ
‘»8nfÁš/™‹g¾¼Út$ts=_jˆI
§7=³o’ ¦IŠÒq:Û4ê™ý£&Üï—¢j´s
¨¥ µ’þÒ$£he¿bÅOPQ1 6b#ý+–ù$‹…ÈR¢™Š,ÈüJòÃW¾’¢M¿٪0CPph¤¿yde•ÁPÅ¡5}kC‰²
2„UU–—’.6{€.-¨çg
â7AÈ“ ö…Ål
(Ô*ñ"Áà.ÈJöÝÝæwrª}ê87¥o‚¼2®¤´2¿þøÖCs'à®›1Åcú¶óÏT º‰&Ò‡3ã¶ó¸æ¿¿S”À/8FB¼»mLcÏ…íóxÑEyYºL.=]Ct£…ØÔå«]¶ñiJtš¥‡¯_Eô‹ (§äy†ÂrÂ-Éê°Ô‘“ 5ݧÀ¢ ’ìÖù §áùw÷àd"®~xýÐG
ZH®ä 4ijuBb’‚¼-)=ª$‘Áóé— Ò•@d¼)‘Åý¼ ýb?Ê õ“Y£hM»$HQ%ZöãGâ
bQŽ^B¬Tü«ïˆ
§Í‚=äújÌ›éKORæ7òÖϼÍ%æ%}æ%–ü¯pq àCôìkde” ûí$êfšÍ†Ê”QIëÑɉk‰ê&Ž]VSñî{Õ•h ²;} 3ˆžð1¡@fɈ)›Bº¡ºhwmD™¢
ÔJ®ìƒöÀùüÄ¢ñS¬]Nl³
$´Y.|ù-Z‰zÜ¿X)ùà>Úô€l7Âl”:M
‰ŒBGäûaÙçÍoŒÆ¯-Ùá´eFÅûr~wªQüƦ÷Œõ´ÿr¡xÒõÅý§_-¸2º„»[uú#ø„¹1ą̃á V-t¯O*2TÕí. M1GÔüÁ× fÏ…˜‘ÊurWÞÏÅG ¶”qFÁ…Ô÷èûRô³‰gË@›¤„ø$·wx[ÉQñÚK¥Xhñê–ÿó‡“ÐûOÃè¥B¶£N³d‰è/ÐZ=â¯åé%OkPôM)zU¸Ì ˆmP“ñƒ¬®Ü.ÌPéRˆNKä×oQÂRتÈNN'!“)Ño>›uÂŒ\@jRI1*'¶(%-†lW™‡´ÅUþnpš'ËÝ8;® ðßŇ7¸é73Ó›ìþïÐ?šµ ļ¸×Ø^ߤÒs.*Ÿ¤¨Üèâ^L Ç`š¶&FΡùçfdØ-6v½ÐëÚyš¾{}N÷÷ ¨ÿNæªê
endstream
endobj
239 0 obj
<>stream
2011-08-12T18:13:18+02:00
2011-08-12T18:13:18+02:00
dvips(k) 5.99 Copyright 2010 Radical Eye Software
cuba.dvi
endstream
endobj
2 0 obj
<>endobj
xref
0 240
0000000000 65535 f
0000142883 00000 n
0000224029 00000 n
0000142609 00000 n
0000137750 00000 n
0000000015 00000 n
0000005026 00000 n
0000142949 00000 n
0000147619 00000 n
0000161023 00000 n
0000147179 00000 n
0000158221 00000 n
0000156633 00000 n
0000213913 00000 n
0000156141 00000 n
0000210714 00000 n
0000154478 00000 n
0000199743 00000 n
0000142990 00000 n
0000143020 00000 n
0000137910 00000 n
0000005046 00000 n
0000011457 00000 n
0000152853 00000 n
0000192286 00000 n
0000152489 00000 n
0000189033 00000 n
0000151503 00000 n
0000186341 00000 n
0000150814 00000 n
0000183898 00000 n
0000150605 00000 n
0000182670 00000 n
0000149885 00000 n
0000178210 00000 n
0000148532 00000 n
0000169854 00000 n
0000143094 00000 n
0000143124 00000 n
0000138080 00000 n
0000011478 00000 n
0000017073 00000 n
0000143264 00000 n
0000143294 00000 n
0000138242 00000 n
0000017094 00000 n
0000022544 00000 n
0000155462 00000 n
0000208581 00000 n
0000143370 00000 n
0000143400 00000 n
0000138404 00000 n
0000022565 00000 n
0000029942 00000 n
0000155049 00000 n
0000205297 00000 n
0000154045 00000 n
0000198351 00000 n
0000153385 00000 n
0000193567 00000 n
0000152173 00000 n
0000188300 00000 n
0000143498 00000 n
0000143528 00000 n
0000138574 00000 n
0000029963 00000 n
0000034466 00000 n
0000143723 00000 n
0000143753 00000 n
0000138744 00000 n
0000034487 00000 n
0000040426 00000 n
0000150449 00000 n
0000181968 00000 n
0000143851 00000 n
0000143881 00000 n
0000138914 00000 n
0000040447 00000 n
0000045719 00000 n
0000144001 00000 n
0000144031 00000 n
0000139084 00000 n
0000045740 00000 n
0000050481 00000 n
0000149035 00000 n
0000170998 00000 n
0000148235 00000 n
0000167826 00000 n
0000147460 00000 n
0000160185 00000 n
0000144096 00000 n
0000144126 00000 n
0000139246 00000 n
0000050502 00000 n
0000053529 00000 n
0000146892 00000 n
0000157422 00000 n
0000144235 00000 n
0000144265 00000 n
0000139408 00000 n
0000053550 00000 n
0000058008 00000 n
0000156421 00000 n
0000212241 00000 n
0000144385 00000 n
0000144416 00000 n
0000139581 00000 n
0000058030 00000 n
0000062594 00000 n
0000155277 00000 n
0000207509 00000 n
0000144526 00000 n
0000144557 00000 n
0000139755 00000 n
0000062616 00000 n
0000067869 00000 n
0000144735 00000 n
0000144766 00000 n
0000139921 00000 n
0000067891 00000 n
0000071600 00000 n
0000144854 00000 n
0000144885 00000 n
0000140087 00000 n
0000071622 00000 n
0000076508 00000 n
0000144995 00000 n
0000145026 00000 n
0000140253 00000 n
0000076530 00000 n
0000081099 00000 n
0000145114 00000 n
0000145145 00000 n
0000140419 00000 n
0000081121 00000 n
0000083418 00000 n
0000145244 00000 n
0000145275 00000 n
0000140585 00000 n
0000083440 00000 n
0000087655 00000 n
0000145330 00000 n
0000145361 00000 n
0000140751 00000 n
0000087677 00000 n
0000092863 00000 n
0000145427 00000 n
0000145458 00000 n
0000140917 00000 n
0000092885 00000 n
0000097914 00000 n
0000145601 00000 n
0000145632 00000 n
0000141083 00000 n
0000097936 00000 n
0000103226 00000 n
0000145731 00000 n
0000145762 00000 n
0000141249 00000 n
0000103248 00000 n
0000107672 00000 n
0000145850 00000 n
0000145881 00000 n
0000141415 00000 n
0000107694 00000 n
0000112858 00000 n
0000145980 00000 n
0000146011 00000 n
0000141581 00000 n
0000112880 00000 n
0000116766 00000 n
0000146121 00000 n
0000146152 00000 n
0000141755 00000 n
0000116788 00000 n
0000122486 00000 n
0000146229 00000 n
0000146260 00000 n
0000141929 00000 n
0000122508 00000 n
0000127840 00000 n
0000146392 00000 n
0000146423 00000 n
0000142103 00000 n
0000127862 00000 n
0000133026 00000 n
0000146544 00000 n
0000146575 00000 n
0000142277 00000 n
0000133048 00000 n
0000137029 00000 n
0000153683 00000 n
0000194612 00000 n
0000146696 00000 n
0000146727 00000 n
0000142443 00000 n
0000137051 00000 n
0000137729 00000 n
0000146828 00000 n
0000146859 00000 n
0000157670 00000 n
0000158475 00000 n
0000160414 00000 n
0000161468 00000 n
0000168110 00000 n
0000170093 00000 n
0000171589 00000 n
0000178513 00000 n
0000182191 00000 n
0000182904 00000 n
0000184159 00000 n
0000186698 00000 n
0000188535 00000 n
0000189355 00000 n
0000192540 00000 n
0000193808 00000 n
0000194899 00000 n
0000198591 00000 n
0000200127 00000 n
0000205551 00000 n
0000207744 00000 n
0000208990 00000 n
0000210955 00000 n
0000212514 00000 n
0000214493 00000 n
0000147057 00000 n
0000148106 00000 n
0000148920 00000 n
0000149529 00000 n
0000150301 00000 n
0000151099 00000 n
0000151196 00000 n
0000151923 00000 n
0000152401 00000 n
0000153251 00000 n
0000154375 00000 n
0000154953 00000 n
0000155839 00000 n
0000157208 00000 n
0000222601 00000 n
trailer
<< /Size 240 /Root 1 0 R /Info 2 0 R
/ID []
>>
startxref
224231
%%EOF
Cuba-3.0/demo/cuba.F 0000644 0000000 0000000 00000004764 10726003111 012673 0 ustar root root * cuba.F
* Fortran chooser for the Cuba routines
* last modified 3 Feb 05 th
#define VEGAS 1
#define SUAVE 2
#define DIVONNE 3
#define CUHRE 4
subroutine Cuba(method, ndim, ncomp, integrand,
& integral, error, prob)
implicit none
integer method, ndim, ncomp
external integrand
double precision integral(*), error(*), prob(*)
character*7 name(4)
data name /"Vegas", "Suave", "Divonne", "Cuhre"/
integer mineval, maxeval, verbose, last
double precision epsrel, epsabs
parameter (epsrel = 1D-3)
parameter (epsabs = 1D-12)
parameter (verbose = 2)
parameter (last = 4)
parameter (mineval = 0)
parameter (maxeval = 50000)
integer nstart, nincrease
parameter (nstart = 1000)
parameter (nincrease = 500)
integer nnew
double precision flatness
parameter (nnew = 1000)
parameter (flatness = 25D0)
integer key1, key2, key3, maxpass
double precision border, maxchisq, mindeviation
integer ngiven, ldxgiven, nextra
parameter (key1 = 47)
parameter (key2 = 1)
parameter (key3 = 1)
parameter (maxpass = 5)
parameter (border = 0D0)
parameter (maxchisq = 10D0)
parameter (mindeviation = .25D0)
parameter (ngiven = 0)
parameter (ldxgiven = ndim)
parameter (nextra = 0)
integer key
parameter (key = 0)
integer nregions, neval, fail
if( method .eq. VEGAS ) then
call vegas(ndim, ncomp, integrand,
& epsrel, epsabs, verbose, mineval, maxeval,
& nstart, nincrease,
& neval, fail, integral, error, prob)
nregions = 1
else if( method .eq. SUAVE ) then
call suave(ndim, ncomp, integrand,
& epsrel, epsabs, verbose + last, mineval, maxeval,
& nnew, flatness,
& nregions, neval, fail, integral, error, prob)
else if( method .eq. DIVONNE ) then
call divonne(ndim, ncomp, integrand,
& epsrel, epsabs, verbose, mineval, maxeval,
& key1, key2, key3, maxpass,
& border, maxchisq, mindeviation,
& ngiven, ldxgiven, 0, nextra, 0,
& nregions, neval, fail, integral, error, prob)
else if( method .eq. CUHRE ) then
call cuhre(ndim, ncomp, integrand,
& epsrel, epsabs, verbose + last, mineval, maxeval,
& key,
& nregions, neval, fail, integral, error, prob)
else
print *, "invalid method ", method
return
endif
print *, "method =", name(method)
print *, "nregions =", nregions
print *, "neval =", neval
print *, "fail =", fail
print '(G20.12," +- ",G20.12," p = ",F8.3)',
& (integral(c), error(c), prob(c), c = 1, ncomp)
end
Cuba-3.0/demo/demo-c.c 0000644 0000000 0000000 00000007141 11621250535 013163 0 ustar root root #include
#include
#include
#include "cuba.h"
static inline double Sq(double x)
{
return x*x;
}
static int Integrand(const int *ndim, const double xx[],
const int *ncomp, double ff[], void *userdata)
{
#define x xx[0]
#define y xx[1]
#define z xx[2]
#define f ff[0]
#define FUN 1
const double rsq = Sq(x) + Sq(y) + Sq(z);
#if FUN == 1
f = sin(x)*cos(y)*exp(z);
#elif FUN == 2
f = 1/(Sq(x + y) + .003)*cos(y)*exp(z);
#elif FUN == 3
f = 1/(3.75 - cos(M_PI*x) - cos(M_PI*y) - cos(M_PI*z));
#elif FUN == 4
f = fabs(rsq - .125);
#elif FUN == 5
f = exp(-rsq);
#elif FUN == 6
f = 1/(1 - x*y*z + 1e-10);
#elif FUN == 7
f = sqrt(fabs(x - y - z));
#elif FUN == 8
f = exp(-x*y*z);
#elif FUN == 9
f = Sq(x)/(cos(x + y + z + 1) + 5);
#elif FUN == 10
f = (x > .5) ? 1/sqrt(x*y*z + 1e-5) : sqrt(x*y*z);
#else
f = (rsq < 1) ? 1 : 0;
#endif
return 0;
}
/*********************************************************************/
#define NDIM 3
#define NCOMP 1
#define USERDATA NULL
#define EPSREL 1e-3
#define EPSABS 1e-12
#define LAST 4
#define SEED 0
#define MINEVAL 0
#define MAXEVAL 50000
#define NSTART 1000
#define NINCREASE 500
#define NBATCH 1000
#define GRIDNO 0
#define STATEFILE NULL
#define NNEW 1000
#define FLATNESS 25.
#define KEY1 47
#define KEY2 1
#define KEY3 1
#define MAXPASS 5
#define BORDER 0.
#define MAXCHISQ 10.
#define MINDEVIATION .25
#define NGIVEN 0
#define LDXGIVEN NDIM
#define NEXTRA 0
#define KEY 0
int main()
{
int verbose, comp, nregions, neval, fail;
double integral[NCOMP], error[NCOMP], prob[NCOMP];
const char *env = getenv("CUBAVERBOSE");
verbose = 2;
if( env ) verbose = atoi(env);
printf("-------------------- Vegas test --------------------\n");
Vegas(NDIM, NCOMP, Integrand, USERDATA,
EPSREL, EPSABS, verbose, SEED,
MINEVAL, MAXEVAL, NSTART, NINCREASE, NBATCH,
GRIDNO, STATEFILE,
&neval, &fail, integral, error, prob);
printf("VEGAS RESULT:\tneval %d\tfail %d\n",
neval, fail);
for( comp = 0; comp < NCOMP; ++comp )
printf("VEGAS RESULT:\t%.8f +- %.8f\tp = %.3f\n",
integral[comp], error[comp], prob[comp]);
printf("\n-------------------- Suave test --------------------\n");
Suave(NDIM, NCOMP, Integrand, USERDATA,
EPSREL, EPSABS, verbose | LAST, SEED,
MINEVAL, MAXEVAL, NNEW, FLATNESS,
&nregions, &neval, &fail, integral, error, prob);
printf("SUAVE RESULT:\tnregions %d\tneval %d\tfail %d\n",
nregions, neval, fail);
for( comp = 0; comp < NCOMP; ++comp )
printf("SUAVE RESULT:\t%.8f +- %.8f\tp = %.3f\n",
integral[comp], error[comp], prob[comp]);
printf("\n------------------- Divonne test -------------------\n");
Divonne(NDIM, NCOMP, Integrand, USERDATA,
EPSREL, EPSABS, verbose, SEED,
MINEVAL, MAXEVAL, KEY1, KEY2, KEY3, MAXPASS,
BORDER, MAXCHISQ, MINDEVIATION,
NGIVEN, LDXGIVEN, NULL, NEXTRA, NULL,
&nregions, &neval, &fail, integral, error, prob);
printf("DIVONNE RESULT:\tnregions %d\tneval %d\tfail %d\n",
nregions, neval, fail);
for( comp = 0; comp < NCOMP; ++comp )
printf("DIVONNE RESULT:\t%.8f +- %.8f\tp = %.3f\n",
integral[comp], error[comp], prob[comp]);
printf("\n-------------------- Cuhre test --------------------\n");
Cuhre(NDIM, NCOMP, Integrand, USERDATA,
EPSREL, EPSABS, verbose | LAST,
MINEVAL, MAXEVAL, KEY,
&nregions, &neval, &fail, integral, error, prob);
printf("CUHRE RESULT:\tnregions %d\tneval %d\tfail %d\n",
nregions, neval, fail);
for( comp = 0; comp < NCOMP; ++comp )
printf("CUHRE RESULT:\t%.8f +- %.8f\tp = %.3f\n",
integral[comp], error[comp], prob[comp]);
return 0;
}
Cuba-3.0/demo/demo-c.out 0000644 0000000 0000000 00000000552 11663424333 013554 0 ustar root root VEGAS RESULT: neval 10000 fail 0
VEGAS RESULT: 0.66481073 +- 0.00049218 p = 0.089
SUAVE RESULT: nregions 7 neval 7000 fail 0
SUAVE RESULT: 0.66444529 +- 0.00056577 p = 0.210
DIVONNE RESULT: nregions 14 neval 3052 fail 0
DIVONNE RESULT: 0.66461951 +- 0.00063503 p = 0.000
CUHRE RESULT: nregions 2 neval 381 fail 0
CUHRE RESULT: 0.66466968 +- 0.00000000 p = 0.000
Cuba-3.0/demo/demo-fortran.F 0000644 0000000 0000000 00000010335 11621250562 014356 0 ustar root root * demo-fortran.F
* test program for the Cuba library
* last modified 12 Aug 11 th
program CubaTest
implicit none
integer ndim, ncomp, last, seed, mineval, maxeval
double precision epsrel, epsabs, userdata
parameter (ndim = 3)
parameter (ncomp = 1)
parameter (userdata = 0)
parameter (epsrel = 1D-3)
parameter (epsabs = 1D-12)
parameter (last = 4)
parameter (seed = 0)
parameter (mineval = 0)
parameter (maxeval = 50000)
integer nstart, nincrease, nbatch, gridno
character*(*) statefile
parameter (nstart = 1000)
parameter (nincrease = 500)
parameter (nbatch = 1000)
parameter (gridno = 0)
parameter (statefile = "")
integer nnew
double precision flatness
parameter (nnew = 1000)
parameter (flatness = 25D0)
integer key1, key2, key3, maxpass
double precision border, maxchisq, mindeviation
integer ngiven, ldxgiven, nextra
parameter (key1 = 47)
parameter (key2 = 1)
parameter (key3 = 1)
parameter (maxpass = 5)
parameter (border = 0D0)
parameter (maxchisq = 10D0)
parameter (mindeviation = .25D0)
parameter (ngiven = 0)
parameter (ldxgiven = ndim)
parameter (nextra = 0)
integer key
parameter (key = 0)
external integrand
double precision integral(ncomp), error(ncomp), prob(ncomp)
integer verbose, nregions, neval, fail
character*16 env
integer c
call getenv("CUBAVERBOSE", env)
verbose = 2
read(env, *, iostat=fail, end=999, err=999) verbose
999 continue
print *, "-------------------- Vegas test --------------------"
call vegas(ndim, ncomp, integrand, userdata,
& epsrel, epsabs, verbose, seed,
& mineval, maxeval, nstart, nincrease, nbatch,
& gridno, statefile,
& neval, fail, integral, error, prob)
print *, "neval =", neval
print *, "fail =", fail
print '(F20.12," +- ",F20.12," p = ",F8.3)',
& (integral(c), error(c), prob(c), c = 1, ncomp)
print *, " "
print *, "-------------------- Suave test --------------------"
call suave(ndim, ncomp, integrand, userdata,
& epsrel, epsabs, verbose + last, seed,
& mineval, maxeval, nnew, flatness,
& nregions, neval, fail, integral, error, prob)
print *, "nregions =", nregions
print *, "neval =", neval
print *, "fail =", fail
print '(F20.12," +- ",F20.12," p = ",F8.3)',
& (integral(c), error(c), prob(c), c = 1, ncomp)
print *, " "
print *, "------------------- Divonne test -------------------"
call divonne(ndim, ncomp, integrand, userdata,
& epsrel, epsabs, verbose, seed,
& mineval, maxeval, key1, key2, key3, maxpass,
& border, maxchisq, mindeviation,
& ngiven, ldxgiven, 0, nextra, 0,
& nregions, neval, fail, integral, error, prob)
print *, "nregions =", nregions
print *, "neval =", neval
print *, "fail =", fail
print '(F20.12," +- ",F20.12," p = ",F8.3)',
& (integral(c), error(c), prob(c), c = 1, ncomp)
print *, " "
print *, "-------------------- Cuhre test --------------------"
call cuhre(ndim, ncomp, integrand, userdata,
& epsrel, epsabs, verbose + last,
& mineval, maxeval, key,
& nregions, neval, fail, integral, error, prob)
print *, "nregions =", nregions
print *, "neval =", neval
print *, "fail =", fail
print '(F20.12," +- ",F20.12," p = ",F8.3)',
& (integral(c), error(c), prob(c), c = 1, ncomp)
end
************************************************************************
integer function integrand(ndim, xx, ncomp, ff)
implicit none
integer ndim, ncomp
double precision xx(*), ff(*)
#define x xx(1)
#define y xx(2)
#define z xx(3)
#define f ff(1)
#define FUN 1
double precision pi, rsq
parameter (pi = 3.14159265358979323846D0)
rsq = x**2 + y**2 + z**2
#if FUN == 1
f = sin(x)*cos(y)*exp(z)
#elif FUN == 2
f = 1/((x + y)**2 + .003D0)*cos(y)*exp(z)
#elif FUN == 3
f = 1/(3.75D0 - cos(pi*x) - cos(pi*y) - cos(pi*z))
#elif FUN == 4
f = abs(rsq - .125D0)
#elif FUN == 5
f = exp(-rsq)
#elif FUN == 6
f = 1/(1 - x*y*z + 1D-10)
#elif FUN == 7
f = sqrt(abs(x - y - z))
#elif FUN == 8
f = exp(-x*y*z)
#elif FUN == 9
f = x**2/(cos(x + y + z + 1) + 5)
#elif FUN == 10
if( x .gt. .5D0 ) then
f = 1/sqrt(x*y*z + 1D-5)
else
f = sqrt(x*y*z)
endif
#else
if( rsq .lt. 1 ) then
f = 1
else
f = 0
endif
#endif
integrand = 0
end
Cuba-3.0/demo/demo-math.m 0000644 0000000 0000000 00000001364 10044130710 013673 0 ustar root root Install["Vegas"]
Install["Suave"]
Install["Divonne"]
Install["Cuhre"]
test[n_] := {t[n, Vegas], t[n, Suave], t[n, Divonne], t[n, Cuhre]}
t[n_, int_] := int[f[n][x, y, z], {x,0,1}, {y,0,1}, {z,0,1}]
f[1][x_, y_, z_] := Sin[x] Cos[y] Exp[z]
f[2][x_, y_, z_] := 1/((x + y)^2 + .003) Cos[y] Exp[z]
f[3][x_, y_, z_] := 1/(3.75 - Cos[Pi x] - Cos[Pi y] - Cos[Pi z])
f[4][x_, y_, z_] := Abs[x^2 + y^2 + z^2 - .125]
f[5][x_, y_, z_] := Exp[-x^2 - y^2 - z^2]
f[6][x_, y_, z_] := 1/(1 - x y z + 10^-10)
f[7][x_, y_, z_] := Sqrt[Abs[x - y - z]]
f[8][x_, y_, z_] := Exp[-x y z]
f[9][x_, y_, z_] := x^2/(Cos[x + y + z + 1] + 5)
f[10][x_, y_, z_] := If[ x > .5, 1/Sqrt[x y z + 10^-5], Sqrt[x y z] ]
f[11][x_, y_, z_] := If[ x^2 + y^2 + z^2 < 1, 1, 0 ]
Cuba-3.0/demo/testsuite.m 0000644 0000000 0000000 00000005460 10032763620 014063 0 ustar root root (* Test suite of Genz, used also by Sloan and Joe, and Novak and Ritter *)
seed = 4711
maxpoints = 150000
repeat = 20
(* Family 1: Oscillatory *)
f[1][x_, c_, w_] := Cos[2 Pi w[[1]] + c.x]
(* Family 2: Product peak *)
f[2][x_, c_, w_] := Times@@ MapThread[f2a, {x, c, w}]
f2a[xi_, ci_, wi_] := 1/(ci^-2 + (xi - wi)^2)
(* Family 3: Corner peak *)
f[3][x_, c_, w_] := (1 + c.x)^(-(Length[x] + 1))
(* Family 4: Gaussian *)
f[4][x_, c_, w_] := Exp[Plus@@ MapThread[f4a, {x, c, w}]]
f4a[xi_, ci_, wi_] := -ci^2 (xi - wi)^2
(* Family 5: Exponential *)
f[5][x_, c_, w_] := Exp[Plus@@ MapThread[f5a, {x, c, w}]]
f5a[xi_, ci_, wi_] := -ci Abs[xi - wi]
(* Family 6: Discontinuous *)
f[6][x_, c_, w_] := 0 /; x[[1]] > w[[1]] || x[[2]] > w[[2]]
f[6][x_, c_, w_] := Exp[c.x]
(* Novak & Ritter use
difficulty[fam_] := {9.00, 7.25, 1.85, 7.03, 2.04, 4.30}[[fam]]
*)
(* Sloan & Joe use
scale[dim_] := dim^Min[Max[.2 dim, 1], 2]
SetOptions[Interpolation, InterpolationOrder -> 2]
ifun[1] = Interpolation[{{5, 145.7}, {8, 354.0}, {10, 900.0}}];
ifun[2] = Interpolation[{{5, 261.0}, {8, 545.0}, {10, 1760.0}}];
ifun[3] = Interpolation[{{5, 433.0}, {8, 193.0}, {10, 185.0}}];
ifun[4] = Interpolation[{{5, 155.0}, {8, 382.0}, {10, 1230.0}}];
ifun[5] = Interpolation[{{5, 217.0}, {8, 674.0}, {10, 2040.0}}];
ifun[6] = Interpolation[{{5, 90.0}, {8, 240.0}, {10, 1470.0}}];
difficulty[fam_] := ifun[fam][ndim]/scale[ndim]
*)
difficulty[fam_] := {6.0, 18.0, 2.2, 15.2, 16.1, 16.4}[[fam]]
c[fam_] := Block[{r = w}, r difficulty[fam]/Plus@@ r]
Install["Vegas"]
Install["Suave"]
Install["Divonne"]
Install["Cuhre"]
SetAll[opt__] := (
SetOptions[Vegas, opt];
SetOptions[Suave, opt];
SetOptions[Divonne, opt];
SetOptions[Cuhre, opt];
SetOptions[NIntegrate, opt];
)
SetAll[PrecisionGoal -> 3, MaxPoints -> maxpoints]
SetOptions[Divonne, Key1 -> -200]
def[f_][{x__}][{r__}] := (
Attributes[idef] = {HoldAll};
idef[int_, NIntegrate] := (
int := Module[{count = 0, res},
res = NIntegrate[f, r, EvaluationMonitor :> (++count)];
{count, res}]
) /; $VersionNumber >= 5;
idef[int_, Int_] := (
int := Module[{count = 0, res},
res = Int[(++count; f), r];
{count, res}]
);
idef[vegas, Vegas];
idef[suave, Suave];
idef[divonne, Divonne];
idef[cuhre, Cuhre];
idef[nint, NIntegrate];
)
vars = Table[Unique["x"], {20}]
test[ndim_, fam_] :=
Block[ {w, xs = Take[vars, ndim]},
w := Table[Random[], {ndim}];
def[f[fam][xs, c[fam], w]][xs][{#, 0, 1}&/@ xs];
{vegas, suave, divonne, cuhre, nint}
]
dotest[ndim_, from_:1, to_:6] :=
Block[ {dir = ToString[ndim]},
If[ FileType[dir] =!= Directory, CreateDirectory[dir] ];
Do[
SeedRandom[seed];
Put[ Table[test[ndim, fam], {repeat}],
ToFileName[dir, "fam" <> ToString[fam]] ],
{fam, from, to}]
]
Cuba-3.0/install-sh 0000755 0000000 0000000 00000022011 10141662323 012722 0 ustar root root #!/bin/sh
# install - install a program, script, or datafile
scriptversion=2004-10-22.00
# This originates from X11R5 (mit/util/scripts/install.sh), which was
# later released in X11R6 (xc/config/util/install.sh) with the
# following copyright and license.
#
# Copyright (C) 1994 X Consortium
#
# Permission is hereby granted, free of charge, to any person obtaining a copy
# of this software and associated documentation files (the "Software"), to
# deal in the Software without restriction, including without limitation the
# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
# sell copies of the Software, and to permit persons to whom the Software is
# furnished to do so, subject to the following conditions:
#
# The above copyright notice and this permission notice shall be included in
# all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC-
# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#
# Except as contained in this notice, the name of the X Consortium shall not
# be used in advertising or otherwise to promote the sale, use or other deal-
# ings in this Software without prior written authorization from the X Consor-
# tium.
#
#
# FSF changes to this file are in the public domain.
#
# Calling this script install-sh is preferred over install.sh, to prevent
# `make' implicit rules from creating a file called install from it
# when there is no Makefile.
#
# This script is compatible with the BSD install script, but was written
# from scratch. It can only install one file at a time, a restriction
# shared with many OS's install programs.
# set DOITPROG to echo to test this script
# Don't use :- since 4.3BSD and earlier shells don't like it.
doit="${DOITPROG-}"
# put in absolute paths if you don't have them in your path; or use env. vars.
mvprog="${MVPROG-mv}"
cpprog="${CPPROG-cp}"
chmodprog="${CHMODPROG-chmod}"
chownprog="${CHOWNPROG-chown}"
chgrpprog="${CHGRPPROG-chgrp}"
stripprog="${STRIPPROG-strip}"
rmprog="${RMPROG-rm}"
mkdirprog="${MKDIRPROG-mkdir}"
chmodcmd="$chmodprog 0755"
chowncmd=
chgrpcmd=
stripcmd=
rmcmd="$rmprog -f"
mvcmd="$mvprog"
src=
dst=
dir_arg=
dstarg=
no_target_directory=
usage="Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
or: $0 [OPTION]... SRCFILES... DIRECTORY
or: $0 [OPTION]... -t DIRECTORY SRCFILES...
or: $0 [OPTION]... -d DIRECTORIES...
In the 1st form, copy SRCFILE to DSTFILE.
In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
In the 4th, create DIRECTORIES.
Options:
-c (ignored)
-d create directories instead of installing files.
-g GROUP $chgrpprog installed files to GROUP.
-m MODE $chmodprog installed files to MODE.
-o USER $chownprog installed files to USER.
-s $stripprog installed files.
-t DIRECTORY install into DIRECTORY.
-T report an error if DSTFILE is a directory.
--help display this help and exit.
--version display version info and exit.
Environment variables override the default commands:
CHGRPPROG CHMODPROG CHOWNPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG
"
while test -n "$1"; do
case $1 in
-c) shift
continue;;
-d) dir_arg=true
shift
continue;;
-g) chgrpcmd="$chgrpprog $2"
shift
shift
continue;;
--help) echo "$usage"; exit 0;;
-m) chmodcmd="$chmodprog $2"
shift
shift
continue;;
-o) chowncmd="$chownprog $2"
shift
shift
continue;;
-s) stripcmd=$stripprog
shift
continue;;
-t) dstarg=$2
shift
shift
continue;;
-T) no_target_directory=true
shift
continue;;
--version) echo "$0 $scriptversion"; exit 0;;
*) # When -d is used, all remaining arguments are directories to create.
# When -t is used, the destination is already specified.
test -n "$dir_arg$dstarg" && break
# Otherwise, the last argument is the destination. Remove it from $@.
for arg
do
if test -n "$dstarg"; then
# $@ is not empty: it contains at least $arg.
set fnord "$@" "$dstarg"
shift # fnord
fi
shift # arg
dstarg=$arg
done
break;;
esac
done
if test -z "$1"; then
if test -z "$dir_arg"; then
echo "$0: no input file specified." >&2
exit 1
fi
# It's OK to call `install-sh -d' without argument.
# This can happen when creating conditional directories.
exit 0
fi
for src
do
# Protect names starting with `-'.
case $src in
-*) src=./$src ;;
esac
if test -n "$dir_arg"; then
dst=$src
src=
if test -d "$dst"; then
mkdircmd=:
chmodcmd=
else
mkdircmd=$mkdirprog
fi
else
# Waiting for this to be detected by the "$cpprog $src $dsttmp" command
# might cause directories to be created, which would be especially bad
# if $src (and thus $dsttmp) contains '*'.
if test ! -f "$src" && test ! -d "$src"; then
echo "$0: $src does not exist." >&2
exit 1
fi
if test -z "$dstarg"; then
echo "$0: no destination specified." >&2
exit 1
fi
dst=$dstarg
# Protect names starting with `-'.
case $dst in
-*) dst=./$dst ;;
esac
# If destination is a directory, append the input filename; won't work
# if double slashes aren't ignored.
if test -d "$dst"; then
if test -n "$no_target_directory"; then
echo "$0: $dstarg: Is a directory" >&2
exit 1
fi
dst=$dst/`basename "$src"`
fi
fi
# This sed command emulates the dirname command.
dstdir=`echo "$dst" | sed -e 's,/*$,,;s,[^/]*$,,;s,/*$,,;s,^$,.,'`
# Make sure that the destination directory exists.
# Skip lots of stat calls in the usual case.
if test ! -d "$dstdir"; then
defaultIFS='
'
IFS="${IFS-$defaultIFS}"
oIFS=$IFS
# Some sh's can't handle IFS=/ for some reason.
IFS='%'
set x `echo "$dstdir" | sed -e 's@/@%@g' -e 's@^%@/@'`
shift
IFS=$oIFS
pathcomp=
while test $# -ne 0 ; do
pathcomp=$pathcomp$1
shift
if test ! -d "$pathcomp"; then
$mkdirprog "$pathcomp"
# mkdir can fail with a `File exist' error in case several
# install-sh are creating the directory concurrently. This
# is OK.
test -d "$pathcomp" || exit
fi
pathcomp=$pathcomp/
done
fi
if test -n "$dir_arg"; then
$doit $mkdircmd "$dst" \
&& { test -z "$chowncmd" || $doit $chowncmd "$dst"; } \
&& { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } \
&& { test -z "$stripcmd" || $doit $stripcmd "$dst"; } \
&& { test -z "$chmodcmd" || $doit $chmodcmd "$dst"; }
else
dstfile=`basename "$dst"`
# Make a couple of temp file names in the proper directory.
dsttmp=$dstdir/_inst.$$_
rmtmp=$dstdir/_rm.$$_
# Trap to clean up those temp files at exit.
trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0
trap '(exit $?); exit' 1 2 13 15
# Copy the file name to the temp name.
$doit $cpprog "$src" "$dsttmp" &&
# and set any options; do chmod last to preserve setuid bits.
#
# If any of these fail, we abort the whole thing. If we want to
# ignore errors from any of these, just make sure not to ignore
# errors from the above "$doit $cpprog $src $dsttmp" command.
#
{ test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } \
&& { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } \
&& { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } \
&& { test -z "$chmodcmd" || $doit $chmodcmd "$dsttmp"; } &&
# Now rename the file to the real destination.
{ $doit $mvcmd -f "$dsttmp" "$dstdir/$dstfile" 2>/dev/null \
|| {
# The rename failed, perhaps because mv can't rename something else
# to itself, or perhaps because mv is so ancient that it does not
# support -f.
# Now remove or move aside any old file at destination location.
# We try this two ways since rm can't unlink itself on some
# systems and the destination file might be busy for other
# reasons. In this case, the final cleanup might fail but the new
# file should still install successfully.
{
if test -f "$dstdir/$dstfile"; then
$doit $rmcmd -f "$dstdir/$dstfile" 2>/dev/null \
|| $doit $mvcmd -f "$dstdir/$dstfile" "$rmtmp" 2>/dev/null \
|| {
echo "$0: cannot unlink or rename $dstdir/$dstfile" >&2
(exit 1); exit
}
else
:
fi
} &&
# Now rename the file to the real destination.
$doit $mvcmd "$dsttmp" "$dstdir/$dstfile"
}
}
fi || { (exit 1); exit; }
done
# The final little trick to "correctly" pass the exit status to the exit trap.
{
(exit 0); exit
}
# Local variables:
# eval: (add-hook 'write-file-hooks 'time-stamp)
# time-stamp-start: "scriptversion="
# time-stamp-format: "%:y-%02m-%02d.%02H"
# time-stamp-end: "$"
# End:
Cuba-3.0/makefile.in 0000644 0000000 0000000 00000020361 11655707512 013044 0 ustar root root CC = @CC@
CFLAGS = @CFLAGS@ @DEFS@ -I$(common) -I. -I$(srcdir)
MCFLAGS = @MCFLAGS@
F77 = @F77@
FFLAGS = @FFLAGS@
LIBS = @LIBS@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
RANLIB = @RANLIB@
EXE = @EXEEXT@
prefix = @prefix@
exec_prefix = @exec_prefix@
srcdir = @srcdir@
bindir = @bindir@
libdir = @libdir@
includedir = @includedir@
datarootdir = @datarootdir@
datadir = @datadir@
MATH_DEFAULT = @MATH_DEFAULT@
TOOLS_DEFAULT = @TOOLS_DEFAULT@
DEMO_FORTRAN_DEFAULT = @DEMO_FORTRAN_DEFAULT@$(EXE)
MCC = CC="$(tools)/fcc" CXX="$(tools)/fcc" REALCC="$(CC)" PATH="$(PATH):$(tools)" mcc
TARDIR = @PACKAGE_NAME@-@PACKAGE_VERSION@
TARFILE = $(TARDIR).tar.gz
HEADERS = cuba.h
LIB = libcuba.a
MATH = Vegas$(EXE) Suave$(EXE) Divonne$(EXE) Cuhre$(EXE)
TOOLS = partview$(EXE)
all: lib demos $(MATH_DEFAULT) $(TOOLS_DEFAULT)
lib: $(LIB)
demos: demo-c$(EXE) $(DEMO_FORTRAN_DEFAULT)
math: $(MATH)
tools: $(TOOLS)
install: lib $(TOOLS_DEFAULT)
$(INSTALL) -m 755 -d $(DESTDIR)$(libdir) \
$(DESTDIR)$(includedir) \
$(DESTDIR)$(bindir) \
$(DESTDIR)$(datadir)
$(INSTALL_DATA) $(LIB) $(DESTDIR)$(libdir)
for f in $(HEADERS) ; do \
$(INSTALL_DATA) `test -f $$f || echo $(srcdir)/`$$f $(DESTDIR)$(includedir); \
done
for f in $(MATH) $(TOOLS) ; do \
test -f $$f && $(INSTALL_PROGRAM) $$f $(DESTDIR)$(bindir) || : ; \
done
$(INSTALL_DATA) $(srcdir)/cuba.pdf $(DESTDIR)$(datadir)
check: demo-c
./demo-c | grep RESULT > demo-c.out
@echo diff demo-c.out $(demo)/demo-c.out
@diff demo-c.out $(demo)/demo-c.out || \
echo "Note: This is serious only if the results deviate significantly."
.SUFFIXES:
.SUFFIXES: .c .f .tm
common = $(srcdir)/src/common
vegas = $(srcdir)/src/vegas
suave = $(srcdir)/src/suave
divonne = $(srcdir)/src/divonne
cuhre = $(srcdir)/src/cuhre
demo = $(srcdir)/demo
tools = $(srcdir)/tools
COMMON_TMDEPS = $(common)/stddecl.h $(common)/ChiSquare.c $(common)/Erf.c
COMMON_CDEPS = $(COMMON_TMDEPS) $(common)/DoSample.c
VEGAS_C = $(vegas)/Vegas.c
VEGAS_TM = $(vegas)/Vegas.tm
VEGAS_DEPS = $(common)/Random.c \
$(vegas)/decl.h $(vegas)/common.c \
$(vegas)/Grid.c $(vegas)/Integrate.c
VEGAS = $(VEGAS_C) $(VEGAS_TM) $(VEGAS_DEPS)
$(LIB)(Vegas.o): $(VEGAS_C) $(VEGAS_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(vegas) -DNOUNDERSCORE -c -o Vegas.o $(VEGAS_C)
$(AR) $(ARFLAGS) $(LIB) Vegas.o
$(RM) Vegas.o
$(LIB)(llVegas.o): $(VEGAS_C) $(VEGAS_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(vegas) -DLONGLONGINT -DNOUNDERSCORE -c -o llVegas.o $(VEGAS_C)
$(AR) $(ARFLAGS) $(LIB) llVegas.o
$(RM) llVegas.o
$(LIB)(Vegas_.o): $(VEGAS_C) $(VEGAS_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(vegas) -c -o Vegas_.o $(VEGAS_C)
$(AR) $(ARFLAGS) $(LIB) Vegas_.o
$(RM) Vegas_.o
$(LIB)(llVegas_.o): $(VEGAS_C) $(VEGAS_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(vegas) -DLONGLONGINT -c -o llVegas_.o $(VEGAS_C)
$(AR) $(ARFLAGS) $(LIB) llVegas_.o
$(RM) llVegas_.o
Vegas$(EXE): $(VEGAS_TM) $(VEGAS_DEPS) $(COMMON_TMDEPS)
$(MCC) $(MCFLAGS) $(CFLAGS) -I$(vegas) -o Vegas$(EXE) $(VEGAS_TM)
strip Vegas$(EXE)
SUAVE_C = $(suave)/Suave.c
SUAVE_TM = $(suave)/Suave.tm
SUAVE_DEPS = $(common)/Random.c \
$(suave)/decl.h $(suave)/common.c \
$(suave)/Grid.c $(suave)/Fluct.c $(suave)/Sample.c \
$(suave)/Integrate.c
SUAVE = $(SUAVE_C) $(SUAVE_TM) $(SUAVE_DEPS)
$(LIB)(Suave.o): $(SUAVE_C) $(SUAVE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(suave) -DNOUNDERSCORE -c -o Suave.o $(SUAVE_C)
$(AR) $(ARFLAGS) $(LIB) Suave.o
$(RM) Suave.o
$(LIB)(llSuave.o): $(SUAVE_C) $(SUAVE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(suave) -DLONGLONGINT -DNOUNDERSCORE -c -o llSuave.o $(SUAVE_C)
$(AR) $(ARFLAGS) $(LIB) llSuave.o
$(RM) llSuave.o
$(LIB)(Suave_.o): $(SUAVE_C) $(SUAVE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(suave) -c -o Suave_.o $(SUAVE_C)
$(AR) $(ARFLAGS) $(LIB) Suave_.o
$(RM) Suave_.o
$(LIB)(llSuave_.o): $(SUAVE_C) $(SUAVE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(suave) -DLONGLONGINT -c -o llSuave_.o $(SUAVE_C)
$(AR) $(ARFLAGS) $(LIB) llSuave_.o
$(RM) llSuave_.o
Suave$(EXE): $(SUAVE_TM) $(SUAVE_DEPS) $(COMMON_TMDEPS)
$(MCC) $(MCFLAGS) $(CFLAGS) -I$(suave) -o Suave$(EXE) $(SUAVE_TM)
strip Suave$(EXE)
DIVONNE_C = $(divonne)/Divonne.c
DIVONNE_TM = $(divonne)/Divonne.tm
DIVONNE_DEPS = $(common)/Random.c \
$(divonne)/decl.h $(divonne)/common.c \
$(divonne)/KorobovCoeff.c $(divonne)/Rule.c $(divonne)/Sample.c \
$(divonne)/FindMinimum.c $(divonne)/Iterate.c $(divonne)/Explore.c \
$(divonne)/Split.c $(divonne)/Integrate.c
DIVONNE = $(DIVONNE_C) $(DIVONNE_TM) $(DIVONNE_DEPS)
$(LIB)(Divonne.o): $(DIVONNE_C) $(DIVONNE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(divonne) -DNOUNDERSCORE -c -o Divonne.o $(DIVONNE_C)
$(AR) $(ARFLAGS) $(LIB) Divonne.o
$(RM) Divonne.o
$(LIB)(llDivonne.o): $(DIVONNE_C) $(DIVONNE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(divonne) -DLONGLONGINT -DNOUNDERSCORE -c -o llDivonne.o $(DIVONNE_C)
$(AR) $(ARFLAGS) $(LIB) llDivonne.o
$(RM) llDivonne.o
$(LIB)(Divonne_.o): $(DIVONNE_C) $(DIVONNE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(divonne) -c -o Divonne_.o $(DIVONNE_C)
$(AR) $(ARFLAGS) $(LIB) Divonne_.o
$(RM) Divonne_.o
$(LIB)(llDivonne_.o): $(DIVONNE_C) $(DIVONNE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(divonne) -DLONGLONGINT -c -o llDivonne_.o $(DIVONNE_C)
$(AR) $(ARFLAGS) $(LIB) llDivonne_.o
$(RM) llDivonne_.o
Divonne$(EXE): $(DIVONNE_TM) $(DIVONNE_DEPS) $(COMMON_TMDEPS)
$(MCC) $(MCFLAGS) $(CFLAGS) -I$(divonne) -o Divonne$(EXE) $(DIVONNE_TM)
strip Divonne$(EXE)
CUHRE_C = $(cuhre)/Cuhre.c
CUHRE_TM = $(cuhre)/Cuhre.tm
CUHRE_DEPS = \
$(cuhre)/decl.h $(cuhre)/common.c \
$(cuhre)/Rule.c $(cuhre)/Integrate.c
CUHRE = $(CUHRE_C) $(CUHRE_TM) $(CUHRE_DEPS)
$(LIB)(Cuhre.o): $(CUHRE_C) $(CUHRE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(cuhre) -DNOUNDERSCORE -c -o Cuhre.o $(CUHRE_C)
$(AR) $(ARFLAGS) $(LIB) Cuhre.o
$(RM) Cuhre.o
$(LIB)(llCuhre.o): $(CUHRE_C) $(CUHRE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(cuhre) -DLONGLONGINT -DNOUNDERSCORE -c -o llCuhre.o $(CUHRE_C)
$(AR) $(ARFLAGS) $(LIB) llCuhre.o
$(RM) llCuhre.o
$(LIB)(Cuhre_.o): $(CUHRE_C) $(CUHRE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(cuhre) -c -o Cuhre_.o $(CUHRE_C)
$(AR) $(ARFLAGS) $(LIB) Cuhre_.o
$(RM) Cuhre_.o
$(LIB)(llCuhre_.o): $(CUHRE_C) $(CUHRE_DEPS) $(COMMON_CDEPS)
$(CC) $(CFLAGS) -I$(cuhre) -DLONGLONGINT -c -o llCuhre_.o $(CUHRE_C)
$(AR) $(ARFLAGS) $(LIB) llCuhre_.o
$(RM) llCuhre_.o
Cuhre$(EXE): $(CUHRE_TM) $(CUHRE_DEPS) $(COMMON_TMDEPS)
$(MCC) $(MCFLAGS) $(CFLAGS) -I$(cuhre) -o Cuhre$(EXE) $(CUHRE_TM)
strip Cuhre$(EXE)
$(LIB): $(LIB)(Vegas.o) $(LIB)(Vegas_.o) \
$(LIB)(llVegas.o) $(LIB)(llVegas_.o) \
$(LIB)(Suave.o) $(LIB)(Suave_.o) \
$(LIB)(llSuave.o) $(LIB)(llSuave_.o) \
$(LIB)(Divonne.o) $(LIB)(Divonne_.o) \
$(LIB)(llDivonne.o) $(LIB)(llDivonne_.o) \
$(LIB)(Cuhre.o) $(LIB)(Cuhre_.o) \
$(LIB)(llCuhre.o) $(LIB)(llCuhre_.o)
-$(RANLIB) $(LIB)
DEMO_F = $(demo)/demo-fortran.F
DEMO_C = $(demo)/demo-c.c
DEMO_TM = $(demo)/demo-math.m $(demo)/testsuite.m
DEMO = $(DEMO_F) $(DEMO_C) $(DEMO_TM) $(demo)/demo-c.out $(demo)/cuba.F
demo-fortran$(EXE): $(DEMO_F) $(LIB)
$(F77) $(FFLAGS) -o demo-fortran$(EXE) $(DEMO_F) $(LIB) $(LIBS)
demo-c$(EXE): $(DEMO_C) $(srcdir)/cuba.h $(LIB)
$(CC) $(CFLAGS) -o demo-c$(EXE) $(DEMO_C) $(LIB) $(LIBS)
PARTVIEW = $(tools)/partview.cpp $(tools)/partview.pro \
$(tools)/quit.xpm $(tools)/print.xpm
partview$(EXE): $(PARTVIEW)
qmake -o makefile.partview $(tools)/partview.pro
$(MAKE) -f makefile.partview
strip partview$(EXE)
TARCONTENTS = $(srcdir)/COPYING $(srcdir)/ChangeLog \
$(srcdir)/configure $(srcdir)/configure.ac $(srcdir)/install-sh \
$(srcdir)/makefile.in $(srcdir)/config.h.in \
$(srcdir)/cuba.pdf $(srcdir)/cuba.h \
$(COMMON_CDEPS) $(VEGAS) $(SUAVE) $(DIVONNE) $(CUHRE) \
$(DEMO) $(PARTVIEW) $(tools)/partview.m \
$(tools)/mcc $(tools)/fcc $(tools)/mkstatic
dist:
ln -s . $(TARDIR)
tar cvfzh $(TARFILE) --owner=root --group=root \
$(patsubst $(srcdir)/%,$(TARDIR)/%, $(sort $(TARCONTENTS)))
$(RM) $(TARDIR)
pub: dist
mv -f $(TARFILE) web/
./mkwebpage
clean:
-$(RM) $(TARFILE) $(TARDIR) demo-c.out \
partview.moc partview.o makefile.partview \
*.o */*.o */*.tm.c
distclean: clean
-$(RM) $(LIB) demo-c demo-fortran $(MATH) $(TOOLS) \
config.h config.log config.status makefile
Cuba-3.0/src/common/ChiSquare.c 0000644 0000000 0000000 00000002150 10202456326 015031 0 ustar root root /*
ChiSquare.c
the chi-square cdf
after W.J. Kennedy and J.E. Gentle,
Statistical computing, p. 116
last modified 9 Feb 05 th
*/
#ifdef HAVE_ERF
#define Erf erf
#else
#include "Erf.c"
#endif
static inline real Normal(creal x)
{
return .5*Erf(x/1.414213562373095048801689) + .5;
}
/*********************************************************************/
static real ChiSquare(creal x, cint df)
{
real y;
if( df <= 0 ) return -999;
if( x <= 0 ) return 0;
if( x > 1000*df ) return 1;
if( df > 1000 ) {
if( x < 2 ) return 0;
y = 2./(9*df);
y = (pow(x/df, 1/3.) - (1 - y))/sqrt(y);
if( y > 5 ) return 1;
if( y < -18.8055 ) return 0;
return Normal(y);
}
y = .5*x;
if( df & 1 ) {
creal sqrty = sqrt(y);
real h = Erf(sqrty);
count i;
if( df == 1 ) return h;
y = sqrty*exp(-y)/.8862269254527579825931;
for( i = 3; i < df; i += 2 ) {
h -= y;
y *= x/i;
}
y = h - y;
}
else {
real term = exp(-y), sum = term;
count i;
for( i = 1; i < df/2; ++i )
sum += term *= y/i;
y = 1 - sum;
}
return Max(0., y);
}
Cuba-3.0/src/common/DoSample.c 0000644 0000000 0000000 00000020541 11663420755 014666 0 ustar root root /*
DoSample.c
the actual sampling routine, serial and parallel,
for the C versions of the Cuba routines
by Thomas Hahn
last modified 24 Nov 11 th
*/
#define MINSLICE 10
#define MINCORES 1
//#define MINCORES 2
#if defined(VEGAS) || defined(SUAVE)
#define VEG_ONLY(...) __VA_ARGS__
#else
#define VEG_ONLY(...)
#endif
#ifdef DIVONNE
#define DIV_ONLY(...) __VA_ARGS__
#define LDX(ldx) ldx
#else
#define DIV_ONLY(...)
#define LDX(ldx) t->ndim
#endif
typedef struct {
real *f;
number n;
VEG_ONLY(count iter;)
DIV_ONLY(number neval_opt, neval_cut;
count ldx, phase, iregion;)
#define NREGIONS ldx
#define NEVAL n
#define RETVAL phase
} Slice;
/*********************************************************************/
#ifndef MSG_WAITALL
/* Windows */
#define MSG_WAITALL 0
#endif
static inline int readsock(int fd, void *data, size_t n)
{
ssize_t got;
size_t remain = n;
do got = recv(fd, data, remain, MSG_WAITALL);
while( got > 0 && (data += got, remain -= got) > 0 );
return got;
}
static inline int writesock(int fd, const void *data, size_t n)
{
ssize_t got;
size_t remain = n;
do got = send(fd, data, remain, MSG_WAITALL);
while( got > 0 && (data += got, remain -= got) > 0 );
return got;
}
/*********************************************************************/
static inline bool SampleSerial(cThis *t, number n, creal *x, real *f
VEG_ONLY(, creal *w, ccount iter)
DIV_ONLY(, ccount ldx))
{
while( n-- ) {
if( t->integrand(&t->ndim, x, &t->ncomp, f, t->userdata
VEG_ONLY(, w++, &iter)
DIV_ONLY(, &t->phase)) == ABORT ) return true;
x += LDX(ldx);
f += t->ncomp;
}
return false;
}
/*********************************************************************/
static void DoSample(This *t, number n, creal *x, real *f
VEG_ONLY(, creal *w, ccount iter)
DIV_ONLY(, ccount ldx))
{
char s[128];
Slice slice;
int ncores;
t->neval += n;
ncores = IMin(t->ncores, n/MINSLICE);
if( ncores < MINCORES ) {
if( VERBOSE > 2 ) {
sprintf(s, "sampling " NUMBER " points serially", n);
Print(s);
}
if( SampleSerial(t, n, x, f
VEG_ONLY(, w, iter)
DIV_ONLY(, ldx)) ) longjmp(t->abort, -99);
}
else {
int core, abort;
slice.n = (n + ncores - 1)/ncores;
if( VERBOSE > 2 ) {
sprintf(s, "sampling " NUMBER " points each on %d cores",
slice.n, ncores);
Print(s);
}
slice.f = f;
VEG_ONLY(slice.iter = iter;)
DIV_ONLY(slice.ldx = ldx;)
DIV_ONLY(slice.phase = t->phase;)
for( core = 0; core < ncores; ++core ) {
cint fd = t->child[core];
writesock(fd, &slice, sizeof slice);
VEG_ONLY(writesock(fd, w, slice.n*sizeof *w);)
writesock(fd, x, slice.n*LDX(ldx)*sizeof *x);
VEG_ONLY(w += n;)
x += slice.n*LDX(ldx);
slice.f += slice.n*t->ncomp;
n -= slice.n;
slice.n = IMin(slice.n, n);
}
abort = 0;
for( core = ncores; --core >= 0; ) {
cint fd = t->child[core];
readsock(fd, &slice, sizeof slice);
if( slice.n == 0 ) abort = 1;
else readsock(fd, slice.f, slice.n*t->ncomp*sizeof *f);
}
if( abort ) longjmp(t->abort, -99);
}
}
/*********************************************************************/
#ifdef DIVONNE
static inline int ReadyCore(cThis *t)
{
int core;
fd_set ready;
memcpy(&ready, &t->children, sizeof ready);
select(t->nchildren, &ready, NULL, NULL, NULL);
for( core = 0; core < t->ncores; ++core )
if( FD_ISSET(t->child[core], &ready) ) break;
return core;
}
/*********************************************************************/
static int ExploreParent(This *t, cint iregion)
{
TYPEDEFREGION;
Region *region;
Slice slice;
int ireg = iregion, core = t->running;
if( t->ncores < MINCORES ) return Explore(t, iregion);
if( t->running >= ((iregion < 0) ? 1 : t->ncores) ) {
Totals totals[t->ncomp];
count comp, succ;
cint fd = t->child[core = ReadyCore(t)];
--t->running;
readsock(fd, &slice, sizeof slice);
//DEBSLICE("parent read", fd, slice);
ireg = slice.iregion;
region = RegionPtr(ireg);
succ = ireg + region->next;
readsock(fd, region, sizeof(Region));
if( --slice.NREGIONS > 0 ) {
region->next = t->nregions - ireg;
EnlargeRegions(t, slice.NREGIONS);
readsock(fd, RegionPtr(t->nregions), slice.NREGIONS*sizeof(Region));
t->nregions += slice.NREGIONS;
RegionPtr(t->nregions-1)->next = succ - t->nregions + 1;
}
readsock(fd, totals, sizeof totals);
for( comp = 0; comp < t->ncomp; ++comp )
t->totals[comp].secondspread =
Max(t->totals[comp].secondspread, totals[comp].secondspread);
t->neval += slice.NEVAL;
t->neval_opt += slice.neval_opt;
t->neval_cut += slice.neval_cut;
if( slice.RETVAL == -1 ) return -1;
}
if( iregion >= 0 ) {
region = RegionPtr(iregion);
cint fd = t->child[core];
slice.n = 0;
slice.phase = t->phase;
slice.iregion = iregion;
//DEBSLICE(" parent write", fd, slice);
writesock(fd, &slice, sizeof slice);
writesock(fd, &t->samples[region->isamples], sizeof(Samples));
writesock(fd, region, sizeof *region);
writesock(fd, t->totals, sizeof *t->totals);
region->depth = 0;
++t->running;
}
return ireg;
}
#endif
/*********************************************************************/
static inline void DoChild(This *t, cint fd)
{
Slice slice;
#ifdef DIVONNE
TYPEDEFREGION;
Totals totals[t->ncomp];
t->totals = totals;
t->ncores = 0; /* no recursive forks */
AllocRegions(t);
SamplesIni(&t->samples[0]);
t->samples[0].n = 0;
SamplesIni(&t->samples[1]);
t->samples[1].n = 0;
SamplesIni(&t->samples[2]);
t->samples[2].n = 0;
#endif
while( readsock(fd, &slice, sizeof slice) ) {
number n = slice.n;
DIV_ONLY(t->phase = slice.phase;)
//DEBSLICE(" child read", fd, slice);
if( n > 0 ) {
VEG_ONLY(real w[n];)
real x[n*LDX(slice.ldx)];
real f[n*t->ncomp];
VEG_ONLY(readsock(fd, w, sizeof w);)
readsock(fd, x, sizeof x);
if( SampleSerial(t, n, x, f
VEG_ONLY(, w, slice.iter)
DIV_ONLY(, slice.ldx)) ) slice.n = 0;
writesock(fd, &slice, sizeof slice);
if( slice.n ) writesock(fd, f, sizeof f);
}
#ifdef DIVONNE
else {
Samples *samples, psamples;
readsock(fd, &psamples, sizeof psamples);
readsock(fd, RegionPtr(0), sizeof(Region));
readsock(fd, totals, sizeof totals);
t->nregions = 1;
t->neval = t->neval_opt = t->neval_cut = 0;
samples = &t->samples[RegionPtr(0)->isamples];
if( psamples.n != samples->n ) {
SamplesFree(samples);
*samples = psamples;
SamplesAlloc(t, samples);
}
slice.RETVAL = Explore(t, 0);
slice.NREGIONS = t->nregions;
slice.NEVAL = t->neval;
slice.neval_opt = t->neval_opt;
slice.neval_cut = t->neval_cut;
//DEBSLICE("child write", fd, slice);
writesock(fd, &slice, sizeof slice);
writesock(fd, RegionPtr(0), t->nregions*sizeof(Region));
writesock(fd, totals, sizeof totals);
}
#endif
}
exit(0);
}
/*********************************************************************/
static inline void ForkCores(This *t)
{
int core;
cchar *env = getenv("CUBACORES");
t->ncores = env ? atoi(env) : sysconf(_SC_NPROCESSORS_ONLN);
#ifdef HAVE_GETLOADAVG
if( env == NULL || t->ncores < 0 ) {
double load = 0;
getloadavg(&load, 1);
t->ncores = abs(t->ncores) - floor(load);
}
#endif
#ifdef DIVONNE
t->nchildren = t->running = 0;
#endif
if( t->ncores < MINCORES ) return;
if( VERBOSE ) printf("using %d cores\n", t->ncores);
fflush(stdout);
Alloc(t->child, t->ncores);
for( core = 0; core < t->ncores; ++core ) {
int fd[2];
pid_t pid;
assert(
socketpair(AF_LOCAL, SOCK_STREAM, 0, fd) != -1 &&
(pid = fork()) != -1 );
if( pid == 0 ) {
close(fd[0]);
DoChild(t, fd[1]);
}
close(fd[1]);
t->child[core] = fd[0];
#ifdef DIVONNE
FD_SET(fd[0], &t->children);
t->nchildren = IMax(t->nchildren, fd[0] + 1);
#endif
}
}
/*********************************************************************/
static inline void WaitCores(cThis *t)
{
if( t->ncores >= MINCORES ) {
int core;
pid_t pid;
for( core = 0; core < t->ncores; ++core )
close(t->child[core]);
free(t->child);
for( core = 0; core < t->ncores; ++core )
wait(&pid);
}
}
Cuba-3.0/src/common/Erf.c 0000644 0000000 0000000 00000002607 10202065700 013660 0 ustar root root /*
Erf.c
Gaussian error function
= 2/Sqrt[Pi] Integrate[Exp[-t^2], {t, 0, x}]
Code from Takuya Ooura's gamerf2a.f
http://www.kurims.kyoto-u.ac.jp/~ooura/gamerf.html
last modified 8 Feb 05 th
*/
static real Erfc(creal x)
{
static creal c[] = {
2.96316885199227378e-01, 6.12158644495538758e-02,
1.81581125134637070e-01, 5.50942780056002085e-01,
6.81866451424939493e-02, 1.53039662058770397e+00,
1.56907543161966709e-02, 2.99957952311300634e+00,
2.21290116681517573e-03, 4.95867777128246701e+00,
1.91395813098742864e-04, 7.41471251099335407e+00,
9.71013284010551623e-06, 1.04765104356545238e+01,
1.66642447174307753e-07, 1.48455557345597957e+01,
6.10399733098688199e+00, 1.26974899965115684e+01 };
real y = x*x;
y = exp(-y)*x*(
c[0]/(y + c[1]) + c[2]/(y + c[3]) +
c[4]/(y + c[5]) + c[6]/(y + c[7]) +
c[8]/(y + c[9]) + c[10]/(y + c[11]) +
c[12]/(y + c[13]) + c[14]/(y + c[15]) );
if( x < c[16] ) y += 2/(exp(c[17]*x) + 1);
return y;
}
static real Erf(creal x)
{
static creal c[] = {
1.12837916709551257e+00,
-3.76126389031833602e-01,
1.12837916706621301e-01,
-2.68661698447642378e-02,
5.22387877685618101e-03,
-8.49202435186918470e-04 };
real y = fabs(x);
if( y > .125 ) {
y = 1 - Erfc(y);
return (x > 0) ? y : -y;
}
y *= y;
return x*(c[0] + y*(c[1] + y*(c[2] +
y*(c[3] + y*(c[4] + y*c[5])))));
}
Cuba-3.0/src/common/Random.c 0000644 0000000 0000000 00000021677 11403416250 014400 0 ustar root root /*
Random.c
quasi- and pseudo-random-number generation
last modified 8 Jun 10 th
*/
/*
PART 1: Sobol quasi-random-number generator
adapted from ACM TOMS algorithm 659
*/
static void SobolGet(This *t, real *x)
{
number seq = t->rng.sobol.seq++;
count zerobit = 0, dim;
while( seq & 1 ) {
++zerobit;
seq >>= 1;
}
for( dim = 0; dim < t->ndim; ++dim ) {
t->rng.sobol.prev[dim] ^= t->rng.sobol.v[dim][zerobit];
x[dim] = t->rng.sobol.prev[dim]*t->rng.sobol.norm;
}
}
static void SobolSkip(This *t, number n)
{
while( n-- ) {
number seq = t->rng.sobol.seq++;
count zerobit = 0, dim;
while( seq & 1 ) {
++zerobit;
seq >>= 1;
}
for( dim = 0; dim < t->ndim; ++dim )
t->rng.sobol.prev[dim] ^= t->rng.sobol.v[dim][zerobit];
}
}
static inline void SobolIni(This *t)
{
static number ini[9*40] = {
3, 1, 0, 0, 0, 0, 0, 0, 0,
7, 1, 1, 0, 0, 0, 0, 0, 0,
11, 1, 3, 7, 0, 0, 0, 0, 0,
13, 1, 1, 5, 0, 0, 0, 0, 0,
19, 1, 3, 1, 1, 0, 0, 0, 0,
25, 1, 1, 3, 7, 0, 0, 0, 0,
37, 1, 3, 3, 9, 9, 0, 0, 0,
59, 1, 3, 7, 13, 3, 0, 0, 0,
47, 1, 1, 5, 11, 27, 0, 0, 0,
61, 1, 3, 5, 1, 15, 0, 0, 0,
55, 1, 1, 7, 3, 29, 0, 0, 0,
41, 1, 3, 7, 7, 21, 0, 0, 0,
67, 1, 1, 1, 9, 23, 37, 0, 0,
97, 1, 3, 3, 5, 19, 33, 0, 0,
91, 1, 1, 3, 13, 11, 7, 0, 0,
109, 1, 1, 7, 13, 25, 5, 0, 0,
103, 1, 3, 5, 11, 7, 11, 0, 0,
115, 1, 1, 1, 3, 13, 39, 0, 0,
131, 1, 3, 1, 15, 17, 63, 13, 0,
193, 1, 1, 5, 5, 1, 27, 33, 0,
137, 1, 3, 3, 3, 25, 17, 115, 0,
145, 1, 1, 3, 15, 29, 15, 41, 0,
143, 1, 3, 1, 7, 3, 23, 79, 0,
241, 1, 3, 7, 9, 31, 29, 17, 0,
157, 1, 1, 5, 13, 11, 3, 29, 0,
185, 1, 3, 1, 9, 5, 21, 119, 0,
167, 1, 1, 3, 1, 23, 13, 75, 0,
229, 1, 3, 3, 11, 27, 31, 73, 0,
171, 1, 1, 7, 7, 19, 25, 105, 0,
213, 1, 3, 5, 5, 21, 9, 7, 0,
191, 1, 1, 1, 15, 5, 49, 59, 0,
253, 1, 1, 1, 1, 1, 33, 65, 0,
203, 1, 3, 5, 15, 17, 19, 21, 0,
211, 1, 1, 7, 11, 13, 29, 3, 0,
239, 1, 3, 7, 5, 7, 11, 113, 0,
247, 1, 1, 5, 3, 15, 19, 61, 0,
285, 1, 3, 1, 1, 9, 27, 89, 7,
369, 1, 1, 3, 7, 31, 15, 45, 23,
299, 1, 3, 3, 9, 9, 25, 107, 39 };
count dim, bit, nbits;
number max, *pini = ini;
cnumber nmax = 2*t->maxeval;
for( nbits = 0, max = 1; max <= nmax; max <<= 1 ) ++nbits;
t->rng.sobol.norm = 1./max;
for( bit = 0; bit < nbits; ++bit )
t->rng.sobol.v[0][bit] = (max >>= 1);
for( dim = 1; dim < t->ndim; ++dim ) {
number *pv = t->rng.sobol.v[dim], *pvv = pv;
number powers = *pini++, j;
int inibits = -1, bit;
for( j = powers; j; j >>= 1 ) ++inibits;
memcpy(pv, pini, inibits*sizeof(*pini));
pini += 8;
for( bit = inibits; bit < nbits; ++bit ) {
number newv = *pvv, j = powers;
int b;
for( b = 0; b < inibits; ++b ) {
if( j & 1 ) newv ^= pvv[b] << (inibits - b);
j >>= 1;
}
pvv[inibits] = newv;
++pvv;
}
for( bit = 0; bit < nbits - 1; ++bit )
pv[bit] <<= nbits - bit - 1;
}
t->rng.sobol.seq = 0;
VecClear(t->rng.sobol.prev);
t->rng.getrandom = SobolGet;
t->rng.skiprandom = SobolSkip;
}
/*
PART 2: Mersenne Twister pseudo-random-number generator
adapted from T. Nishimura's and M. Matsumoto's C code at
http://www.math.sci.hiroshima-u.ac.jp/~m-mat/MT/emt.html
*/
/* 32 or 53 random bits */
#define RANDOM_BITS 32
static inline state_t Twist(state_t a, state_t b)
{
state_t mixbits = (a & 0x80000000) | (b & 0x7fffffff);
state_t matrixA = (-(b & 1)) & 0x9908b0df;
return (mixbits >> 1) ^ matrixA;
}
static inline void MersenneReload(state_t *state)
{
state_t *s = state;
int j;
for( j = MERSENNE_N - MERSENNE_M + 1; --j; ++s )
*s = s[MERSENNE_M] ^ Twist(s[0], s[1]);
for( j = MERSENNE_M; --j; ++s )
*s = s[MERSENNE_M - MERSENNE_N] ^ Twist(s[0], s[1]);
*s = s[MERSENNE_M - MERSENNE_N] ^ Twist(s[0], state[0]);
}
static inline state_t MersenneInt(state_t s)
{
s ^= s >> 11;
s ^= (s << 7) & 0x9d2c5680;
s ^= (s << 15) & 0xefc60000;
return s ^ (s >> 18);
}
static void MersenneGet(This *t, real *x)
{
count next = t->rng.mersenne.next, dim;
for( dim = 0; dim < t->ndim; ++dim ) {
#if RANDOM_BITS == 53
state_t a, b;
#endif
if( next >= MERSENNE_N ) {
MersenneReload(t->rng.mersenne.state);
next = 0;
}
#if RANDOM_BITS == 53
a = MersenneInt(t->rng.mersenne.state[next++]) >> 5;
b = MersenneInt(t->rng.mersenne.state[next++]) >> 6;
x[dim] = (67108864.*a + b)/9007199254740992.;
#else
x[dim] = MersenneInt(t->rng.mersenne.state[next++])/4294967296.;
#endif
}
t->rng.mersenne.next = next;
}
static void MersenneSkip(This *t, number n)
{
#if RANDOM_BITS == 53
n = 2*n*t->ndim + t->rng.mersenne.next;
#else
n = n*t->ndim + t->rng.mersenne.next;
#endif
t->rng.mersenne.next = n % MERSENNE_N;
n /= MERSENNE_N;
while( n-- ) MersenneReload(t->rng.mersenne.state);
}
static inline void MersenneIni(This *t)
{
state_t seed = t->seed;
state_t *next = t->rng.mersenne.state;
count j;
for( j = 1; j <= MERSENNE_N; ++j ) {
*next++ = seed;
seed = 0x6c078965*(seed ^ (seed >> 30)) + j;
/* see Knuth TAOCP Vol 2, 3rd Ed, p. 106 for multiplier */
}
MersenneReload(t->rng.mersenne.state);
t->rng.mersenne.next = 0;
t->rng.getrandom = MersenneGet;
t->rng.skiprandom = MersenneSkip;
}
/*
PART 3: Ranlux subtract-and-borrow random-number generator
proposed by Marsaglia and Zaman, implemented by F. James with
the name RCARRY in 1991, and later improved by Martin Luescher
in 1993 to produce "Luxury Pseudorandom Numbers".
Adapted from the CERNlib Fortran 77 code by F. James, 1993.
The available luxury levels are:
level 0 (p = 24): equivalent to the original RCARRY of Marsaglia
and Zaman, very long period, but fails many tests.
level 1 (p = 48): considerable improvement in quality over level 0,
now passes the gap test, but still fails spectral test.
level 2 (p = 97): passes all known tests, but theoretically still
defective.
level 3 (p = 223): DEFAULT VALUE. Any theoretically possible
correlations have very small chance of being observed.
level 4 (p = 389): highest possible luxury, all 24 bits chaotic.
*/
static inline int RanluxInt(This *t, count n)
{
int s = 0;
while( n-- ) {
s = t->rng.ranlux.state[t->rng.ranlux.j24] -
t->rng.ranlux.state[t->rng.ranlux.i24] + t->rng.ranlux.carry;
s += (t->rng.ranlux.carry = NegQ(s)) & (1 << 24);
t->rng.ranlux.state[t->rng.ranlux.i24] = s;
--t->rng.ranlux.i24;
t->rng.ranlux.i24 += NegQ(t->rng.ranlux.i24) & 24;
--t->rng.ranlux.j24;
t->rng.ranlux.j24 += NegQ(t->rng.ranlux.j24) & 24;
}
return s;
}
static void RanluxGet(This *t, real *x)
{
/* The Generator proper: "Subtract-with-borrow",
as proposed by Marsaglia and Zaman, FSU, March 1989 */
count dim;
for( dim = 0; dim < t->ndim; ++dim ) {
cint nskip = (--t->rng.ranlux.n24 >= 0) ? 0 :
(t->rng.ranlux.n24 = 24, t->rng.ranlux.nskip);
cint s = RanluxInt(t, 1 + nskip);
x[dim] = s*0x1p-24;
/* small numbers (with less than 12 significant bits) are "padded" */
if( s < (1 << 12) )
x[dim] += t->rng.ranlux.state[t->rng.ranlux.j24]*0x1p-48;
}
}
static void RanluxSkip(This *t, cnumber n)
{
RanluxInt(t, n + t->rng.ranlux.nskip*(n/24));
t->rng.ranlux.n24 = 24 - n % 24;
}
static inline void RanluxIni(This *t)
{
cint skip[] = {24, 48, 97, 223, 389,
223, 223, 223, 223, 223, 223, 223, 223, 223, 223,
223, 223, 223, 223, 223, 223, 223, 223, 223, 223};
state_t seed = t->seed;
state_t level = RNG;
count i;
if( level < sizeof skip ) level = skip[level];
t->rng.ranlux.nskip = level - 24;
t->rng.ranlux.i24 = 23;
t->rng.ranlux.j24 = 9;
t->rng.ranlux.n24 = 24;
for( i = 0; i < 24; ++i ) {
cint k = seed/53668;
seed = 40014*(seed - k*53668) - k*12211;
seed += NegQ(seed) & 2147483563;
t->rng.ranlux.state[i] = seed & ((1 << 24) - 1);
}
t->rng.ranlux.carry = ~TrueQ(t->rng.ranlux.state[23]) & (1 << 24);
t->rng.getrandom = RanluxGet;
t->rng.skiprandom = RanluxSkip;
}
/*
PART 4: User routines:
- IniRandom sets up the random-number generator to produce a
sequence of at least n ndim-dimensional random vectors.
- GetRandom retrieves one random vector.
- SkipRandom skips over n random vectors.
*/
static inline void IniRandom(This *t)
{
if( t->seed == 0 ) SobolIni(t);
else if( RNG == 0 ) MersenneIni(t);
else RanluxIni(t);
}
Cuba-3.0/src/common/stddecl.h 0000644 0000000 0000000 00000010250 11640565570 014605 0 ustar root root /*
stddecl.h
Type declarations common to all Cuba routines
last modified 28 Sep 11 th
*/
#ifndef _stddecl_h_
#define _stddecl_h_
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#ifndef NDIM
#define NDIM t->ndim
#endif
#ifndef NCOMP
#define NCOMP t->ncomp
#endif
#define VERBOSE (t->flags & 3)
#define LAST (t->flags & 4)
#define SHARPEDGES (t->flags & 8)
#define REGIONS (t->flags & 128)
#define RNG (t->flags >> 8)
#define INFTY DBL_MAX
#define NOTZERO 0x1p-104
#define ABORT -999
#define Elements(x) (sizeof(x)/sizeof(*x))
#define Copy(d, s, n) memcpy(d, s, (n)*sizeof(*(d)))
#define VecCopy(d, s) Copy(d, s, t->ndim)
#define ResCopy(d, s) Copy(d, s, t->ncomp)
#define Clear(d, n) memset(d, 0, (n)*sizeof(*(d)))
#define VecClear(d) Clear(d, t->ndim)
#define ResClear(d) Clear(d, t->ncomp)
#define Zap(d) memset(d, 0, sizeof(d))
#define MaxErr(avg) Max(t->epsrel*fabs(avg), t->epsabs)
#ifdef __cplusplus
#define mallocset(p, n) (*(void **)&p = malloc(n))
#define reallocset(p, n) (*(void **)&p = realloc(p, n))
#else
#define mallocset(p, n) (p = malloc(n))
#define reallocset(p, n) (p = realloc(p, n))
#endif
#define ChkAlloc(r) if( r == NULL ) { \
fprintf(stderr, "Out of memory in " __FILE__ " line %d.\n", __LINE__); \
exit(1); \
}
#define Alloc(p, n) MemAlloc(p, (n)*sizeof(*p))
#define MemAlloc(p, n) ChkAlloc(mallocset(p, n))
#define ReAlloc(p, n) ChkAlloc(reallocset(p, n))
#ifdef __cplusplus
#define Extern extern "C"
#else
#define Extern extern
typedef enum { false, true } bool;
#endif
typedef const char cchar;
typedef const bool cbool;
typedef const int cint;
typedef const long clong;
#define COUNT "%d"
typedef /*unsigned*/ int count;
typedef const count ccount;
#ifdef LONGLONGINT
#define PREFIX(s) ll##s
#define NUMBER "%lld"
#define NUMBER7 "%7lld"
typedef long long int number;
#else
#define PREFIX(s) s
#define NUMBER "%d"
#define NUMBER7 "%7d"
typedef int number;
#endif
typedef const number cnumber;
#define REAL "%g"
#define REALF "%f"
typedef /*long*/ double real;
/* Switching to long double is not as trivial as it
might seem here. sqrt, erf, exp, pow need to be
replaced by their long double versions (sqrtl, ...),
printf formats need to be updated similarly, and
ferrying long doubles to Mathematica is of course
quite another matter, too. */
typedef const real creal;
struct _this;
typedef unsigned int state_t;
#define SOBOL_MINDIM 1
#define SOBOL_MAXDIM 40
/* length of state vector */
#define MERSENNE_N 624
/* period parameter */
#define MERSENNE_M 397
typedef struct {
void (*getrandom)(struct _this *t, real *x);
void (*skiprandom)(struct _this *t, cnumber n);
union {
struct {
real norm;
number v[SOBOL_MAXDIM][30], prev[SOBOL_MAXDIM];
number seq;
} sobol;
struct {
state_t state[MERSENNE_N];
count next;
} mersenne;
struct {
count n24, i24, j24, nskip;
int carry, state[24];
} ranlux;
};
} RNGState;
#if NOUNDERSCORE
#define SUFFIX(s) s
#else
#define SUFFIX(s) s##_
#endif
#define EXPORT(s) EXPORT_(PREFIX(s))
#define EXPORT_(s) SUFFIX(s)
static inline real Sq(creal x)
{
return x*x;
}
static inline real Min(creal a, creal b)
{
return (a < b) ? a : b;
}
static inline real Max(creal a, creal b)
{
return (a > b) ? a : b;
}
static inline real Weight(creal sum, creal sqsum, cnumber n)
{
creal w = sqrt(sqsum*n);
return (n - 1)/Max((w + sum)*(w - sum), NOTZERO);
}
/* (a < 0) ? -1 : 0 */
#define NegQ(a) ((a) >> (sizeof(a)*8 - 1))
/* (a < 0) ? -1 : 1 */
#define Sign(a) (1 + 2*NegQ(a))
/* (a < 0) ? 0 : a */
#define IDim(a) ((a) & NegQ(-(a)))
/* (a < b) ? a : b */
#define IMin(a, b) ((a) - IDim((a) - (b)))
/* (a > b) ? a : b */
#define IMax(a, b) ((b) + IDim((a) - (b)))
/* (a == 0) ? 0 : -1 */
#define TrueQ(a) NegQ((a) | (-a))
/* a + (a == 0) */
#define Min1(a) ((a) + 1 + TrueQ(a))
/* abs(a) + (a == 0) */
#define Abs1(a) (((a) ^ NegQ(a)) - NegQ((a) - 1))
#endif
Cuba-3.0/src/cuhre/Cuhre.c 0000644 0000000 0000000 00000003425 11640313310 014027 0 ustar root root /*
Cuhre.c
Adaptive integration using cubature rules
by Thomas Hahn
last modified 27 Sep 11 th
*/
#include "decl.h"
#define Print(s) puts(s); fflush(stdout)
/*********************************************************************/
#define CUHRE
#include "DoSample.c"
/*********************************************************************/
#include "common.c"
Extern void EXPORT(Cuhre)(ccount ndim, ccount ncomp,
Integrand integrand, void *userdata,
creal epsrel, creal epsabs,
cint flags, cnumber mineval, cnumber maxeval,
ccount key,
count *pnregions, number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.mineval = mineval;
t.maxeval = maxeval;
t.key = key;
t.nregions = 0;
t.neval = 0;
ForkCores(&t);
*pfail = Integrate(&t, integral, error, prob);
*pnregions = t.nregions;
*pneval = t.neval;
WaitCores(&t);
}
/*********************************************************************/
Extern void EXPORT(cuhre)(ccount *pndim, ccount *pncomp,
Integrand integrand, void *userdata,
creal *pepsrel, creal *pepsabs,
cint *pflags, cnumber *pmineval, cnumber *pmaxeval,
ccount *pkey,
count *pnregions, number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = *pndim;
t.ncomp = *pncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = *pepsrel;
t.epsabs = *pepsabs;
t.flags = *pflags;
t.mineval = *pmineval;
t.maxeval = *pmaxeval;
t.key = *pkey;
t.nregions = 0;
t.neval = 0;
ForkCores(&t);
*pfail = Integrate(&t, integral, error, prob);
*pnregions = t.nregions;
*pneval = t.neval;
WaitCores(&t);
}
Cuba-3.0/src/cuhre/Cuhre.tm 0000644 0000000 0000000 00000016317 11606571751 014252 0 ustar root root :Evaluate: BeginPackage["Cuba`"]
:Evaluate: Cuhre::usage =
"Cuhre[f, {x, xmin, xmax}..] computes a numerical approximation to the integral of the real scalar or vector function f.
The output is a list with entries of the form {integral, error, chi-square probability} for each component of the integrand."
:Evaluate: Key::usage = "Key is an option of Cuhre.
It specifies the basic integration rule:\n
7 = use a degree-7 rule,\n
9 = use a degree-9 rule,\n
11 = use a degree-11 rule (available only in 3 dimensions),\n
13 = use a degree-13 rule (available only in 2 dimensions),\n
otherwise the default rule is used: the degree-13 rule in 2 dimensions, the degree-11 rule in 3 dimensions, else the degree-9 rule."
:Evaluate: MinPoints::usage = "MinPoints is an option of Cuhre.
It specifies the minimum number of points to sample."
:Evaluate: Final::usage = "Final is an option of Cuhre.
It can take the values Last or All which determine whether only the last (largest) or all sets of samples collected on a subregion over the iterations contribute to the final result."
:Evaluate: Regions::usage = "Regions is an option of Cuhre.
It specifies whether the regions into which the integration region has been cut are returned together with the integration results."
:Evaluate: Region::usage = "Region[ll, ur, res] describes a subregion:
ll and ur are multidimensional equivalents of the region's lower left and upper right corner.
res gives the integration results for the region in a list with entries of the form {integral, error} for each component of the integrand."
:Evaluate: MapSample::usage = "MapSample is a function used to map the integrand over the points to be sampled."
:Evaluate: Begin["`Cuhre`"]
:Begin:
:Function: Cuhre
:Pattern: MLCuhre[ndim_, ncomp_,
epsrel_, epsabs_, flags_, mineval_, maxeval_,
key_]
:Arguments: {ndim, ncomp,
epsrel, epsabs, flags, mineval, maxeval,
key}
:ArgumentTypes: {Integer, Integer,
Real, Real, Integer, Integer, Integer,
Integer}
:ReturnType: Manual
:End:
:Evaluate: Attributes[Cuhre] = {HoldFirst}
:Evaluate: Options[Cuhre] = {PrecisionGoal -> 3, AccuracyGoal -> 12,
MinPoints -> 0, MaxPoints -> 50000, Key -> 0,
Verbose -> 1, Final -> Last, Regions -> False, Compiled -> True}
:Evaluate: Cuhre[f_, v:{_, _, _}.., opt___Rule] :=
Block[ {ff = HoldForm[f], ndim = Length[{v}], ncomp,
tags, vars, lower, range, jac, tmp, defs, intT,
rel, abs, mineval, maxeval, key, verbose, final, regions, compiled},
Message[Cuhre::optx, #, Cuhre]&/@
Complement[First/@ {opt}, tags = First/@ Options[Cuhre]];
{rel, abs, mineval, maxeval, key,
verbose, final, regions, compiled} =
tags /. {opt} /. Options[Cuhre];
{vars, lower, range} = Transpose[{v}];
jac = Simplify[Times@@ (range -= lower)];
tmp = Array[tmpvar, ndim];
defs = Simplify[lower + range tmp];
Block[{Set}, define[compiled, tmp, Thread[vars = defs], jac]];
intT = integrandT[f];
Block[#,
ncomp = Length[intT@@ RandomReal[1, ndim]];
MLCuhre[ndim, ncomp, 10.^-rel, 10.^-abs,
Min[Max[verbose, 0], 3] +
If[final === Last, 4, 0] +
If[TrueQ[regions], 128, 0],
mineval, maxeval, key]
]& @ vars
]
:Evaluate: tmpvar[n_] := ToExpression["Cuba`Cuhre`t" <> ToString[n]]
:Evaluate: Attributes[foo] = {HoldAll}
:Evaluate: define[True, tmp_, defs_, jac_] := (
TtoX := TtoX = Compile[tmp, defs];
integrandT[f_] := Compile[tmp, eval[defs, Chop[f jac]//N],
{{_eval, _Real, 1}}] )
:Evaluate: define[_, tmp_, defs_, jac_] := (
TtoX := TtoX = Function[tmp, defs];
integrandT[f_] := Function[tmp, eval[defs, Chop[f jac]//N]] )
:Evaluate: eval[_, f_Real] = {f}
:Evaluate: eval[_, f:{__Real}] = f
:Evaluate: eval[x_, _] := (Message[Cuhre::badsample, ff, x]; {})
:Evaluate: sample[x_] :=
Check[Flatten @ MapSample[intT@@ # &, Partition[x, ndim]], {}]
:Evaluate: MapSample = Map
:Evaluate: region[ll_, ur_, r___] := Region[TtoX@@ ll, TtoX@@ ur, r]
:Evaluate: Cuhre::badsample = "`` is not a real-valued function at ``."
:Evaluate: Cuhre::baddim = "Cannot integrate in `` dimensions."
:Evaluate: Cuhre::badcomp = "Cannot integrate `` components."
:Evaluate: Cuhre::accuracy =
"Desired accuracy was not reached within `` function evaluations on `` subregions."
:Evaluate: Cuhre::success = "Needed `` function evaluations on `` subregions."
:Evaluate: End[]
:Evaluate: EndPackage[]
/*
Cuhre.tm
Adaptive integration using cubature rules
by Thomas Hahn
last modified 11 Jul 11 th
*/
#include "mathlink.h"
#include "decl.h"
/*********************************************************************/
static void Status(MLCONST char *msg, cint n1, cint n2)
{
MLPutFunction(stdlink, "CompoundExpression", 2);
MLPutFunction(stdlink, "Message", 3);
MLPutFunction(stdlink, "MessageName", 2);
MLPutSymbol(stdlink, "Cuhre");
MLPutString(stdlink, msg);
MLPutInteger(stdlink, n1);
MLPutInteger(stdlink, n2);
}
/*********************************************************************/
static void Print(MLCONST char *s)
{
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Print", 1);
MLPutString(stdlink, s);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
MLNewPacket(stdlink);
}
/*********************************************************************/
static void DoSample(This *t, cnumber n, real *x, real *f)
{
real *mma_f;
long mma_n;
if( MLAbort ) longjmp(t->abort, -99);
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Cuba`Cuhre`sample", 1);
MLPutRealList(stdlink, x, n*t->ndim);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
if( !MLGetRealList(stdlink, &mma_f, &mma_n) ) {
MLClearError(stdlink);
MLNewPacket(stdlink);
longjmp(t->abort, -99);
}
if( mma_n != n*t->ncomp ) {
MLDisownRealList(stdlink, mma_f, mma_n);
longjmp(t->abort, -3);
}
Copy(f, mma_f, n*t->ncomp);
MLDisownRealList(stdlink, mma_f, mma_n);
t->neval += n;
}
/*********************************************************************/
#include "common.c"
static inline void DoIntegrate(This *t)
{
real integral[NCOMP], error[NCOMP], prob[NCOMP];
cint fail = Integrate(t, integral, error, prob);
if( fail < 0 ) {
switch( fail ) {
case -99:
MLPutFunction(stdlink, "Abort", 0);
return;
case -1:
Status("baddim", t->ndim, 0);
break;
case -2:
Status("badcomp", t->ncomp, 0);
break;
}
MLPutSymbol(stdlink, "$Failed");
}
else {
Status(fail ? "accuracy" : "success", t->neval, t->nregions);
MLPutFunction(stdlink, "Thread", 1);
MLPutFunction(stdlink, "List", 3);
MLPutRealList(stdlink, integral, t->ncomp);
MLPutRealList(stdlink, error, t->ncomp);
MLPutRealList(stdlink, prob, t->ncomp);
}
}
/*********************************************************************/
void Cuhre(cint ndim, cint ncomp,
creal epsrel, creal epsabs,
cint flags, cnumber mineval, cnumber maxeval,
cint key)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.mineval = mineval;
t.maxeval = maxeval;
t.key = key;
t.nregions = 0;
t.neval = 0;
DoIntegrate(&t);
MLEndPacket(stdlink);
}
/*********************************************************************/
int main(int argc, char **argv)
{
return MLMain(argc, argv);
}
Cuba-3.0/src/cuhre/Integrate.c 0000644 0000000 0000000 00000013341 11662410107 014707 0 ustar root root /*
Integrate.c
integrate over the unit hypercube
this file is part of Cuhre
last modified 21 Nov 11 th
*/
#define POOLSIZE 1024
static int Integrate(This *t, real *integral, real *error, real *prob)
{
TYPEDEFREGION;
typedef struct pool {
struct pool *next;
Region region[POOLSIZE];
} Pool;
count dim, comp, ncur, ipool, npool;
int fail;
Totals totals[NCOMP];
Pool *cur = NULL, *pool;
Region *region;
if( VERBOSE > 1 ) {
char s[256];
sprintf(s, "Cuhre input parameters:\n"
" ndim " COUNT "\n ncomp " COUNT "\n"
" epsrel " REAL "\n epsabs " REAL "\n"
" flags %d\n mineval " NUMBER "\n maxeval " NUMBER "\n"
" key " COUNT,
t->ndim, t->ncomp,
t->epsrel, t->epsabs,
t->flags, t->mineval, t->maxeval,
t->key);
Print(s);
}
if( BadComponent(t) ) return -2;
if( BadDimension(t) ) return -1;
RuleAlloc(t);
t->epsabs = Max(t->epsabs, NOTZERO);
t->mineval = IMax(t->mineval, t->rule.n + 1);
if( (fail = setjmp(t->abort)) ) goto abort;
Alloc(cur, 1);
cur->next = NULL;
ncur = 1;
region = cur->region;
region->div = 0;
for( dim = 0; dim < t->ndim; ++dim ) {
Bounds *b = ®ion->bounds[dim];
b->lower = 0;
b->upper = 1;
}
Sample(t, region);
for( comp = 0; comp < t->ncomp; ++comp ) {
Totals *tot = &totals[comp];
Result *r = ®ion->result[comp];
tot->avg = tot->lastavg = tot->guess = r->avg;
tot->err = tot->lasterr = r->err;
tot->weightsum = 1/Max(Sq(r->err), NOTZERO);
tot->avgsum = tot->weightsum*r->avg;
tot->chisq = tot->chisqsum = tot->chisum = 0;
}
for( t->nregions = 1; ; ++t->nregions ) {
count maxcomp, bisectdim;
real maxratio, maxerr;
Result result[NCOMP];
Region *regionL, *regionR;
Bounds *bL, *bR;
if( VERBOSE ) {
char s[128 + 128*NCOMP], *p = s;
p += sprintf(p, "\n"
"Iteration " COUNT ": " NUMBER " integrand evaluations so far",
t->nregions, t->neval);
for( comp = 0; comp < t->ncomp; ++comp ) {
cTotals *tot = &totals[comp];
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL " \tchisq " REAL " (" COUNT " df)",
comp + 1, tot->avg, tot->err, tot->chisq, t->nregions - 1);
}
Print(s);
}
maxratio = -INFTY;
maxcomp = 0;
for( comp = 0; comp < t->ncomp; ++comp ) {
creal ratio = totals[comp].err/MaxErr(totals[comp].avg);
if( ratio > maxratio ) {
maxratio = ratio;
maxcomp = comp;
}
}
if( maxratio <= 1 && t->neval >= t->mineval ) break;
if( t->neval >= t->maxeval ) {
fail = 1;
break;
}
maxerr = -INFTY;
regionL = cur->region;
npool = ncur;
for( pool = cur; pool; npool = POOLSIZE, pool = pool->next )
for( ipool = 0; ipool < npool; ++ipool ) {
Region *region = &pool->region[ipool];
creal err = region->result[maxcomp].err;
if( err > maxerr ) {
maxerr = err;
regionL = region;
}
}
if( ncur == POOLSIZE ) {
Pool *prev = cur;
Alloc(cur, 1);
cur->next = prev;
ncur = 0;
}
regionR = &cur->region[ncur++];
regionR->div = ++regionL->div;
ResCopy(result, regionL->result);
VecCopy(regionR->bounds, regionL->bounds);
bisectdim = result[maxcomp].bisectdim;
bL = ®ionL->bounds[bisectdim];
bR = ®ionR->bounds[bisectdim];
bL->upper = bR->lower = .5*(bL->upper + bL->lower);
Sample(t, regionL);
Sample(t, regionR);
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = &result[comp];
Result *rL = ®ionL->result[comp];
Result *rR = ®ionR->result[comp];
Totals *tot = &totals[comp];
real diff, err, w, avg, sigsq;
tot->lastavg += diff = rL->avg + rR->avg - r->avg;
diff = fabs(.25*diff);
err = rL->err + rR->err;
if( err > 0 ) {
creal c = 1 + 2*diff/err;
rL->err *= c;
rR->err *= c;
}
rL->err += diff;
rR->err += diff;
tot->lasterr += rL->err + rR->err - r->err;
tot->weightsum += w = 1/Max(Sq(tot->lasterr), NOTZERO);
sigsq = 1/tot->weightsum;
tot->avgsum += w*tot->lastavg;
avg = sigsq*tot->avgsum;
tot->chisum += w *= tot->lastavg - tot->guess;
tot->chisqsum += w*tot->lastavg;
tot->chisq = tot->chisqsum - avg*tot->chisum;
if( LAST ) {
tot->avg = tot->lastavg;
tot->err = tot->lasterr;
}
else {
tot->avg = avg;
tot->err = sqrt(sigsq);
}
}
}
for( comp = 0; comp < t->ncomp; ++comp ) {
cTotals *tot = &totals[comp];
integral[comp] = tot->avg;
error[comp] = tot->err;
prob[comp] = ChiSquare(tot->chisq, t->nregions - 1);
}
#ifdef MLVERSION
if( REGIONS ) {
MLPutFunction(stdlink, "List", 2);
MLPutFunction(stdlink, "List", t->nregions);
npool = ncur;
for( pool = cur; pool; npool = POOLSIZE, pool = pool->next )
for( ipool = 0; ipool < npool; ++ipool ) {
Region const *region = &pool->region[ipool];
real lower[NDIM], upper[NDIM];
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
lower[dim] = b->lower;
upper[dim] = b->upper;
}
MLPutFunction(stdlink, "Cuba`Cuhre`region", 3);
MLPutRealList(stdlink, lower, t->ndim);
MLPutRealList(stdlink, upper, t->ndim);
MLPutFunction(stdlink, "List", t->ncomp);
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
real res[] = {r->avg, r->err};
MLPutRealList(stdlink, res, Elements(res));
}
}
}
#endif
abort:
while( (pool = cur) ) {
cur = cur->next;
free(pool);
}
RuleFree(t);
return fail;
}
Cuba-3.0/src/cuhre/Rule.c 0000644 0000000 0000000 00000051430 11403420506 013672 0 ustar root root /*
Rule.c
integration with cubature rules
code lifted with minor modifications from DCUHRE
by J. Berntsen, T. Espelid, and A. Genz
this file is part of Divonne
last modified 8 Jun 10 th
*/
enum { nrules = 5 };
#define TYPEDEFSET \
typedef struct { \
count n; \
real weight[nrules], scale[nrules], norm[nrules]; \
real gen[NDIM]; \
} Set
/*********************************************************************/
static void Rule13Alloc(This *t)
{
static creal w[][nrules] = {
{ .00844923090033615, .3213775489050763, .3372900883288987,
-.8264123822525677, .6539094339575232 },
{ .023771474018994404, -.1767341636743844, -.1644903060344491,
.306583861409436, -.2041614154424632},
{ .02940016170142405, .07347600537466073, .07707849911634623,
.002389292538329435, -.174698151579499 },
{ .006644436465817374, -.03638022004364754, -.03804478358506311,
-.1343024157997222, .03937939671417803 },
{ .0042536044255016, .021252979220987123, .02223559940380806,
.08833366840533902, .006974520545933992 },
{ 0, .1460984204026913, .1480693879765931,
0, 0 },
{ .0040664827465935255, .017476132861520992, 4.467143702185815e-6,
.0009786283074168292, .0066677021717782585 },
{ .03362231646315497, .1444954045641582, .150894476707413,
-.1319227889147519, .05512960621544304 },
{ .033200804136503725, .0001307687976001325, 3.6472001075162155e-5,
.00799001220015063, .05443846381278608 },
{ .014093686924979677, .0005380992313941161, .000577719899901388,
.0033917470797606257, .02310903863953934 },
{ .000977069770327625, .0001042259576889814, .0001041757313688177,
.0022949157182832643, .01506937747477189 },
{ .007531996943580376, -.001401152865045733, -.001452822267047819,
-.01358584986119197, -.060570216489018905 },
{ .02577183086722915, .008041788181514763, .008338339968783704,
.04025866859057809, .04225737654686337},
{ .015625, -.1420416552759383, -.147279632923196,
.003760268580063992, .02561989142123099 }
};
static creal g[] = {
.12585646717265545, .3506966822267133,
.4795480315809981, .4978005239276064,
.25, .07972723291487795,
.1904495567970094, .3291384627633596,
.43807365825146577, .499121592026599,
.4895111329084231, .32461421628226944,
.43637106005656195, .1791307322940614,
.2833333333333333, .1038888888888889 };
enum { nsets = 14, ndim = 2 };
TYPEDEFSET;
count n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
Copy(last->weight, w[0], nrules);
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[1], nrules);
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[2], nrules);
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[3], nrules);
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[4], nrules);
last->gen[0] = g[3];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[5], nrules);
last->gen[0] = g[4];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[6], nrules);
last->gen[0] = g[5];
last->gen[1] = g[5];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[7], nrules);
last->gen[0] = g[6];
last->gen[1] = g[6];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[8], nrules);
last->gen[0] = g[7];
last->gen[1] = g[7];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[9], nrules);
last->gen[0] = g[8];
last->gen[1] = g[8];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[10], nrules);
last->gen[0] = g[9];
last->gen[1] = g[9];
++last;
n += last->n = 4*ndim*(ndim - 1);
Copy(last->weight, w[11], nrules);
last->gen[0] = g[10];
last->gen[1] = g[11];
++last;
n += last->n = 4*ndim*(ndim - 1);
Copy(last->weight, w[12], nrules);
last->gen[0] = g[12];
last->gen[1] = g[13];
++last;
n += last->n = 4*ndim*(ndim - 1);
Copy(last->weight, w[13], nrules);
last->gen[0] = g[14];
last->gen[1] = g[15];
t->rule.first = first;
t->rule.last = last;
t->rule.errcoeff[0] = 10;
t->rule.errcoeff[1] = 1;
t->rule.errcoeff[2] = 5;
t->rule.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static void Rule11Alloc(This *t)
{
static creal w[][nrules] = {
{ .0009903847688882167, 1.715006248224684, 1.936014978949526,
.517082819560576, 2.05440450381852 },
{ .0084964717409851, -.3755893815889209, -.3673449403754268,
.01445269144914044, .013777599884901202 },
{ .00013587331735072814, .1488632145140549, .02929778657898176,
-.3601489663995932, -.576806291790441 },
{ .022982920777660364, -.2497046640620823, -.1151883520260315,
.3628307003418485, .03726835047700328 },
{ .004202649722286289, .1792501419135204, .05086658220872218,
.007148802650872729, .0068148789397772195 },
{ .0012671889041675774, .0034461267589738897, .04453911087786469,
-.09222852896022966, .057231697338518496 },
{ .0002109560854981544, -.005140483185555825, -.022878282571259,
.01719339732471725, -.044930187438112855 },
{ .016830857056410086, .006536017839876424, .02908926216345833,
-.102141653746035, .027292365738663484 },
{ .00021876823557504823, -.00065134549392297, -.002898884350669207,
-.007504397861080493, .000354747395055699 },
{ .009690420479796819, -.006304672433547204, -.028059634133074954,
.01648362537726711, .01571366799739551 },
{ .030773311284628138, .01266959399788263, .05638741361145884,
.05234610158469334, .049900992192785674 },
{ .0084974310856038, -.005454241018647931, -.02427469611942451,
.014454323316130661, .0137791555266677 },
{ .0017749535291258914, .004826995274768427, .021483070341828822,
.003019236275367777, .0028782064230998723 }
};
static creal g[] = {
.095, .25,
.375, .4,
.4975, .49936724991757,
.38968518428362114, .49998494965443835,
.3951318612385894, .22016983438253684,
.4774686911397297, .2189239229503431,
.4830546566815374, .2288552938881567 };
enum { nsets = 13, ndim = 3 };
TYPEDEFSET;
count n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
Copy(last->weight, w[0], nrules);
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[1], nrules);
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[2], nrules);
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[3], nrules);
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[4], nrules);
last->gen[0] = g[3];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[5], nrules);
last->gen[0] = g[4];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[6], nrules);
last->gen[0] = g[5];
last->gen[1] = g[5];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[7], nrules);
last->gen[0] = g[6];
last->gen[1] = g[6];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
Copy(last->weight, w[8], nrules);
last->gen[0] = g[7];
last->gen[1] = g[7];
last->gen[2] = g[7];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
Copy(last->weight, w[9], nrules);
last->gen[0] = g[8];
last->gen[1] = g[8];
last->gen[2] = g[8];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
Copy(last->weight, w[10], nrules);
last->gen[0] = g[9];
last->gen[1] = g[9];
last->gen[2] = g[9];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2);
Copy(last->weight, w[11], nrules);
last->gen[0] = g[10];
last->gen[1] = g[11];
last->gen[2] = g[11];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2);
Copy(last->weight, w[12], nrules);
last->gen[0] = g[12];
last->gen[1] = g[12];
last->gen[2] = g[13];
t->rule.first = first;
t->rule.last = last;
t->rule.errcoeff[0] = 4;
t->rule.errcoeff[1] = .5;
t->rule.errcoeff[2] = 3;
t->rule.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static void Rule9Alloc(This *t)
{
static creal w[] = {
-.0023611709677855117884, .11415390023857325268,
-.63833920076702389094, .74849988504685208004,
-.0014324017033399125142, .057471507864489725949,
-.14225104571434243234, -.062875028738286979989,
.254591133248959089, -1.207328566678236261,
.89567365764160676508, -.36479356986049146661,
.0035417564516782676826, -.072609367395893679605,
.10557491625218991012, .0021486025550098687713,
-.032268563892953949998, .010636783990231217481,
.014689102496143490175, .51134708346467591431,
.45976448120806344646, .18239678493024573331,
-.04508628929435784076, .21415883524352793401,
-.027351546526545644722, .054941067048711234101,
.11937596202570775297, .65089519391920250593,
.14744939829434460168, .057693384490973483573,
.034999626602143583822, -1.3868627719278281436,
-.2386668732575008879, .015532417276607053264,
.0035328099607090870236, .09231719987444221619,
.02254314464717892038, .013675773263272822361,
-.32544759695960125297, .0017708782258391338413,
.0010743012775049343856, .25150011495314791996 };
static creal g[] = {
.47795365790226950619, .20302858736911986780,
.44762735462617812882, .125,
.34303789878087814570 };
enum { nsets = 9 };
TYPEDEFSET;
ccount ndim = t->ndim;
ccount twondim = 1 << ndim;
count dim, n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
last->weight[0] = ndim*(ndim*(ndim*w[0] + w[1]) + w[2]) + w[3];
last->weight[1] = ndim*(ndim*(ndim*w[4] + w[5]) + w[6]) - w[7];
last->weight[2] = ndim*w[8] - last->weight[1];
last->weight[3] = ndim*(ndim*w[9] + w[10]) - 1 + last->weight[0];
last->weight[4] = ndim*w[11] + 1 - last->weight[0];
++last;
n += last->n = 2*ndim;
last->weight[0] = ndim*(ndim*w[12] + w[13]) + w[14];
last->weight[1] = ndim*(ndim*w[15] + w[16]) + w[17];
last->weight[2] = w[18] - last->weight[1];
last->weight[3] = ndim*w[19] + w[20] + last->weight[0];
last->weight[4] = w[21] - last->weight[0];
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
last->weight[0] = ndim*w[22] + w[23];
last->weight[1] = ndim*w[24] + w[25];
last->weight[2] = w[26] - last->weight[1];
last->weight[3] = ndim*w[27] + w[28];
last->weight[4] = -last->weight[0];
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
last->weight[0] = w[29];
last->weight[1] = w[30];
last->weight[2] = -w[29];
last->weight[3] = w[31];
last->weight[4] = -w[29];
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim;
last->weight[2] = w[32];
last->gen[0] = g[3];
++last;
n += last->n = 2*ndim*(ndim - 1);
last->weight[0] = w[33] - ndim*w[12];
last->weight[1] = w[34] - ndim*w[15];
last->weight[2] = -last->weight[1];
last->weight[3] = w[35] + last->weight[0];
last->weight[4] = -last->weight[0];
last->gen[0] = g[0];
last->gen[1] = g[0];
++last;
n += last->n = 4*ndim*(ndim - 1);
last->weight[0] = w[36];
last->weight[1] = w[37];
last->weight[2] = -w[37];
last->weight[3] = w[38];
last->weight[4] = -w[36];
last->gen[0] = g[0];
last->gen[1] = g[1];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
last->weight[0] = w[39];
last->weight[1] = w[40];
last->weight[2] = -w[40];
last->weight[3] = w[39];
last->weight[4] = -w[39];
last->gen[0] = g[0];
last->gen[1] = g[0];
last->gen[2] = g[0];
++last;
n += last->n = twondim;
last->weight[0] = w[41]/twondim;
last->weight[1] = w[7]/twondim;
last->weight[2] = -last->weight[1];
last->weight[3] = last->weight[0];
last->weight[4] = -last->weight[0];
for( dim = 0; dim < ndim; ++dim )
last->gen[dim] = g[4];
t->rule.first = first;
t->rule.last = last;
t->rule.errcoeff[0] = 5;
t->rule.errcoeff[1] = 1;
t->rule.errcoeff[2] = 5;
t->rule.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static void Rule7Alloc(This *t)
{
static creal w[] = {
.019417866674748388428, -.40385257701150182546,
.64485668767465982223, .01177982690775806141,
-.18041318740733609012, -.088785828081335044443,
.056328645808285941374, -.0097089333373741942142,
-.99129176779582358138, -.17757165616267008889,
.12359398032043233572, .074978148702033690681,
.55489147051423559776, .088041241522692771226,
.021118358455513385083, -.0099302203239653333087,
-.064100053285010904179, .030381729038221007659,
.0058899134538790307051, -.0048544666686870971071,
.35514331232534017777 };
static creal g[] = {
.47795365790226950619, .20302858736911986780,
.375, .34303789878087814570 };
enum { nsets = 6 };
TYPEDEFSET;
ccount ndim = t->ndim;
ccount twondim = 1 << ndim;
count dim, n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
last->weight[0] = ndim*(ndim*w[0] + w[1]) + w[2];
last->weight[1] = ndim*(ndim*w[3] + w[4]) - w[5];
last->weight[2] = ndim*w[6] - last->weight[1];
last->weight[3] = ndim*(ndim*w[7] + w[8]) - w[9];
last->weight[4] = 1 - last->weight[0];
++last;
n += last->n = 2*ndim;
last->weight[0] = w[10];
last->weight[1] = w[11];
last->weight[2] = -w[10];
last->weight[3] = w[12];
last->weight[4] = -w[10];
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
last->weight[0] = w[13] - ndim*w[0];
last->weight[1] = w[14] - ndim*w[3];
last->weight[2] = w[15] - last->weight[1];
last->weight[3] = w[16] - ndim*w[7];
last->weight[4] = -last->weight[0];
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
last->weight[2] = w[17];
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim*(ndim - 1);
last->weight[0] = -w[7];
last->weight[1] = w[18];
last->weight[2] = -w[18];
last->weight[3] = w[19];
last->weight[4] = w[7];
last->gen[0] = g[0];
last->gen[1] = g[0];
++last;
n += last->n = twondim;
last->weight[0] = w[20]/twondim;
last->weight[1] = w[5]/twondim;
last->weight[2] = -last->weight[1];
last->weight[3] = w[9]/twondim;
last->weight[4] = -last->weight[0];
for( dim = 0; dim < ndim; ++dim )
last->gen[dim] = g[3];
t->rule.first = first;
t->rule.last = last;
t->rule.errcoeff[0] = 5;
t->rule.errcoeff[1] = 1;
t->rule.errcoeff[2] = 5;
t->rule.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static inline void RuleAlloc(This *t)
{
if( t->key == 13 && t->ndim == 2 ) Rule13Alloc(t);
else if( t->key == 11 && t->ndim == 3 ) Rule11Alloc(t);
else if( t->key == 9 ) Rule9Alloc(t);
else if( t->key == 7 ) Rule7Alloc(t);
else {
if( t->ndim == 2 ) Rule13Alloc(t);
else if( t->ndim == 3 ) Rule11Alloc(t);
else Rule9Alloc(t);
}
Alloc(t->rule.x, t->rule.n*(t->ndim + t->ncomp));
t->rule.f = t->rule.x + t->rule.n*t->ndim;
}
/*********************************************************************/
static inline void RuleFree(cThis *t)
{
free(t->rule.x);
free(t->rule.first);
}
/*********************************************************************/
static real *ExpandFS(cThis *t, cBounds *b, real *g, real *x)
{
count dim, ndim = t->ndim;
next:
/* Compute centrally symmetric sum for permutation of G */
for( dim = 0; dim < ndim; ++dim )
*x++ = (.5 + g[dim])*b[dim].lower + (.5 - g[dim])*b[dim].upper;
for( dim = 0; dim < ndim; ) {
g[dim] = -g[dim];
if( g[dim++] < 0 ) goto next;
}
/* Find next distinct permutation of G and loop back for next sum.
Permutations are generated in reverse lexicographic order. */
for( dim = 1; dim < ndim; ++dim ) {
creal gd = g[dim];
if( g[dim - 1] > gd ) {
count i, j = dim, ix = dim, dx = dim - 1;
for( i = 0; i < --j; ++i ) {
creal tmp = g[i];
g[i] = g[j];
g[j] = tmp;
if( tmp <= gd ) --dx;
if( g[i] > gd ) ix = i;
}
if( g[dx] <= gd ) dx = ix;
g[dim] = g[dx];
g[dx] = gd;
goto next;
}
}
/* Restore original order to generators */
for( dim = 0; dim < --ndim; ++dim ) {
creal tmp = g[dim];
g[dim] = g[ndim];
g[ndim] = tmp;
}
return x;
}
/*********************************************************************/
static void Sample(This *t, void *voidregion)
{
TYPEDEFREGION;
TYPEDEFSET;
Region *const region = (Region *)voidregion;
creal vol = ldexp(1., -region->div);
real *x = t->rule.x, *f = t->rule.f;
Set *first = (Set *)t->rule.first, *last = (Set *)t->rule.last, *s;
creal *errcoeff = t->rule.errcoeff;
creal ratio = Sq(first[2].gen[0]/first[1].gen[0]);
ccount offset = 2*t->ndim*t->ncomp;
count dim, comp, rul, n, maxdim = 0;
real maxrange = 0;
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
creal range = b->upper - b->lower;
if( range > maxrange ) {
maxrange = range;
maxdim = dim;
}
}
for( s = first; s <= last; ++s )
if( s->n ) x = ExpandFS(t, region->bounds, s->gen, x);
DoSample(t, t->rule.n, t->rule.x, f);
for( comp = 0; comp < t->ncomp; ++comp ) {
Result *r = ®ion->result[comp];
real sum[nrules];
creal *f1 = f;
creal base = *f1*2*(1 - ratio);
real maxdiff = 0;
count bisectdim = maxdim;
for( dim = 0; dim < t->ndim; ++dim ) {
creal *fp = f1 + t->ncomp;
creal *fm = fp + t->ncomp;
creal fourthdiff = fabs(base +
ratio*(fp[0] + fm[0]) - (fp[offset] + fm[offset]));
f1 = fm;
if( fourthdiff > maxdiff ) {
maxdiff = fourthdiff;
bisectdim = dim;
}
}
r->bisectdim = bisectdim;
f1 = f++;
Zap(sum);
for( s = first; s <= last; ++s )
for( n = s->n; n; --n ) {
creal fun = *f1;
f1 += t->ncomp;
for( rul = 0; rul < nrules; ++rul )
sum[rul] += fun*s->weight[rul];
}
/* Search for the null rule, in the linear space spanned by two
successive null rules in our sequence, which gives the greatest
error estimate among all normalized (1-norm) null rules in this
space. */
for( rul = 1; rul < nrules - 1; ++rul ) {
real maxerr = 0;
for( s = first; s <= last; ++s )
maxerr = Max(maxerr,
fabs(sum[rul + 1] + s->scale[rul]*sum[rul])*s->norm[rul]);
sum[rul] = maxerr;
}
r->avg = vol*sum[0];
r->err = vol*(
(errcoeff[0]*sum[1] <= sum[2] && errcoeff[0]*sum[2] <= sum[3]) ?
errcoeff[1]*sum[1] :
errcoeff[2]*Max(Max(sum[1], sum[2]), sum[3]) );
}
if( VERBOSE > 2 ) {
char s[64*NDIM + 128*NCOMP], *p = s;
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
p += sprintf(p,
(dim == 0) ? "\nRegion (" REALF ") - (" REALF ")" :
"\n (" REALF ") - (" REALF ")",
b->lower, b->upper);
}
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL, comp + 1, r->avg, r->err);
}
Print(s);
}
}
Cuba-3.0/src/cuhre/common.c 0000644 0000000 0000000 00000000601 11403136222 014244 0 ustar root root /*
common.c
includes most of the modules
this file is part of Cuhre
last modified 7 Jun 10 th
*/
#include "ChiSquare.c"
#include "Rule.c"
static inline bool BadDimension(cThis *t)
{
if( t->ndim > NDIM ) return true;
return t->ndim < 2;
}
static inline bool BadComponent(cThis *t)
{
if( t->ncomp > NCOMP ) return true;
return t->ncomp < 1;
}
#include "Integrate.c"
Cuba-3.0/src/cuhre/decl.h 0000644 0000000 0000000 00000002066 11642543117 013711 0 ustar root root /*
decl.h
Type declarations
this file is part of Cuhre
last modified 4 Oct 11 th
*/
#include "stddecl.h"
typedef struct {
real avg, err;
count bisectdim;
} Result;
typedef const Result cResult;
typedef struct {
real avg, err, lastavg, lasterr;
real weightsum, avgsum;
real guess, chisum, chisqsum, chisq;
} Totals;
typedef const Totals cTotals;
typedef struct {
real lower, upper;
} Bounds;
typedef const Bounds cBounds;
typedef struct {
real *x, *f;
void *first, *last;
real errcoeff[3];
count n;
} Rule;
typedef const Rule cRule;
typedef int (*Integrand)(ccount *, creal *, ccount *, real *, void *);
typedef struct _this {
count ndim, ncomp;
#ifndef MLVERSION
Integrand integrand;
void *userdata;
int ncores, *child;
#endif
real epsrel, epsabs;
int flags;
number mineval, maxeval;
count key, nregions;
number neval;
Rule rule;
jmp_buf abort;
} This;
typedef const This cThis;
#define TYPEDEFREGION \
typedef struct region { \
count div; \
Result result[NCOMP]; \
Bounds bounds[NDIM]; \
} Region
Cuba-3.0/src/divonne/Divonne.c 0000644 0000000 0000000 00000010004 11660457320 014722 0 ustar root root /*
Divonne.c
Multidimensional integration by partitioning
originally by J.H. Friedman and M.H. Wright
(CERNLIB subroutine D151)
this version by Thomas Hahn
last modified 15 Nov 11 th
*/
#include "decl.h"
#define Print(s) puts(s); fflush(stdout)
/*********************************************************************/
#define DIVONNE
static void DoSample(This *t, number n, creal *x, real *f, ccount ldx);
static int ExploreParent(This *t, cint iregion);
/*********************************************************************/
static inline count SampleExtra(This *t, cBounds *b)
{
number n = t->nextra;
t->peakfinder(&t->ndim, b, &n, t->xextra);
DoSample(t, n, t->xextra, t->fextra, t->ldxgiven);
return n;
}
/*********************************************************************/
static inline void AllocGiven(This *t, creal *xgiven)
{
if( t->ngiven | t->nextra ) {
cnumber nxgiven = t->ngiven*(t->ldxgiven = IMax(t->ldxgiven, t->ndim));
cnumber nxextra = t->nextra*t->ldxgiven;
cnumber nfgiven = t->ngiven*t->ncomp;
cnumber nfextra = t->nextra*t->ncomp;
Alloc(t->xgiven, nxgiven + nxextra + nfgiven + nfextra);
t->xextra = t->xgiven + nxgiven;
t->fgiven = t->xextra + nxextra;
t->fextra = t->fgiven + nfgiven;
if( nxgiven ) {
t->phase = 0;
Copy(t->xgiven, xgiven, nxgiven);
DoSample(t, t->ngiven, t->xgiven, t->fgiven, t->ldxgiven);
}
}
}
/*********************************************************************/
#include "common.c"
#include "DoSample.c"
Extern void EXPORT(Divonne)(ccount ndim, ccount ncomp,
Integrand integrand, void *userdata,
creal epsrel, creal epsabs,
cint flags, cint seed,
cnumber mineval, cnumber maxeval,
cint key1, cint key2, cint key3, ccount maxpass,
creal border, creal maxchisq, creal mindeviation,
cnumber ngiven, ccount ldxgiven, creal *xgiven,
cnumber nextra, PeakFinder peakfinder,
int *pnregions, number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.seed = seed;
t.mineval = mineval;
t.maxeval = maxeval;
t.key1 = key1;
t.key2 = key2;
t.key3 = key3;
t.maxpass = maxpass;
t.border.upper = 1 - (t.border.lower = border);
t.maxchisq = maxchisq;
t.mindeviation = mindeviation;
t.ngiven = ngiven;
t.xgiven = NULL;
t.ldxgiven = ldxgiven;
t.nextra = nextra;
t.peakfinder = peakfinder;
t.nregions = 0;
t.neval = 0;
ForkCores(&t);
AllocGiven(&t, xgiven);
*pfail = Integrate(&t, integral, error, prob);
*pnregions = t.nregions;
*pneval = t.neval;
free(t.xgiven);
WaitCores(&t);
}
/*********************************************************************/
Extern void EXPORT(divonne)(ccount *pndim, ccount *pncomp,
Integrand integrand, void *userdata,
creal *pepsrel, creal *pepsabs,
cint *pflags, cint *pseed,
cnumber *pmineval, cnumber *pmaxeval,
cint *pkey1, cint *pkey2, cint *pkey3, ccount *pmaxpass,
creal *pborder, creal *pmaxchisq, creal *pmindeviation,
cnumber *pngiven, ccount *pldxgiven, creal *xgiven,
cnumber *pnextra, PeakFinder peakfinder,
int *pnregions, number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = *pndim;
t.ncomp = *pncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = *pepsrel;
t.epsabs = *pepsabs;
t.flags = *pflags;
t.seed = *pseed;
t.mineval = *pmineval;
t.maxeval = *pmaxeval;
t.key1 = *pkey1;
t.key2 = *pkey2;
t.key3 = *pkey3;
t.maxpass = *pmaxpass;
t.border.upper = 1 - (t.border.lower = *pborder);
t.maxchisq = *pmaxchisq;
t.mindeviation = *pmindeviation;
t.ngiven = *pngiven;
t.xgiven = NULL;
t.ldxgiven = *pldxgiven;
t.nextra = *pnextra;
t.peakfinder = peakfinder;
t.nregions = 0;
t.neval = 0;
ForkCores(&t);
AllocGiven(&t, xgiven);
*pfail = Integrate(&t, integral, error, prob);
*pnregions = t.nregions;
*pneval = t.neval;
free(t.xgiven);
WaitCores(&t);
}
Cuba-3.0/src/divonne/Divonne.tm 0000644 0000000 0000000 00000036223 11645264063 015136 0 ustar root root :Evaluate: BeginPackage["Cuba`"]
:Evaluate: Divonne::usage =
"Divonne[f, {x, xmin, xmax}..] computes a numerical approximation to the integral of the real scalar or vector function f.
The output is a list with entries of the form {integral, error, chi-square probability} for each component of the integrand."
:Evaluate: Key1::usage = "Key1 is an option of Divonne.
It determines sampling in the partitioning phase.\n
Special cases:\n
Key1 = 7: use a degree-7 cubature rule,\n
Key1 = 9: use a degree-9 cubature rule,\n
Key1 = 11: use a degree-11 cubature rule (available only in 3 dimensions),\n
Key1 = 13: use a degree-13 cubature rule (available only in 2 dimensions),\n
otherwise a random sample of n1 = Abs[Key1] points is used, where the sign of Key1 determines the type of sample:\n
Key1 > 0: use a Korobov quasi-random sample,\n
Key1 < 0: use a \"standard\" sample."
:Evaluate: Key2::usage = "Key2 is an option of Divonne.
It determines sampling in the main integration phase.\n
Special cases:\n
Key2 = 7: use a degree-7 cubature rule,\n
Key2 = 9: use a degree-9 cubature rule,\n
Key2 = 11: use a degree-11 cubature rule (available only in 3 dimensions),\n
Key2 = 13: use a degree-13 cubature rule (available only in 2 dimensions),\n
otherwise a random sample is used, where the sign of Key2 determines the type of sample:\n
Key2 > 0: use a Korobov quasi-random sample,\n
Key2 < 0: use a \"standard\" sample,\n
and n2 = Abs[Key2] determines the number of points:\n
n2 >= 40: sample n2 points,\n
n2 < 40: sample n2*nneed points, where nneed is the number of points needed to reach the prescribed accuracy, as estimated by Divonne from the results of the partitioning phase."
:Evaluate: Key3::usage = "Key3 is an option of Divonne.
It sets the strategy for the refinement phase:\n
Key3 = 0: do not further treat the subregion,\n
Key3 = 1: split the subregion up once more,\n
for other values the region is sampled a third time:\n
Key3 = 7: use a degree-7 cubature rule,\n
Key3 = 9: use a degree-9 cubature rule,\n
Key3 = 11: use a degree-11 cubature rule (available only in 3 dimensions),\n
Key3 = 13: use a degree-13 cubature rule (available only in 2 dimensions),\n
otherwise a random sample is used, where the sign of Key3 determines the type of sample:\n
Key3 > 0: use a Korobov quasi-random sample,\n
Key3 < 0: use a \"standard\" sample,\n
and n3 = Abs[Key3] determines the number of points:\n
n3 >= 40: sample n3 points,\n
n3 < 40: sample n3*nneed points, where nneed is the number of points needed to reach the prescribed accuracy, as estimated by Divonne from the results of the partitioning phase."
:Evaluate: MaxPass::usage = "MaxPass is an option of Divonne.
It controls the partitioning termination.
The partitioning phase is terminated when the estimated total number of integrand evaluations (partitioning plus main integration) does not decrease for MaxPass successive iterations."
:Evaluate: Border::usage = "Border is an option of Divonne.
It specifies the width of the border of the integration region.
Points falling into this border region are not sampled directly, but are extrapolated from two samples from the interior.
The border width always refers to the unit hypercube, i.e. it is not rescaled if the integration region is not the unit hypercube."
:Evaluate: MaxChisq::usage = "MaxChisq is an option of Divonne.
It specifies the maximum chi-square value a single subregion is allowed to have in the main integration phase.
Regions which fail this chi-square test and whose sample averages differ by more than MinDeviation move on to the refinement phase."
:Evaluate: MinDeviation::usage = "MinDeviation is an option of Divonne.
Regions which fail the chi-square test are not treated further if their sample averages differ by less than MinDeviation.
MinDeviation is specified as the fraction of the requested error of the entire integral."
:Evaluate: Given::usage = "Given is an option of Divonne.
It provides a list of points where the integrand might have peaks.
Divonne will consider these points when partitioning the integration region."
:Evaluate: NExtra::usage = "NExtra is an option of Divonne.
It specifies the maximum number of points that will be considered in the output of the PeakFinder function."
:Evaluate: PeakFinder::usage = "PeakFinder is an option of Divonne.
It specifies the peak-finder function.
This function is called whenever a region is up for subdivision and is supposed to point out possible peaks lying in the region, thus acting as the dynamic counterpart of the static list of points supplied with Given.
It is invoked with two arguments, the multidimensional equivalents of the lower left and upper right corners of the region being investigated, and must return a (possibly empty) list of points."
:Evaluate: MinPoints::usage = "MinPoints is an option of Divonne.
It specifies the minimum number of points to sample."
:Evaluate: Final::usage = "Final is an option of Divonne.
It can take the values Last or All which determine whether only the last (largest) or all sets of samples collected on a subregion over the integration phases contribute to the final result."
:Evaluate: PseudoRandom::usage = "PseudoRandom is an option of Divonne.
It can take the following values:
False for Sobol quasi-random numbers (default),
True or 0 for Mersenne Twister pseudo-random numbers,
any other integer value n for Ranlux pseudo-random numbers of luxury level n."
:Evaluate: PseudoRandomSeed::usage = "PseudoRandomSeed is an option of Divonne.
It specifies the seed for the pseudo-random number generator."
:Evaluate: Regions::usage = "Regions is an option of Divonne.
It specifies whether the regions into which the integration region has been cut are returned together with the integration results."
:Evaluate: Region::usage = "Region[ll, ur, res, df] describes a subregion:
ll and ur are multidimensional equivalents of the region's lower left and upper right corner.
res gives the integration results for the region in a list with entries of the form {integral, error, chi-square} for each component of the integrand.
df is the number of degrees of freedom corresponding to the chi-square values in res."
:Evaluate: $Phase::usage = "$Phase is a global variable set by Divonne during the evaluation of the integrand to the integration phase:\n
0 = sampling of the points in xgiven,\n
1 = partitioning phase,\n
2 = main integration phase,\n
3 = refinement phase."
:Evaluate: MapSample::usage = "MapSample is a function used to map the integrand over the points to be sampled."
:Evaluate: Begin["`Divonne`"]
:Begin:
:Function: Divonne
:Pattern: MLDivonne[ndim_, ncomp_,
epsrel_, epsabs_, flags_, seed_,
mineval_, maxeval_,
key1_, key2_, key3_, maxpass_,
border_, maxchisq_, mindeviation_,
xgiven_, fgiven_, nextra_]
:Arguments: {ndim, ncomp,
epsrel, epsabs, flags, seed,
mineval, maxeval,
key1, key2, key3, maxpass,
border, maxchisq, mindeviation,
xgiven, fgiven, nextra}
:ArgumentTypes: {Integer, Integer,
Real, Real, Integer, Integer,
Integer, Integer,
Integer, Integer, Integer, Integer,
Real, Real, Real,
RealList, RealList, Integer}
:ReturnType: Manual
:End:
:Evaluate: Attributes[Divonne] = {HoldFirst}
:Evaluate: Options[Divonne] = {PrecisionGoal -> 3, AccuracyGoal -> 12,
MinPoints -> 0, MaxPoints -> 50000,
Key1 -> 47, Key2 -> 1, Key3 -> 1, MaxPass -> 5,
Border -> 0, MaxChisq -> 10, MinDeviation -> .25,
Given -> {}, NExtra -> 0, PeakFinder -> ({}&),
Verbose -> 1, Final -> All,
PseudoRandom -> False, PseudoRandomSeed -> 5489,
Regions -> False, Compiled -> True}
:Evaluate: Divonne[f_, v:{_, _, _}.., opt___Rule] :=
Block[ {ff = HoldForm[f], ndim = Length[{v}], ncomp,
tags, vars, lower, range, jac, tmp, defs, intT, intX,
rel, abs, mineval, maxeval, key1, key2, key3, maxpass, border,
maxchisq, mindeviation, given, nextra, peakfinder,
final, verbose, level, seed, regions, compiled,
$Phase},
Message[Divonne::optx, #, Divonne]&/@
Complement[First/@ {opt}, tags = First/@ Options[Divonne]];
{rel, abs, mineval, maxeval, key1, key2, key3, maxpass, border,
maxchisq, mindeviation, given, nextra, peakfinder,
verbose, final, level, seed, regions, compiled} =
tags /. {opt} /. Options[Divonne];
{vars, lower, range} = Transpose[{v}];
jac = Simplify[Times@@ (range -= lower)];
tmp = Array[tmpvar, ndim];
defs = Simplify[lower + range tmp];
Block[{Set}, define[compiled, tmp, vars, Thread[vars = defs], jac]];
intT = integrandT[f];
intX = integrandX[f];
Block[#,
ncomp = Length[intT@@ RandomReal[1, ndim]];
MLDivonne[ndim, ncomp, 10.^-rel, 10.^-abs,
Min[Max[verbose, 0], 3] +
If[final === Last, 4, 0] +
If[TrueQ[regions], 128, 0] +
If[IntegerQ[level], 256 level, 0],
If[level =!= False && IntegerQ[seed], seed, 0],
mineval, maxeval,
key1, key2, key3, maxpass,
N[border], N[maxchisq], N[mindeviation],
given, sample[given, 0, intX], nextra]
]& @ vars
]
:Evaluate: tmpvar[n_] := ToExpression["Cuba`Divonne`t" <> ToString[n]]
:Evaluate: Attributes[foo] = {HoldAll}
:Evaluate: define[True, tmp_, vars_, defs_, jac_] := (
TtoX := TtoX = Compile[tmp, defs];
integrandT[f_] := Compile[tmp, eval[defs, Chop[f jac]//N],
{{_eval, _Real, 1}}];
integrandX[f_] := Compile[vars, eval[vars, Chop[f jac]//N],
{{_eval, _Real, 1}}] )
:Evaluate: define[_, tmp_, vars_, defs_, jac_] := (
TtoX := TtoX = Function[tmp, defs];
integrandT[f_] := Function[tmp, eval[defs, Chop[f jac]//N]];
integrandX[f_] := Function[vars, eval[vars, Chop[f jac]//N]] )
:Evaluate: eval[_, f_Real] := {f}
:Evaluate: eval[_, f:{__Real}] := f
:Evaluate: eval[x_, _] := (Message[Divonne::badsample, ff, x]; {})
:Evaluate: sample[x_, p_, i_:intT] := (
$Phase = p;
Check[Flatten @ MapSample[i@@ # &, Partition[x, ndim]], {}] )
:Evaluate: MapSample = Map
:Evaluate: findpeak[b_, p_] := Check[Join[#, sample[#, p, intX]]& @
N[Flatten[peakfinder@@ MapThread[TtoX, Partition[b, 2]]]], {}]
:Evaluate: region[ll_, ur_, r___] := Region[TtoX@@ ll, TtoX@@ ur, r]
:Evaluate: Divonne::badsample = "`` is not a real-valued function at ``."
:Evaluate: Divonne::baddim = "Cannot integrate in `` dimensions."
:Evaluate: Divonne::badcomp = "Cannot integrate `` components."
:Evaluate: Divonne::accuracy =
"Desired accuracy was not reached within `` integrand evaluations on `` subregions.
Estimate that MaxPoints needs to be increased by `` for this accuracy."
:Evaluate: Divonne::success = "Needed `` integrand evaluations on `` subregions."
:Evaluate: End[]
:Evaluate: EndPackage[]
/*
Divonne.tm
Multidimensional integration by partitioning
originally by J.H. Friedman and M.H. Wright
(CERNLIB subroutine D151)
this version by Thomas Hahn
last modified 12 Oct 11 th
*/
#include "mathlink.h"
#include "decl.h"
#define ExploreParent Explore
/*********************************************************************/
static void Status(MLCONST char *msg, cint n1, cint n2, cint n3)
{
MLPutFunction(stdlink, "CompoundExpression", 2);
MLPutFunction(stdlink, "Message", 4);
MLPutFunction(stdlink, "MessageName", 2);
MLPutSymbol(stdlink, "Divonne");
MLPutString(stdlink, msg);
MLPutInteger(stdlink, n1);
MLPutInteger(stdlink, n2);
MLPutInteger(stdlink, n3);
}
/*********************************************************************/
static void Print(MLCONST char *s)
{
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Print", 1);
MLPutString(stdlink, s);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
MLNewPacket(stdlink);
}
/*********************************************************************/
static void DoSample(This *t, cnumber n, real *x, real *f, ccount ldx)
{
real *mma_f;
long mma_n;
if( MLAbort ) longjmp(t->abort, -99);
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Cuba`Divonne`sample", 2);
MLPutRealList(stdlink, x, n*t->ndim);
MLPutInteger(stdlink, t->phase);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
if( !MLGetRealList(stdlink, &mma_f, &mma_n) ) {
MLClearError(stdlink);
MLNewPacket(stdlink);
longjmp(t->abort, -99);
}
if( mma_n != n*t->ncomp ) {
MLDisownRealList(stdlink, mma_f, mma_n);
longjmp(t->abort, -3);
}
t->neval += n;
Copy(f, mma_f, n*t->ncomp);
MLDisownRealList(stdlink, mma_f, mma_n);
}
/*********************************************************************/
static count SampleExtra(This *t, cBounds *b)
{
count n, nget;
real *mma_f;
long mma_n;
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Cuba`Divonne`findpeak", 2);
MLPutRealList(stdlink, (real *)b, 2*t->ndim);
MLPutInteger(stdlink, t->phase);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
if( !MLGetRealList(stdlink, &mma_f, &mma_n) ) {
MLClearError(stdlink);
MLNewPacket(stdlink);
longjmp(t->abort, -99);
}
t->neval += nget = mma_n/(t->ndim + t->ncomp);
n = IMin(nget, t->nextra);
if( n ) {
Copy(t->xextra, mma_f, n*t->ndim);
Copy(t->fextra, mma_f + nget*t->ndim, n*t->ncomp);
}
MLDisownRealList(stdlink, mma_f, mma_n);
return n;
}
/*********************************************************************/
#include "common.c"
static inline void DoIntegrate(This *t)
{
real integral[NCOMP], error[NCOMP], prob[NCOMP];
cint fail = Integrate(t, integral, error, prob);
if( fail < 0 ) {
switch( fail ) {
case -99:
MLPutFunction(stdlink, "Abort", 0);
return;
case -1:
Status("baddim", t->ndim, 0, 0);
break;
case -2:
Status("badcomp", t->ncomp, 0, 0);
break;
}
MLPutSymbol(stdlink, "$Failed");
}
else {
Status(fail ? "accuracy" : "success", t->neval, t->nregions, fail);
MLPutFunction(stdlink, "Thread", 1);
MLPutFunction(stdlink, "List", 3);
MLPutRealList(stdlink, integral, t->ncomp);
MLPutRealList(stdlink, error, t->ncomp);
MLPutRealList(stdlink, prob, t->ncomp);
}
}
/*********************************************************************/
void Divonne(cint ndim, cint ncomp,
creal epsrel, creal epsabs,
cint flags, cint seed,
cnumber mineval, cnumber maxeval,
cint key1, cint key2, cint key3, cint maxpass,
creal border, creal maxchisq, creal mindeviation,
real *xgiven, clong nxgiven, real *fgiven, clong nfgiven,
cnumber nextra)
{
This t;
t.ldxgiven = t.ndim = ndim;
t.ncomp = ncomp;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.seed = seed;
t.mineval = mineval;
t.maxeval = maxeval;
t.key1 = key1;
t.key2 = key2;
t.key3 = key3;
t.maxpass = maxpass;
t.border.upper = 1 - (t.border.lower = border);
t.maxchisq = maxchisq;
t.mindeviation = mindeviation;
t.xgiven = NULL;
t.nextra = nextra;
t.nregions = 0;
t.neval = t.ngiven = nxgiven/ndim;
if( t.ngiven | t.nextra ) {
cnumber nx = nxgiven + nextra*t.ndim;
cnumber nf = nfgiven + nextra*t.ncomp;
Alloc(t.xgiven, nx + nf);
t.xextra = t.xgiven + nxgiven;
t.fgiven = t.xgiven + nx;
t.fextra = t.fgiven + nfgiven;
Copy(t.xgiven, xgiven, nxgiven);
Copy(t.fgiven, fgiven, nfgiven);
}
DoIntegrate(&t);
free(t.xgiven);
MLEndPacket(stdlink);
}
/*********************************************************************/
int main(int argc, char **argv)
{
return MLMain(argc, argv);
}
Cuba-3.0/src/divonne/Explore.c 0000644 0000000 0000000 00000007434 11660457116 014756 0 ustar root root /*
Explore.c
sample region, determine min and max, split if necessary
this file is part of Divonne
last modified 15 Nov 11 th
*/
typedef struct {
real fmin, fmax;
creal *xmin, *xmax;
} Extrema;
/*********************************************************************/
static int Explore(This *t, ccount iregion)
{
TYPEDEFREGION;
Region *region = RegionPtr(iregion);
cBounds *bounds = region->bounds;
Result *result = region->result;
count n, dim, comp, maxcomp;
Extrema extrema[NCOMP];
Result *r;
creal *x;
real *f;
real halfvol, maxerr;
cSamples *samples = &t->samples[region->isamples];
/* needed as of gcc 3.3 to make gcc correctly address region #@$&! */
sizeof(*region);
for( comp = 0; comp < t->ncomp; ++comp ) {
Extrema *e = &extrema[comp];
e->fmin = INFTY;
e->fmax = -INFTY;
e->xmin = e->xmax = NULL;
}
if( region->isamples == 0 ) { /* others already sampled */
real vol = 1;
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = &bounds[dim];
vol *= b->upper - b->lower;
}
region->vol = vol;
for( comp = 0; comp < t->ncomp; ++comp ) {
Result *r = &result[comp];
r->fmin = INFTY;
r->fmax = -INFTY;
}
x = t->xgiven;
f = t->fgiven;
n = t->ngiven;
if( t->nextra ) n += SampleExtra(t, bounds);
for( ; n; --n ) {
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = &bounds[dim];
if( x[dim] < b->lower || x[dim] > b->upper ) goto skip;
}
for( comp = 0; comp < t->ncomp; ++comp ) {
Extrema *e = &extrema[comp];
creal y = f[comp];
if( y < e->fmin ) e->fmin = y, e->xmin = x;
if( y > e->fmax ) e->fmax = y, e->xmax = x;
}
skip:
x += t->ldxgiven;
f += t->ncomp;
}
samples->sampler(t, iregion);
}
x = samples->x;
f = samples->f;
for( n = samples->n; n; --n ) {
for( comp = 0; comp < t->ncomp; ++comp ) {
Extrema *e = &extrema[comp];
creal y = *f++;
if( y < e->fmin ) e->fmin = y, e->xmin = x;
if( y > e->fmax ) e->fmax = y, e->xmax = x;
}
x += t->ndim;
}
t->neval_opt -= t->neval;
halfvol = .5*region->vol;
maxerr = -INFTY;
maxcomp = -1;
for( comp = 0; comp < t->ncomp; ++comp ) {
Extrema *e = &extrema[comp];
Result *r = &result[comp];
real xtmp[NDIM], ftmp, err;
if( e->xmin ) { /* not all NaNs */
t->selectedcomp = comp;
VecCopy(xtmp, e->xmin);
ftmp = FindMinimum(t, bounds, xtmp, e->fmin);
if( ftmp < r->fmin ) {
r->fmin = ftmp;
VecCopy(r->xmin, xtmp);
}
t->selectedcomp = Tag(comp);
VecCopy(xtmp, e->xmax);
ftmp = -FindMinimum(t, bounds, xtmp, -e->fmax);
if( ftmp > r->fmax ) {
r->fmax = ftmp;
VecCopy(r->xmax, xtmp);
}
}
r->spread = halfvol*(r->fmax - r->fmin);
err = r->spread/Max(fabs(r->avg), NOTZERO);
if( err > maxerr ) {
maxerr = err;
maxcomp = comp;
}
}
t->neval_opt += t->neval;
if( maxcomp == -1 ) { /* all NaNs */
region->depth = 0;
return -1;
}
region->cutcomp = maxcomp;
r = ®ion->result[maxcomp];
if( halfvol*(r->fmin + r->fmax) > r->avg ) {
region->fminor = r->fmin;
region->fmajor = r->fmax;
region->xmajor = r->xmax - (real *)region->result;
}
else {
region->fminor = r->fmax;
region->fmajor = r->fmin;
region->xmajor = r->xmin - (real *)region->result;
}
if( region->isamples == 0 ) {
if( r->spread < samples->neff*r->err ||
r->spread < t->totals[maxcomp].secondspread ) region->depth = 0;
if( region->depth == 0 )
for( comp = 0; comp < t->ncomp; ++comp )
t->totals[comp].secondspread =
Max(t->totals[comp].secondspread, result[comp].spread);
}
if( region->depth ) Split(t, iregion);
return iregion;
}
Cuba-3.0/src/divonne/FindMinimum.c 0000644 0000000 0000000 00000041755 11403420446 015547 0 ustar root root /*
FindMinimum.c
find minimum (maximum) of hyperrectangular region
this file is part of Divonne
last modified 8 Jun 10 th
*/
#define EPS 0x1p-52
#define RTEPS 0x1p-26
#define QEPS 0x1p-13
#define DELTA 0x1p-16
#define RTDELTA 0x1p-8
#define QDELTA 0x1p-4
/*
#define DELTA 1e-5
#define RTDELTA 3.1622776601683791e-3
#define QDELTA 5.6234132519034912e-2
*/
#define SUFTOL 8*QEPS*QDELTA
#define FTOL 5e-2
#define GTOL 1e-2
#define Hessian(i, j) hessian[(i)*t->ndim + j]
typedef struct { real dx, f; } Point;
/*********************************************************************/
static inline real Dot(ccount n, creal *a, creal *b)
{
real sum = 0;
count i;
for( i = 0; i < n; ++i ) sum += a[i]*b[i];
return sum;
}
/*********************************************************************/
static inline real Length(ccount n, creal *vec)
{
return sqrt(Dot(n, vec, vec));
}
/*********************************************************************/
static inline void LinearSolve(cThis *t, ccount n, creal *hessian,
creal *grad, real *p)
{
int i, j;
real dir;
for( i = 0; i < n; ++i ) {
dir = -grad[i];
for( j = 0; j < i; ++j )
dir -= Hessian(i, j)*p[j];
p[i] = dir;
}
while( --i >= 0 ) {
if( Hessian(i, i) <= 0 ) return;
dir = p[i]/Hessian(i, i);
for( j = i + 1; j < n; ++j )
dir -= Hessian(j, i)*p[j];
p[i] = dir;
}
}
/*********************************************************************/
static void RenormalizeCholesky(cThis *t, ccount n, real *hessian,
real *z, real alpha)
{
count i, j;
for( i = 0; i < n; ++i ) {
creal dir = z[i];
real beta = alpha*dir;
real gamma = Hessian(i, i);
real gammanew = Hessian(i, i) += beta*dir;
if( i + 1 >= n || gammanew < 0 ||
(gammanew < 1 && gamma > DBL_MAX*gammanew) ) return;
gamma /= gammanew;
beta /= gammanew;
alpha *= gamma;
if( gamma < .25 ) {
for( j = i + 1; j < n; ++j ) {
real delta = beta*z[j];
z[j] -= dir*Hessian(j, i);
Hessian(j, i) = Hessian(j, i)*gamma + delta;
}
}
else {
for( j = i + 1; j < n; ++j ) {
z[j] -= dir*Hessian(j, i);
Hessian(j, i) += beta*z[j];
}
}
}
}
/*********************************************************************/
static void UpdateCholesky(cThis *t, ccount n, real *hessian,
real *z, real *p)
{
int i, j;
real gamma = 0;
for( i = 0; i < n; ++i ) {
real dir = z[i];
for( j = 0; j < i; ++j )
dir -= Hessian(i, j)*p[j];
p[i] = dir;
gamma += Sq(dir)/Hessian(i, i);
}
gamma = Max(fabs(1 - gamma), EPS);
while( --i >= 0 ) {
creal dir = z[i] = p[i];
real beta = dir/Hessian(i, i);
creal gammanew = gamma + dir*beta;
Hessian(i, i) *= gamma/gammanew;
beta /= gamma;
gamma = gammanew;
for( j = i + 1; j < n; ++j ) {
creal delta = beta*z[j];
z[j] += dir*Hessian(j, i);
Hessian(j, i) -= delta;
}
}
}
/*********************************************************************/
static inline void BFGS(cThis *t, ccount n, real *hessian,
creal *gnew, creal *g, real *p, creal dx)
{
real y[NDIM], c;
count i, j;
for( i = 0; i < n; ++i )
y[i] = gnew[i] - g[i];
c = dx*Dot(n, y, p);
if( c < 1e-10 ) return;
RenormalizeCholesky(t, n, hessian, y, 1/c);
c = Dot(n, g, p);
if( c >= 0 ) return;
c = 1/sqrt(-c);
for( i = 0; i < n; ++i )
y[i] = c*g[i];
UpdateCholesky(t, n, hessian, y, p);
for( i = 0; i < n - 1; ++i )
for( j = i + 1; j < n; ++j )
Hessian(i, j) = Hessian(j, i);
}
/*********************************************************************/
static void Gradient(This *t, ccount nfree, ccount *ifree,
cBounds *b, real *x, creal y, real *grad)
{
count i;
for( i = 0; i < nfree; ++i ) {
ccount dim = Untag(ifree[i]);
creal xd = x[dim];
creal delta = (b[dim].upper - xd < DELTA) ? -DELTA : DELTA;
x[dim] += delta;
grad[i] = (Sample(t, x) - y)/delta;
x[dim] = xd;
}
}
/*********************************************************************/
static Point LineSearch(This *t, ccount nfree, ccount *ifree,
creal *p, creal *xini, real fini, real *x,
real step, creal range, creal grad,
creal ftol, creal xtol, creal gtol)
{
real tol = ftol, tol2 = tol + tol;
Point cur = {0, fini};
VecCopy(x, xini);
/* don't even try if
a) we'd walk backwards,
b) the range to explore is too small,
c) the gradient is positive, i.e. we'd move uphill */
if( step > 0 && range > tol2 && grad <= 0 ) {
creal eps = RTEPS*fabs(range) + ftol;
creal mingrad = -1e-4*grad, maxgrad = -gtol*grad;
real end = range + eps;
real maxstep = range - eps/(1 + RTEPS);
Point min = cur, v = cur, w = cur;
Point a = cur, b = {end, 0};
real a1, b1 = end;
/* distmin: distance along p from xini to the minimum,
u: second-lowest point,
v: third-lowest point,
a, b: interval in which the minimum is sought. */
real distmin = 0, dist, mid, q, r, s;
count i;
int shift;
bool first;
for( first = true; ; first = false ) {
if( step >= maxstep ) {
step = maxstep;
maxstep = maxstep*(1 + .75*RTEPS) + .75*tol;
}
cur.dx = (fabs(step) >= tol) ? step : (step > 0) ? tol : -tol;
dist = distmin + cur.dx;
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
x[dim] = xini[dim] + dist*p[i];
}
cur.f = Sample(t, x);
if( cur.f <= min.f ) {
v = w;
w = min;
min.f = cur.f;
distmin = dist;
/* shift everything to the new minimum position */
maxstep -= cur.dx;
v.dx -= cur.dx;
w.dx -= cur.dx;
a.dx -= cur.dx;
b.dx -= cur.dx;
if( cur.dx < 0 ) b = w;
else a = w;
tol = RTEPS*fabs(distmin) + ftol;
tol2 = tol + tol;
}
else {
if( cur.dx < 0 ) a = cur;
else b = cur;
if( cur.f <= w.f || w.dx == 0 ) v = w, w = cur;
else if( cur.f <= v.f || v.dx == 0 || v.dx == w.dx ) v = cur;
}
if( distmin + b.dx <= xtol ) break;
if( min.f < fini &&
a.f - min.f <= fabs(a.dx)*maxgrad &&
(fabs(distmin - range) > tol || maxstep < b.dx) ) break;
mid = .5*(a.dx + b.dx);
if( fabs(mid) <= tol2 - .5*(b.dx - a.dx) ) break;
r = q = s = 0;
if( fabs(end) > tol ) {
if( first ) {
creal s1 = w.dx*grad;
creal s2 = w.f - min.f;
s = (s1 - ((distmin == 0) ? 0 : 2*s2))*w.dx;
q = 2*(s2 - s1);
}
else {
creal s1 = w.dx*(v.f - min.f);
creal s2 = v.dx*(w.f - min.f);
s = s1*w.dx - s2*v.dx;
q = 2*(s2 - s1);
}
if( q > 0 ) s = -s;
q = fabs(q);
r = end;
if( step != b1 || b.dx <= maxstep ) end = step;
}
if( distmin == a.dx ) step = mid;
else if( b.dx > maxstep ) step = (step < b.dx) ? -4*a.dx : maxstep;
else {
real num = a.dx, den = b.dx;
if( fabs(b.dx) <= tol || (w.dx > 0 && fabs(a.dx) > tol) )
num = b.dx, den = a.dx;
num /= -den;
step = (num < 1) ? .5*den*sqrt(num) : 5/11.*den*(.1 + 1/num);
}
if( step > 0 ) a1 = a.dx, b1 = step;
else a1 = step, b1 = b.dx;
if( fabs(s) < fabs(.5*q*r) && s > q*a1 && s < q*b1 ) {
step = s/q;
if( step - a.dx < tol2 || b.dx - step < tol2 )
step = (mid > 0) ? tol : -tol;
}
else end = (mid > 0) ? b.dx : a.dx;
}
first = true;
if( fabs(distmin - range) < tol ) {
distmin = range;
if( maxstep > b.dx ) first = false;
}
for( cur.dx = distmin, cur.f = min.f, shift = -1; ;
cur.dx = Max(ldexp(distmin, shift), ftol), shift <<= 1 ) {
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
x[dim] = xini[dim] + cur.dx*p[i];
}
if( !first ) cur.f = Sample(t, x);
if( cur.dx + b.dx <= xtol ) {
cur.dx = 0;
break;
}
if( fini - cur.f > cur.dx*mingrad ) break;
if( cur.dx <= ftol ) {
cur.dx = 0;
break;
}
first = false;
}
}
return cur;
}
/*********************************************************************/
static real LocalSearch(This *t, ccount nfree, ccount *ifree,
cBounds *b, creal *x, creal fx, real *z)
{
real delta, smax, sopp, spmax, snmax;
real y[NDIM], fy, fz, ftest;
real p[NDIM];
int sign;
count i;
/* Choose a direction p along which to move away from the
present x. We choose the direction which leads farthest
away from all borders. */
smax = INFTY;
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
creal sp = b[dim].upper - x[dim];
creal sn = x[dim] - b[dim].lower;
if( sp < sn ) {
smax = Min(smax, sn);
p[i] = -1;
}
else {
smax = Min(smax, sp);
p[i] = 1;
}
}
smax *= .9;
/* Move along p until the integrand changes appreciably
or we come close to a border. */
VecCopy(y, x);
ftest = SUFTOL*(1 + fabs(fx));
delta = RTDELTA/5;
do {
delta = Min(5*delta, smax);
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
y[dim] = x[dim] + delta*p[i];
}
fy = Sample(t, y);
if( fabs(fy - fx) > ftest ) break;
} while( delta != smax );
/* Construct a second direction p' orthogonal to p, i.e. p.p' = 0.
We let pairs of coordinates cancel in the dot product,
i.e. we choose p'[0] = p[0], p'[1] = -p[1], etc.
(It should really be 1/p and -1/p, but p consists of 1's and -1's.)
For odd nfree, we let the last three components cancel by
choosing p'[nfree - 3] = p[nfree - 3],
p'[nfree - 2] = -1/2 p[nfree - 2], and
p'[nfree - 1] = -1/2 p[nfree - 1]. */
sign = (nfree <= 1 && fy > fx) ? 1 : -1;
spmax = snmax = INFTY;
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
real sp, sn;
p[i] *= (nfree & 1 && nfree - i <= 2) ? -.5*sign : (sign = -sign);
sp = (b[dim].upper - y[dim])/p[i];
sn = (y[dim] - b[dim].lower)/p[i];
if( p[i] > 0 ) {
spmax = Min(spmax, sp);
snmax = Min(snmax, sn);
}
else {
spmax = Min(spmax, -sn);
snmax = Min(snmax, -sp);
}
}
smax = .9*spmax;
sopp = .9*snmax;
if( nfree > 1 && smax < snmax ) {
real tmp = smax;
smax = sopp;
sopp = tmp;
for( i = 0; i < nfree; ++i )
p[i] = -p[i];
}
/* Move along p' until the integrand changes appreciably
or we come close to a border. */
VecCopy(z, y);
ftest = SUFTOL*(1 + fabs(fy));
delta = RTDELTA/5;
do {
delta = Min(5*delta, smax);
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
z[dim] = y[dim] + delta*p[i];
}
fz = Sample(t, z);
if( fabs(fz - fy) > ftest ) break;
} while( delta != smax );
if( fy != fz ) {
real pleneps, grad, range, step;
Point low;
if( fy > fz ) {
grad = (fz - fy)/delta;
range = smax/.9;
step = Min(delta + delta, smax);
}
else {
grad = (fy - fz)/delta;
range = sopp/.9 + delta;
step = Min(delta + delta, sopp);
VecCopy(y, z);
fy = fz;
for( i = 0; i < nfree; ++i )
p[i] = -p[i];
}
pleneps = Length(nfree, p) + RTEPS;
low = LineSearch(t, nfree, ifree, p, y, fy, z, step, range, grad,
RTEPS/pleneps, 0., RTEPS);
fz = low.f;
}
if( fz != fx ) {
real pleneps, grad, range, step;
Point low;
spmax = snmax = INFTY;
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
p[i] = z[dim] - x[dim];
if( p[i] != 0 ) {
creal sp = (b[dim].upper - x[dim])/p[i];
creal sn = (x[dim] - b[dim].lower)/p[i];
if( p[i] > 0 ) {
spmax = Min(spmax, sp);
snmax = Min(snmax, sn);
}
else {
spmax = Min(spmax, -sn);
snmax = Min(snmax, -sp);
}
}
}
grad = fz - fx;
range = spmax;
step = Min(.9*spmax, 2.);
pleneps = Length(nfree, p) + RTEPS;
if( fz > fx ) {
delta = Min(.9*snmax, RTDELTA/pleneps);
for( i = 0; i < nfree; ++i ) {
ccount dim = ifree[i];
z[dim] = x[dim] - delta*p[i];
}
fz = Sample(t, z);
if( fz < fx ) {
grad = (fz - fx)/delta;
range = snmax;
step = Min(.9*snmax, delta + delta);
for( i = 0; i < nfree; ++i )
p[i] = -p[i];
}
else if( delta < 1 ) grad = (fx - fz)/delta;
}
low = LineSearch(t, nfree, ifree, p, x, fx, z, step, range, grad,
RTEPS/pleneps, 0., RTEPS);
fz = low.f;
}
return fz;
}
/*********************************************************************/
static real FindMinimum(This *t, cBounds *b, real *xmin, real fmin)
{
real hessian[NDIM*NDIM];
real gfree[NDIM], p[NDIM];
real tmp[NDIM], ftmp, fini = fmin;
ccount maxeval = t->neval + 50*t->ndim;
count nfree, nfix;
count ifree[NDIM], ifix[NDIM];
count dim, local;
Zap(hessian);
for( dim = 0; dim < t->ndim; ++dim )
Hessian(dim, dim) = 1;
/* Step 1: - classify the variables as "fixed" (sufficiently close
to a border) and "free",
- if the integrand is flat in the direction of the gradient
w.r.t. the free dimensions, perform a local search. */
for( local = 0; local < 2; ++local ) {
bool resample = false;
nfree = nfix = 0;
for( dim = 0; dim < t->ndim; ++dim ) {
if( xmin[dim] < b[dim].lower + (1 + fabs(b[dim].lower))*QEPS ) {
xmin[dim] = b[dim].lower;
ifix[nfix++] = dim;
resample = true;
}
else if( xmin[dim] > b[dim].upper - (1 + fabs(b[dim].upper))*QEPS ) {
xmin[dim] = b[dim].upper;
ifix[nfix++] = Tag(dim);
resample = true;
}
else ifree[nfree++] = dim;
}
if( resample ) fini = fmin = Sample(t, xmin);
if( nfree == 0 ) goto releasebounds;
Gradient(t, nfree, ifree, b, xmin, fmin, gfree);
if( local || Length(nfree, gfree) > GTOL ) break;
ftmp = LocalSearch(t, nfree, ifree, b, xmin, fmin, tmp);
if( ftmp > fmin - (1 + fabs(fmin))*RTEPS )
goto releasebounds;
fmin = ftmp;
VecCopy(xmin, tmp);
}
while( t->neval <= maxeval ) {
/* Step 2a: perform a quasi-Newton iteration on the free
variables only. */
if( nfree > 0 ) {
real plen, pleneps;
real minstep;
count i, mini = 0, minfix = 0;
Point low;
LinearSolve(t, nfree, hessian, gfree, p);
plen = Length(nfree, p);
pleneps = plen + RTEPS;
minstep = INFTY;
for( i = 0; i < nfree; ++i ) {
count dim = Untag(ifree[i]);
if( fabs(p[i]) > EPS ) {
real step;
count fix;
if( p[i] < 0 ) {
step = (b[dim].lower - xmin[dim])/p[i];
fix = dim;
}
else {
step = (b[dim].upper - xmin[dim])/p[i];
fix = Tag(dim);
}
if( step < minstep ) {
minstep = step;
mini = i;
minfix = fix;
}
}
}
if( minstep*pleneps <= DELTA ) {
fixbound:
ifix[nfix++] = minfix;
if( mini < --nfree ) {
creal diag = Hessian(mini, mini);
Clear(tmp, mini);
for( i = mini; i < nfree; ++i )
tmp[i] = Hessian(i + 1, mini);
for( i = mini; i < nfree; ++i ) {
Copy(&Hessian(i, 0), &Hessian(i + 1, 0), i);
Hessian(i, i) = Hessian(i + 1, i + 1);
}
RenormalizeCholesky(t, nfree, hessian, tmp, diag);
Copy(&ifree[mini], &ifree[mini + 1], nfree - mini);
Copy(&gfree[mini], &gfree[mini + 1], nfree - mini);
}
continue;
}
low = LineSearch(t, nfree, ifree, p, xmin, fmin, tmp,
Min(minstep, 1.), Min(minstep, 100.), Dot(nfree, gfree, p),
RTEPS/pleneps, DELTA/pleneps, .2);
if( low.dx > 0 ) {
real fdiff;
fmin = low.f;
VecCopy(xmin, tmp);
Gradient(t, nfree, ifree, b, xmin, fmin, tmp);
BFGS(t, nfree, hessian, tmp, gfree, p, low.dx);
VecCopy(gfree, tmp);
if( fabs(low.dx - minstep) < QEPS*minstep ) goto fixbound;
fdiff = fini - fmin;
fini = fmin;
if( fdiff > (1 + fabs(fmin))*FTOL ||
low.dx*plen > (1 + Length(t->ndim, xmin))*FTOL ) continue;
}
}
/* Step 2b: check whether freeing any fixed variable will lead
to a reduction in f. */
releasebounds:
if( nfix > 0 ) {
real mingrad = INFTY;
count i, mini = 0;
bool repeat = false;
Gradient(t, nfix, ifix, b, xmin, fmin, tmp);
for( i = 0; i < nfix; ++i ) {
creal grad = Sign(ifix[i])*tmp[i];
if( grad < -RTEPS ) {
repeat = true;
if( grad < mingrad ) {
mingrad = grad;
mini = i;
}
}
}
if( repeat ) {
gfree[nfree] = tmp[mini];
ifree[nfree] = Untag(ifix[mini]);
Clear(&Hessian(nfree, 0), nfree);
Hessian(nfree, nfree) = 1;
++nfree;
--nfix;
Copy(&ifix[mini], &ifix[mini + 1], nfix - mini);
continue;
}
}
break;
}
return fmin;
}
Cuba-3.0/src/divonne/Integrate.c 0000644 0000000 0000000 00000031444 11660460313 015251 0 ustar root root /*
Integrate.c
partition the integration region until each region
has approximately equal spread = 1/2 vol (max - min),
then do a main integration over all regions
this file is part of Divonne
last modified 15 Nov 11 th
*/
#define INIDEPTH 3
#define DEPTH 5
#define POSTDEPTH 15
/*********************************************************************/
static int Integrate(This *t, real *integral, real *error, real *prob)
{
TYPEDEFREGION;
Totals totals[NCOMP];
real nneed;
count dim, comp, iter, pass = 0, err, iregion;
number nwant, nmin = INT_MAX, neff;
int fail;
if( VERBOSE > 1 ) {
char s[512];
sprintf(s, "Divonne input parameters:\n"
" ndim " COUNT "\n ncomp " COUNT "\n"
" epsrel " REAL "\n epsabs " REAL "\n"
" flags %d\n seed %d\n"
" mineval " NUMBER "\n maxeval " NUMBER "\n"
" key1 %d\n key2 %d\n key3 %d\n maxpass " COUNT "\n"
" border " REAL "\n maxchisq " REAL "\n mindeviation " REAL "\n"
" ngiven " NUMBER "\n nextra " NUMBER,
t->ndim, t->ncomp,
t->epsrel, t->epsabs,
t->flags, t->seed,
t->mineval, t->maxeval,
t->key1, t->key2, t->key3, t->maxpass,
t->border.lower, t->maxchisq, t->mindeviation,
t->ngiven, t->nextra);
Print(s);
}
if( BadComponent(t) ) return -2;
if( BadDimension(t, t->key1) ||
BadDimension(t, t->key2) ||
((t->key3 & -2) && BadDimension(t, t->key3)) ) return -1;
t->neval_opt = t->neval_cut = 0;
AllocRegions(t);
for( dim = 0; dim < t->ndim; ++dim ) {
Bounds *b = &RegionPtr(0)->bounds[dim];
b->lower = 0;
b->upper = 1;
}
t->nregions = 1;
RuleIni(&t->rule7);
RuleIni(&t->rule9);
RuleIni(&t->rule11);
RuleIni(&t->rule13);
SamplesIni(&t->samples[0]);
SamplesIni(&t->samples[1]);
SamplesIni(&t->samples[2]);
if( (fail = setjmp(t->abort)) ) goto abort;
t->epsabs = Max(t->epsabs, NOTZERO);
/* Step 1: partition the integration region */
if( VERBOSE ) Print("Partitioning phase:");
if( IsSobol(t->key1) || IsSobol(t->key2) || IsSobol(t->key3) )
IniRandom(t);
SamplesLookup(t, &t->samples[0], t->key1,
(number)47, (number)INT_MAX, (number)0);
SamplesAlloc(t, &t->samples[0]);
t->totals = totals;
Zap(totals);
t->phase = 1;
Iterate(t, 0, INIDEPTH, 0, NULL);
for( iter = 1; ; ++iter ) {
Totals *maxtot;
count valid;
for( comp = 0; comp < t->ncomp; ++comp ) {
Totals *tot = &totals[comp];
tot->avg = tot->spreadsq = 0;
tot->spread = tot->secondspread = -INFTY;
}
for( iregion = 0; iregion < t->nregions; ++iregion ) {
Region *region = RegionPtr(iregion);
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
Totals *tot = &totals[comp];
tot->avg += r->avg;
tot->spreadsq += Sq(r->spread);
if( r->spread > tot->spread ) {
tot->secondspread = tot->spread;
tot->spread = r->spread;
tot->iregion = iregion;
}
else if( r->spread > tot->secondspread )
tot->secondspread = r->spread;
}
}
maxtot = totals;
valid = 0;
for( comp = 0; comp < t->ncomp; ++comp ) {
Totals *tot = &totals[comp];
integral[comp] = tot->avg;
valid += tot->avg == tot->avg;
if( tot->spreadsq > maxtot->spreadsq ) maxtot = tot;
tot->spread = sqrt(tot->spreadsq);
error[comp] = tot->spread/t->samples[0].neff;
}
if( VERBOSE ) {
char s[128 + 64*NCOMP], *p = s;
p += sprintf(p, "\n"
"Iteration " COUNT " (pass " COUNT "): " COUNT " regions\n"
NUMBER7 " integrand evaluations so far,\n"
NUMBER7 " in optimizing regions,\n"
NUMBER7 " in finding cuts",
iter, pass, t->nregions, t->neval, t->neval_opt, t->neval_cut);
for( comp = 0; comp < t->ncomp; ++comp )
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL,
comp + 1, integral[comp], error[comp]);
Print(s);
}
if( valid == 0 ) goto abort; /* all NaNs */
if( t->neval > t->maxeval ) break;
nneed = maxtot->spread/MaxErr(maxtot->avg);
if( nneed < MAXPRIME ) {
cnumber n = t->neval + t->nregions*(number)ceil(nneed);
if( n < nmin ) {
nmin = n;
pass = 0;
}
else if( ++pass > t->maxpass && n >= t->mineval ) break;
}
Iterate(t, maxtot->iregion, DEPTH, -1, NULL);
}
/* Step 2: do a "full" integration on each region */
/* nneed = t->samples[0].neff + 1; */
nneed = 2*t->samples[0].neff;
for( comp = 0; comp < t->ncomp; ++comp ) {
Totals *tot = &totals[comp];
creal maxerr = MaxErr(tot->avg);
tot->nneed = tot->spread/maxerr;
nneed = Max(nneed, tot->nneed);
tot->maxerrsq = Sq(maxerr);
tot->mindevsq = tot->maxerrsq*Sq(t->mindeviation);
}
nwant = (number)Min(ceil(nneed), MARKMASK/40.);
err = SamplesLookup(t, &t->samples[1], t->key2, nwant,
(t->maxeval - t->neval)/t->nregions + 1, t->samples[0].n + 1);
/* the number of points needed to reach the desired accuracy */
fail = Unmark(err)*t->nregions;
if( Marked(err) ) {
if( VERBOSE ) Print("\nNot enough samples left for main integration.");
for( comp = 0; comp < t->ncomp; ++comp )
prob[comp] = -999;
neff = t->samples[0].neff;
}
else {
bool can_adjust = (t->key3 == 1 && t->samples[1].sampler != SampleRule &&
(t->key2 < 0 || t->samples[1].neff < MAXPRIME));
count df, nlimit;
SamplesAlloc(t, &t->samples[1]);
if( VERBOSE ) {
char s[128];
sprintf(s, "\nMain integration on " COUNT
" regions with " NUMBER " samples per region.",
t->nregions, t->samples[1].neff);
Print(s);
}
ResClear(integral);
ResClear(error);
ResClear(prob);
nlimit = t->maxeval - t->nregions*t->samples[1].n;
df = 0;
#define CopyPhaseResults(f) \
for( comp = 0; comp < t->ncomp; ++comp ) { \
PhaseResult *p = &totals[comp].phase[f]; \
cResult *r = ®ion->result[comp]; \
p->avg = r->avg; \
p->err = r->err; \
}
#define Var2(f, res) Sq((res)->err ? (res)->err : r->spread/t->samples[f].neff)
#define Var(f) Var2(f, &tot->phase[f])
for( iregion = 0; iregion < t->nregions; ++iregion ) {
Region *region;
char s[64*NDIM + 256*NCOMP], *p = s;
int todo;
refine:
region = RegionPtr(iregion);
CopyPhaseResults(0);
t->phase = 2;
region->isamples = 1;
t->samples[1].sampler(t, iregion);
CopyPhaseResults(1);
if( can_adjust )
for( comp = 0; comp < t->ncomp; ++comp )
totals[comp].spreadsq -= Sq(region->result[comp].spread);
nlimit += t->samples[1].n;
todo = 0;
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
Totals *tot = &totals[comp];
if( t->neval < nlimit ) {
creal avg2 = tot->phase[1].avg;
creal diffsq = Sq(avg2 - tot->phase[0].avg);
if( r->err*tot->nneed > r->spread ||
diffsq > Max(t->maxchisq*(Var(0) + Var(1)), EPS*Sq(avg2)) ) {
if( t->key3 && diffsq > tot->mindevsq ) {
if( t->key3 == 1 ) {
if( VERBOSE > 2 ) Print("\nSplit");
t->phase = 1;
Iterate(t, iregion, POSTDEPTH, 1, totals);
if( can_adjust ) {
cnumber nnew = (tot->spreadsq/Sq(MARKMASK) > tot->maxerrsq) ?
MARKMASK :
(number)ceil(sqrt(tot->spreadsq/tot->maxerrsq));
if( nnew > nwant + nwant/64 ) {
ccount err = SamplesLookup(t, &t->samples[1], t->key2, nnew,
(t->maxeval - t->neval)/t->nregions + 1, t->samples[1].n);
fail += Unmark(err)*t->nregions;
nwant = nnew;
SamplesFree(&t->samples[1]);
SamplesAlloc(t, &t->samples[1]);
if( t->key2 > 0 && t->samples[1].neff >= MAXPRIME )
can_adjust = false;
if( VERBOSE > 2 ) {
char s[128];
sprintf(s, "Sampling remaining " COUNT
" regions with " NUMBER " points per region.",
t->nregions, t->samples[1].neff);
Print(s);
}
}
}
goto refine;
}
todo |= 3;
}
todo |= 1;
}
}
}
if( can_adjust ) {
for( comp = 0; comp < t->ncomp; ++comp )
totals[comp].maxerrsq -=
Sq(region->result[comp].spread/t->samples[1].neff);
}
switch( todo ) {
case 1: /* get spread right */
region->isamples = 1;
Explore(t, iregion);
break;
case 3: /* sample region again with more points */
if( SamplesIniQ(&t->samples[2]) ) {
SamplesLookup(t, &t->samples[2], t->key3,
nwant, (number)INT_MAX, (number)0);
SamplesAlloc(t, &t->samples[2]);
}
t->phase = 3;
region->isamples = 2;
t->samples[2].sampler(t, iregion);
Explore(t, iregion);
++region->depth; /* misused for df here */
++df;
}
if( VERBOSE > 2 ) {
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
p += sprintf(p,
(dim == 0) ? "\nRegion (" REALF ") - (" REALF ")" :
"\n (" REALF ") - (" REALF ")",
b->lower, b->upper);
}
}
for( comp = 0; comp < t->ncomp; ++comp ) {
Result *r = ®ion->result[comp];
Totals *tot = &totals[comp];
creal x1 = tot->phase[0].avg;
creal v1 = Var(0);
creal x2 = tot->phase[1].avg;
creal v2 = Var(1);
creal r2 = v1 ? v2/v1 :
Sq(t->samples[1].neff/(real)t->samples[0].neff);
real norm = 1 + r2;
real avg = x2 + r2*x1;
real sigsq = v2;
real chisq = Sq(x2 - x1);
real chiden = v1 + v2;
if( todo == 3 ) {
creal x3 = r->avg;
creal v3 = Var2(2, r);
creal r3 = v2 ? v3/v2 :
Sq(t->samples[2].neff/(real)t->samples[1].neff);
norm = 1 + r3*norm;
avg = x3 + r3*avg;
sigsq = v3;
chisq = v1*Sq(x3 - x2) + v2*Sq(x3 - x1) + v3*chisq;
chiden = v1*v2 + v3*chiden;
}
avg = LAST ? r->avg : (sigsq *= norm = 1/norm, avg*norm);
if( chisq > EPS ) chisq /= Max(chiden, NOTZERO);
if( VERBOSE > 2 ) {
#define Out2(f, res) (res)->avg, r->spread/t->samples[f].neff, (res)->err
#define Out(f) Out2(f, &tot->phase[f])
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL "(" REAL ")\n "
REAL " +- " REAL "(" REAL ")", comp + 1, Out(0), Out(1));
if( todo == 3 ) p += sprintf(p, "\n "
REAL " +- " REAL "(" REAL ")", Out2(2, r));
p += sprintf(p, " \tchisq " REAL, chisq);
}
integral[comp] += avg;
error[comp] += sigsq;
prob[comp] += chisq;
r->avg = avg;
r->spread = sqrt(sigsq);
r->chisq = chisq;
}
if( VERBOSE > 2 ) Print(s);
}
for( comp = 0; comp < t->ncomp; ++comp )
error[comp] = sqrt(error[comp]);
df += t->nregions;
if( VERBOSE > 2 ) {
char s[16 + 128*NCOMP], *p = s;
p += sprintf(p, "\nTotals:");
for( comp = 0; comp < t->ncomp; ++comp )
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL " \tchisq " REAL " (" COUNT " df)",
comp + 1, integral[comp], error[comp], prob[comp], df);
Print(s);
}
for( comp = 0; comp < t->ncomp; ++comp )
prob[comp] = ChiSquare(prob[comp], df);
neff = 1;
}
#ifdef MLVERSION
if( REGIONS ) {
MLPutFunction(stdlink, "List", 2);
MLPutFunction(stdlink, "List", t->nregions);
for( iregion = 0; iregion < t->nregions; ++iregion ) {
Region *region = RegionPtr(iregion);
cBounds *b = region->bounds;
real lower[NDIM], upper[NDIM];
for( dim = 0; dim < t->ndim; ++dim ) {
lower[dim] = b[dim].lower;
upper[dim] = b[dim].upper;
}
MLPutFunction(stdlink, "Cuba`Divonne`region", 4);
MLPutRealList(stdlink, lower, t->ndim);
MLPutRealList(stdlink, upper, t->ndim);
MLPutFunction(stdlink, "List", t->ncomp);
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
real res[] = {r->avg, r->spread/neff, r->chisq};
MLPutRealList(stdlink, res, Elements(res));
}
MLPutInteger(stdlink, region->depth + 1); /* misused for df */
}
}
#endif
abort:
SamplesFree(&t->samples[2]);
SamplesFree(&t->samples[1]);
SamplesFree(&t->samples[0]);
RuleFree(&t->rule13);
RuleFree(&t->rule11);
RuleFree(&t->rule9);
RuleFree(&t->rule7);
free(t->voidregion);
return fail;
}
Cuba-3.0/src/divonne/Iterate.c 0000644 0000000 0000000 00000007152 11660443622 014727 0 ustar root root /*
Iterate.c
recursion over regions
this file is part of Divonne
last modified 15 Nov 11 th
*/
static void Iterate(This *t, count iregion, cint depth, cint isamples,
Totals *totals)
{
TYPEDEFREGION;
Region *parent, *region;
typedef struct {
real avg, err, spread, spreadsq;
} Corr;
Corr corr[NCOMP];
count ireg, mreg = iregion;
count comp, maxsplit;
int last, idest, isrc;
region = RegionPtr(iregion);
region->depth = depth;
region->next = -iregion - 1;
if( isamples < 0 ) Split(t, iregion);
else {
region->isamples = isamples;
Explore(t, iregion);
}
ireg = iregion + RegionPtr(iregion)->next;
do {
region = RegionPtr(ireg);
if( region->depth > 0 ) {
--region->depth;
more:
ireg = ExploreParent(t, ireg);
if( ireg == -1 ) return;
region = RegionPtr(ireg);
}
if( region->depth < 0 ) mreg = IMax(mreg, ireg);
ireg += region->next;
} while( ireg > 0 );
#ifndef MLVERSION
if( t->running ) goto more;
#endif
maxsplit = 1;
for( ireg = mreg; ireg >= iregion; --ireg ) {
parent = RegionPtr(ireg);
maxsplit -= NegQ(parent->depth);
if( parent->depth < 0 ) {
count xreg;
struct {
count from, to;
} todo[maxsplit], *tdmax = todo, *td;
count nsplit = 0;
real norm;
memset(corr, 0, sizeof corr);
tdmax->from = ireg + parent->next;
tdmax->to = tdmax->from - parent->depth;
++tdmax;
for( td = todo; td < tdmax; ++td ) {
for( xreg = td->from; xreg < td->to; ++xreg ) {
Region *region = RegionPtr(xreg);
if( region->depth < 0 ) {
tdmax->from = xreg + region->next;
tdmax->to = tdmax->from - region->depth;
++tdmax;
}
else {
++nsplit;
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
Corr *c = &corr[comp];
c->avg += r->avg;
c->err += r->err;
c->spread += Sq(r->spread);
}
}
}
}
norm = 1./nsplit--;
for( comp = 0; comp < t->ncomp; ++comp ) {
Result *p = &parent->result[comp];
Corr *c = &corr[comp];
creal diff = fabs(p->avg - c->avg)*norm;
c->avg = diff*norm*nsplit;
c->err = (c->err == 0) ? 1 : 1 + diff/c->err;
c->spread = (c->spread == 0) ? 1 : 1 + diff/sqrt(c->spread);
}
for( td = todo; td < tdmax; ++td )
for( xreg = td->from; xreg < td->to; ++xreg ) {
Region *region = RegionPtr(xreg);
if( region->depth >= 0 ) {
cnumber neff = t->samples[region->isamples].neff;
for( comp = 0; comp < t->ncomp; ++comp ) {
Result *r = ®ion->result[comp];
Corr *c = &corr[comp];
if( r->err > 0 ) r->err = r->err*c->err + c->avg;
r->spread = r->spread*c->spread + c->avg*neff;
c->spreadsq += Sq(r->spread);
}
}
}
}
}
if( totals )
for( comp = 0; comp < t->ncomp; ++comp )
totals[comp].spreadsq += corr[comp].spreadsq;
for( last = -1, idest = isrc = iregion; iregion <= mreg; ++iregion ) {
Region *region = RegionPtr(iregion);
cint cur = NegQ(region->depth);
switch( cur - last ) {
case -1:
memmove(RegionPtr(idest), RegionPtr(isrc),
(iregion - isrc)*sizeof(Region));
idest += iregion - isrc;
break;
case 1:
isrc = iregion;
}
last = cur;
}
memmove(RegionPtr(idest), RegionPtr(iregion),
(t->nregions - iregion)*sizeof(Region));
t->nregions += idest - iregion;
}
Cuba-3.0/src/divonne/KorobovCoeff.c 0000644 0000000 0000000 00000256772 10212111070 015711 0 ustar root root #define KOROBOV_MINDIM 2
#define KOROBOV_MAXDIM 33
#define MAXPRIME 9689
#define Hash(x) ((19945 - x)*(-47 + x))/121634
static int prime[] = {
FIRST,47,53,59,67,71,79,83,89,97,103,109,113,127,131,137,139,149,151,
157,163,173,179,181,191,193,199,211,223,227,229,233,239,241,251,257,263,
269,277,283,293,307,311,313,317,331,337,347,349,353,359,367,373,379,383,
389,397,401,409,419,421,431,433,439,443,449,457,461,467,479,487,491,499,
503,509,521,523,541,547,557,563,569,571,577,587,593,599,601,607,613,617,
619,631,641,643,647,653,659,661,673,677,683,691,701,709,719,727,733,739,
743,751,757,761,769,773,787,797,809,811,821,823,827,829,839,853,857,859,
863,877,881,883,887,907,911,919,929,937,941,947,953,967,971,977,983,991,
997,1009,1013,1019,1021,1031,1033,1039,1049,1051,1061,1063,1069,1087,
1091,1093,1097,1103,1109,1117,1123,1129,1151,1153,1163,1171,1181,1187,
1193,1201,1213,1217,1223,1229,1231,1237,1249,1259,1277,1279,1283,1289,
1291,1297,1301,1303,1307,1319,1321,1327,1361,1367,1373,1381,1399,1409,
1423,1427,1429,1433,1439,1447,1451,1453,1459,1471,1481,1483,1487,1489,
1493,1499,1511,1523,1531,1543,1549,1553,1559,1567,1571,1579,1583,1597,
1601,1607,1609,1613,1619,1621,1627,1637,1657,1663,1667,1669,1693,1697,
1699,1709,1721,1723,1733,1741,1747,1753,1759,1777,1783,1787,1789,1801,
1811,1823,1831,1847,1861,1867,1871,1873,1877,1879,1889,1901,1907,1913,
1931,1933,1949,1951,1973,1979,1987,1993,1997,1999,2003,2011,2017,2027,
2029,2039,2053,2063,2069,2081,2083,2087,2089,2099,2111,2113,2129,2131,
2137,2141,2143,2153,2161,2179,2203,2207,2213,2221,2237,2239,2243,2251,
2267,2269,2273,2281,2287,2293,2297,2309,2311,2333,2339,2341,2347,2351,
2357,2371,2377,2381,2383,2389,2393,2399,2411,2417,2423,2437,2441,2447,
2459,2467,2473,2477,2503,2521,2531,2539,2543,2549,2551,2557,2579,2591,
2593,2609,2617,2621,2633,2647,2657,2659,2663,2671,2677,2683,2687,2689,
2693,2699,2707,2711,2713,2719,2729,2731,2741,2749,2753,2767,2777,2789,
2791,2797,2801,2803,2819,2833,2837,2843,2851,2857,2861,2879,2887,2897,
2903,2909,2917,2927,2939,2953,2957,2963,2969,2971,2999,3001,3011,3019,
3023,3037,3041,3049,3061,3067,3079,3083,3089,3109,3119,3121,3137,3163,
3167,3169,3181,3187,3191,3203,3209,3217,3221,3229,3251,3253,3257,3259,
3271,3299,3301,3307,3313,3319,3323,3329,3331,3343,3347,3359,3361,3371,
3373,3389,3391,3407,3413,3433,3449,3457,3461,3463,3467,3469,3491,3499,
3511,3517,3527,3529,3533,3539,3547,3557,3571,3581,3583,3593,3607,3613,
3623,3631,3643,3659,3671,3673,3677,3691,3701,3709,3719,3733,3739,3761,
3767,3769,3779,3793,3797,3803,3821,3833,3847,3851,3853,3863,3877,3889,
3907,3911,3917,3929,3943,3947,3967,3989,4001,4003,4007,4013,4019,4027,
4049,4051,4057,4073,4079,4091,4099,4111,4127,4133,4139,4153,4159,4177,
4201,4211,4217,4219,4229,4231,4243,4259,4271,4283,4289,4297,4327,4337,
4339,4349,4357,4363,4373,4391,4397,4409,4421,4423,4441,4451,4463,4481,
4483,4493,4507,4517,4523,4547,4549,4561,4567,4583,4597,4603,4621,4637,
4639,4651,4663,4673,4691,4703,4721,4723,4733,4751,4759,4783,4787,4789,
4801,4813,4831,4861,4871,4877,4889,4903,4909,4919,4931,4933,4943,4957,
4969,4987,4993,5003,5021,5023,5039,5051,5059,5077,5087,5101,5119,5147,
5153,5167,5171,5179,5189,5209,5227,5231,5237,5261,5273,5281,5297,5309,
5323,5333,5347,5351,5381,5387,5399,5413,5431,5437,5449,5471,5479,5501,
5507,5519,5531,5557,5563,5573,5591,5623,5639,5641,5647,5657,5669,5683,
5701,5711,5737,5743,5749,5779,5783,5801,5813,5827,5843,5857,5869,5881,
5903,5923,5927,5953,5981,5987,6007,6011,6029,6037,6053,6067,6089,6101,
6113,6131,6151,6163,6173,6197,6211,6229,6247,6257,6277,6287,6311,6323,
6343,6359,6373,6389,6421,6427,6449,6469,6481,6491,6521,6529,6547,6563,
6581,6599,6619,6637,6653,6673,6691,6709,6733,6737,6763,6781,6803,6823,
6841,6863,6883,6899,6917,6947,6961,6983,7001,7019,7043,7057,7079,7103,
7127,7151,7159,7187,7211,7229,7253,7283,7297,7321,7349,7369,7393,7417,
7433,7459,7487,7507,7537,7561,7583,7607,7639,7669,7687,7717,7741,7759,
7793,7823,7853,7883,7907,7937,7963,7993,8039,8059,8093,8123,8161,8191,
8221,8263,8297,8329,8369,8419,8447,8501,8527,8563,8609,8663,8699,8747,
8803,8849,8893,8963,9029,9091,9157,9239,9319,9413,9533,MarkLast(9689)
};
static short coeff[][32] = {
{13,11,10,3,9,2,2,2,2,9,2,2,7,2,2,2,2,2,2,6,2,2,2,13,11,10,3,9,2,2,2,2},
{23,17,12,11,14,14,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,12,12,12,14,14,14},
{18,14,5,14,2,2,19,19,25,25,18,18,18,2,2,2,2,2,2,2,2,2,2,2,25,6,2,2,2,18,14,5},
{18,13,23,5,2,12,6,12,12,12,10,10,16,2,16,16,2,2,2,2,2,2,2,10,2,2,2,2,10,2,2,2},
{21,22,7,21,2,20,20,2,2,2,2,22,2,2,2,2,2,2,2,6,6,21,2,2,2,2,2,2,2,2,6,6},
{29,19,27,32,6,8,2,2,2,2,2,8,8,2,2,2,2,9,9,9,9,2,2,2,2,2,2,2,9,9,2,2},
{30,19,24,16,22,8,2,2,22,5,9,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{34,28,13,28,27,27,2,4,2,2,2,16,16,4,20,20,36,20,36,5,5,5,36,36,5,5,5,7,5,7,7,2},
{35,19,33,8,21,30,8,2,4,2,4,4,2,2,2,2,2,2,2,2,2,17,2,2,11,25,11,17,17,17,17,17},
{37,21,35,29,27,19,19,2,2,2,5,15,2,2,15,15,19,19,19,19,19,2,2,2,2,2,19,2,2,2,2,2},
{45,44,13,25,17,47,30,2,30,2,2,2,2,2,2,2,2,2,19,19,19,17,17,2,2,2,2,2,2,2,2,2},
{35,22,37,9,35,12,35,8,2,2,50,50,2,2,32,32,32,31,13,8,8,8,2,22,50,9,9,9,22,22,22,10},
{29,24,43,36,49,2,2,8,4,25,49,25,2,2,8,10,10,10,5,5,5,40,10,33,40,40,2,27,10,25,25,25},
{50,18,32,39,21,2,2,2,4,4,36,36,14,14,14,14,2,2,2,17,17,17,16,16,2,14,14,14,14,2,2,2},
{31,28,45,20,18,43,43,13,28,2,2,2,31,31,31,31,31,2,2,2,43,43,2,2,2,2,2,2,2,2,30,2},
{39,15,41,7,24,2,2,30,40,2,2,25,25,25,25,2,2,2,2,2,2,6,6,2,25,2,5,2,2,25,2,2},
{44,20,29,39,7,21,21,21,2,2,45,2,2,2,49,49,49,49,49,2,2,2,2,2,2,2,2,2,2,2,2,2},
{56,20,22,13,18,35,35,6,2,4,2,4,2,2,2,23,16,16,4,23,2,34,52,2,34,2,4,2,2,2,23,16},
{46,32,17,18,29,27,31,31,31,2,2,4,15,2,2,2,2,2,2,2,2,2,2,2,2,2,23,32,32,32,15,15},
{62,42,43,17,23,13,13,2,2,13,2,2,2,2,2,2,2,10,2,2,2,2,9,10,2,2,2,19,9,9,9,9},
{64,34,16,28,16,51,47,2,2,2,6,18,39,39,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,12,12,2},
{74,26,44,25,50,24,54,39,58,42,2,42,42,2,2,2,2,2,2,2,2,33,33,2,2,39,11,2,2,58,39,58},
{70,22,50,22,16,9,25,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{74,21,17,25,35,33,10,2,10,20,20,57,57,57,2,2,57,2,2,2,2,2,2,2,13,2,2,2,2,2,2,2},
{81,18,10,11,47,38,71,37,2,37,2,2,2,2,2,26,26,26,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{55,30,85,42,16,36,45,67,2,2,68,2,2,2,2,2,2,2,68,10,2,2,2,2,2,2,2,2,2,2,2,2},
{64,17,24,26,49,12,10,39,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,59,2,2},
{68,57,23,38,61,38,13,13,8,2,2,2,2,2,2,2,2,2,2,2,2,2,2,68,15,2,44,44,44,2,2,2},
{94,28,58,29,13,5,15,8,66,2,2,2,39,39,15,66,2,2,6,6,2,2,66,66,66,66,2,2,2,2,2,66},
{94,85,9,41,41,37,29,29,17,2,2,2,7,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,8,8},
{89,32,75,77,77,13,2,30,30,2,2,2,2,2,2,2,2,2,2,67,67,2,2,2,2,2,2,2,2,8,19,32},
{70,45,58,63,67,10,72,72,70,6,2,36,2,70,70,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{101,33,76,13,45,63,2,2,6,19,2,2,32,32,32,32,32,65,2,63,63,11,11,11,19,19,19,19,9,63,63,63},
{70,89,44,37,19,45,2,2,2,8,10,8,54,54,80,80,80,80,80,2,116,2,116,2,2,80,40,51,100,100,8,2},
{71,54,83,51,42,98,2,2,8,8,14,30,93,22,15,15,30,30,30,44,44,44,2,2,22,22,22,117,44,11,11,11},
{109,37,51,113,17,10,2,2,17,17,55,2,55,55,55,55,55,55,2,2,2,57,48,48,55,55,2,2,55,2,2,55},
{75,38,68,89,11,52,2,2,81,39,2,38,2,2,2,2,2,2,2,2,2,2,2,19,2,2,2,2,2,2,2,2},
{81,84,35,34,20,93,2,12,12,12,2,96,2,96,96,2,96,2,2,2,2,2,2,2,2,2,2,2,2,56,56,56},
{104,32,56,46,77,11,35,35,24,56,19,2,2,2,78,2,2,75,2,2,2,2,78,2,2,2,2,2,2,2,2,2},
{81,103,25,35,28,15,20,20,20,2,2,2,2,20,20,20,107,107,2,2,2,2,2,2,2,2,2,2,2,2,13,13},
{119,75,42,29,74,23,54,36,39,2,2,4,4,19,19,2,2,2,2,2,2,2,2,54,2,2,2,2,2,2,2,54},
{115,73,22,102,75,138,16,73,50,16,2,50,2,2,2,133,2,2,2,2,2,2,2,2,2,2,2,2,2,33,33,33},
{119,48,66,51,14,22,20,20,2,2,2,2,2,60,2,2,2,2,2,2,2,2,60,2,2,2,2,2,2,60,2,65},
{121,94,80,29,51,69,42,36,14,14,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,17,2,2},
{129,123,41,79,43,34,24,11,2,2,4,2,2,2,2,75,16,16,16,75,75,75,16,16,16,25,2,99,2,2,75,16},
{128,33,35,68,22,8,62,94,2,2,2,62,62,2,98,2,2,4,98,2,2,32,81,32,32,32,98,98,98,98,98,98},
{101,109,154,15,57,6,27,36,2,2,37,37,2,2,2,2,2,2,2,107,2,2,2,107,107,2,2,2,2,2,2,2},
{106,40,24,38,61,118,106,106,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{149,111,58,79,127,13,41,33,27,16,30,2,61,2,72,2,2,2,2,2,2,2,2,2,2,2,2,75,75,2,2,2},
{105,92,43,156,25,53,57,115,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{99,40,62,67,66,29,99,99,99,78,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,79},
{109,42,96,95,66,41,103,84,13,103,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{111,72,16,89,25,86,117,29,14,14,2,2,2,2,2,60,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{106,72,49,94,140,44,97,157,75,2,2,4,123,123,2,2,123,123,123,123,2,2,2,2,2,2,2,2,2,2,2,2},
{115,67,74,32,43,50,21,36,135,36,85,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{151,71,157,42,41,37,80,27,18,2,2,2,2,2,2,2,2,2,2,2,2,2,115,128,128,128,128,128,32,2,128,80},
{119,91,38,30,92,44,32,76,22,2,34,2,2,2,2,2,2,2,2,2,2,2,2,2,2,129,2,2,129,2,2,2},
{121,126,31,52,120,37,57,10,171,2,2,2,2,35,35,35,2,2,97,97,97,97,97,97,97,35,35,35,97,97,97,2},
{155,86,49,104,87,94,64,45,61,91,91,91,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{164,121,44,166,47,33,7,15,13,2,2,122,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{128,120,133,17,71,52,25,107,42,21,21,2,2,2,2,4,4,96,2,9,9,2,9,94,94,94,94,94,94,94,94,96},
{179,82,157,76,61,35,13,90,197,2,69,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,39,39},
{136,136,148,63,66,10,169,95,95,163,30,28,28,2,41,130,2,2,2,21,2,2,2,2,2,2,2,2,2,2,2,36},
{131,40,112,63,55,30,53,79,79,79,2,79,2,2,2,2,2,79,2,2,2,2,14,36,2,21,21,21,21,2,2,91},
{165,81,92,48,9,110,12,40,40,34,2,2,2,107,107,107,2,107,2,2,2,2,2,2,2,2,2,2,2,15,41,41},
{169,66,170,97,35,56,55,86,32,32,2,2,2,2,14,2,40,2,37,2,2,37,40,40,40,2,2,2,37,37,37,37},
{135,63,126,156,70,18,49,143,6,117,2,109,109,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{193,59,51,68,68,15,170,170,170,143,143,12,2,2,2,63,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{145,101,56,65,23,76,110,2,4,4,4,146,146,146,2,146,2,2,2,2,2,2,2,2,2,2,2,2,2,2,146,146},
{144,129,26,98,36,46,47,52,52,52,82,2,2,2,2,2,17,2,2,2,2,2,2,2,2,2,2,2,2,91,2,2},
{145,78,166,171,56,20,63,2,2,33,33,33,33,2,78,47,47,47,47,47,2,2,2,2,2,78,78,78,2,2,2,2},
{191,69,176,54,47,75,167,2,2,2,188,188,188,30,30,2,67,67,117,2,117,117,117,2,2,36,2,2,2,2,2,2},
{186,96,29,122,47,96,170,157,157,157,157,108,159,2,195,195,26,26,26,26,26,2,2,2,2,132,132,132,2,2,2,2},
{151,118,226,91,54,49,33,2,2,2,2,4,4,4,143,143,2,2,143,25,25,25,2,143,143,143,143,143,143,143,143,143},
{144,91,237,82,81,75,138,163,163,163,117,117,44,2,44,136,136,136,136,2,2,2,2,2,122,122,122,122,2,2,2,136},
{189,78,178,64,118,27,189,2,2,67,67,110,110,110,110,2,28,28,2,2,2,2,2,2,2,102,2,2,2,2,2,2},
{165,202,83,76,125,65,42,2,44,44,23,2,23,23,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{209,204,92,75,85,146,104,2,7,18,8,2,2,2,204,95,95,95,2,2,2,95,95,95,95,95,95,95,2,2,2,95},
{169,68,89,16,193,82,33,262,262,175,148,148,148,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{171,162,78,43,61,17,112,10,171,182,118,33,2,2,2,2,118,2,2,2,2,2,2,151,2,2,2,2,2,2,2,2},
{211,121,119,55,90,211,96,89,225,25,178,36,36,36,2,2,108,2,2,2,2,2,2,2,2,2,2,2,2,184,2,2},
{154,101,83,17,16,210,41,79,70,158,2,27,27,2,2,2,2,2,2,2,2,2,2,2,2,153,2,2,2,2,2,2},
{169,179,130,79,148,180,136,17,47,119,2,119,119,169,169,2,169,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{241,171,148,31,172,34,66,60,156,140,2,2,2,75,75,2,2,2,2,2,2,2,190,190,2,2,2,30,2,2,2,2},
{229,189,183,106,118,138,82,149,265,39,2,2,265,2,2,2,2,2,2,130,2,2,2,71,71,2,2,2,71,2,2,71},
{165,157,127,21,64,15,80,130,130,130,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,74,2},
{221,130,203,84,83,83,29,121,54,54,2,141,2,2,94,94,94,4,4,4,2,4,2,2,2,54,54,108,16,16,94,52},
{230,166,20,160,121,102,153,94,16,67,2,2,2,2,2,2,97,97,97,2,2,97,97,2,97,97,97,97,97,97,97,97},
{181,79,137,119,139,24,77,17,50,25,25,25,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{239,242,192,40,41,62,124,193,193,31,193,2,2,2,2,2,2,2,2,2,2,2,2,148,2,2,2,2,2,2,2,2},
{239,178,73,122,239,51,95,48,78,88,78,2,2,2,2,2,2,2,2,2,2,2,144,144,2,2,144,144,144,2,144,144},
{234,117,198,34,143,21,74,6,252,252,98,2,2,2,2,197,38,2,2,2,2,2,47,2,47,47,47,47,2,2,2,47},
{179,110,38,28,58,39,16,29,42,125,202,8,8,129,4,4,2,2,2,67,67,2,2,2,2,2,2,8,67,67,2,2},
{246,53,189,50,18,59,179,179,7,137,137,2,2,103,103,103,103,40,40,40,2,2,2,2,73,73,73,2,103,103,103,103},
{239,133,87,92,193,12,206,238,238,238,31,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{191,244,60,193,18,32,193,104,74,125,125,66,2,2,2,2,2,2,2,2,2,2,125,125,2,125,125,125,2,2,2,2},
{177,74,90,91,172,219,63,84,32,2,2,196,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{253,143,54,39,122,32,75,107,234,2,6,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{282,89,71,88,30,23,81,105,105,2,2,105,105,131,107,2,2,2,2,2,195,195,2,2,29,29,21,21,128,195,195,195},
{259,115,171,40,156,71,67,24,24,2,2,2,24,4,4,4,2,234,2,2,2,2,2,2,2,2,2,74,74,2,2,2},
{264,237,49,203,247,108,75,75,75,2,2,32,16,8,16,16,16,164,14,164,2,2,32,16,8,16,16,32,42,42,42,2},
{264,106,89,51,29,226,23,286,286,151,151,151,151,151,2,2,2,2,2,2,31,31,31,2,2,2,2,2,2,2,2,284},
{194,215,82,23,213,23,108,127,74,2,201,32,178,2,285,2,2,2,2,285,2,2,2,2,2,2,2,2,2,2,2,2},
{196,267,251,111,231,14,30,52,95,2,154,53,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{266,67,22,101,102,157,53,95,130,2,42,76,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{281,205,107,178,236,122,122,316,76,215,215,2,60,2,2,2,2,2,2,227,2,2,2,2,2,2,2,2,27,2,2,2},
{271,89,65,195,132,162,102,45,56,174,104,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{200,169,170,121,155,68,131,167,78,113,113,2,2,64,2,2,2,2,2,2,2,2,2,2,2,2,2,173,2,2,2,2},
{288,143,265,264,71,19,231,169,27,27,27,2,2,2,2,2,2,2,2,2,2,2,2,2,51,2,2,2,2,2,2,2},
{311,141,96,173,90,119,134,151,35,252,39,2,39,39,2,2,2,2,2,2,2,2,2,113,113,2,2,2,2,2,2,113},
{311,230,52,138,225,346,162,216,216,91,160,182,91,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{275,167,128,244,184,184,44,210,237,139,139,139,139,2,2,2,2,2,2,2,2,2,2,73,2,2,2,2,2,2,2,2},
{176,156,83,135,46,197,108,63,33,33,33,2,133,2,213,213,213,213,133,133,2,133,2,2,133,133,2,2,2,2,2,2},
{283,125,141,192,89,181,106,208,124,124,2,112,112,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{289,191,171,152,191,173,54,13,21,56,56,56,2,2,2,2,2,2,2,2,2,220,2,2,2,2,2,2,2,2,2,2},
{334,305,132,132,99,126,54,116,164,105,2,105,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,287,2,2,2,2},
{240,166,44,193,153,333,15,99,246,99,2,2,99,99,2,2,2,2,195,195,195,2,195,195,2,263,263,2,195,195,195,263},
{246,194,265,79,225,65,24,62,46,181,2,2,2,314,2,2,2,2,2,2,2,215,2,2,2,2,2,2,2,2,2,2},
{229,334,285,302,21,26,24,97,64,40,2,2,2,231,231,231,231,65,2,148,2,2,2,2,2,2,2,2,2,2,2,2},
{251,295,55,249,135,173,164,78,261,261,2,2,2,2,114,2,2,2,2,2,256,142,142,2,2,2,2,2,2,2,2,185},
{232,153,55,60,181,79,107,70,29,35,2,2,58,58,2,58,2,2,2,2,61,61,2,61,61,2,2,61,61,90,2,90},
{246,116,45,146,109,90,32,103,133,119,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{246,113,146,232,162,262,204,47,45,331,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{360,150,84,275,13,26,368,49,244,244,63,63,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{239,295,174,87,30,87,85,36,103,36,2,278,2,2,2,2,2,2,163,2,2,2,2,2,2,2,2,2,2,2,2,2},
{356,300,75,310,123,301,200,107,183,37,218,37,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{358,207,168,150,150,21,156,50,195,275,275,275,2,2,2,2,2,251,2,2,2,251,251,251,251,251,251,251,251,251,2,2},
{322,194,234,62,236,147,239,400,255,255,80,4,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{326,276,134,100,143,113,115,221,13,339,194,194,194,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{337,132,27,45,14,81,110,84,238,224,211,2,29,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{192,213,113,174,403,117,342,342,311,35,35,2,2,2,2,2,2,2,2,101,2,2,2,2,2,2,2,2,2,101,101,101},
{264,273,316,53,40,330,51,285,115,219,147,2,2,2,335,2,2,2,2,2,173,2,173,2,2,173,173,173,173,173,173,83},
{254,293,407,118,54,296,160,231,4,4,93,2,2,2,2,2,60,61,2,2,120,127,127,127,88,88,88,88,88,88,88,88},
{341,78,336,263,281,164,99,334,296,114,109,2,163,163,163,163,2,2,2,2,2,2,2,125,125,292,292,292,292,125,125,125},
{355,87,212,100,89,210,133,344,120,45,45,138,138,138,138,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{274,141,46,219,158,284,38,79,73,185,35,6,81,2,2,2,2,53,2,2,81,81,2,81,2,2,2,53,53,53,53,53},
{349,303,439,19,95,240,174,191,2,162,162,2,2,2,76,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{360,91,201,205,67,181,59,77,2,44,103,103,103,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,125},
{283,154,261,91,77,147,227,105,116,311,256,256,2,116,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,32,2},
{287,288,111,89,249,370,55,16,248,67,67,115,2,2,134,134,2,2,2,2,2,2,2,2,2,2,2,2,2,22,22,22},
{284,270,282,37,29,181,160,49,285,285,374,250,2,374,374,2,2,2,179,179,35,2,179,179,2,179,179,2,2,285,285,285},
{359,305,52,36,243,231,7,92,2,68,68,307,62,45,2,2,112,311,311,311,2,2,2,2,2,2,2,2,2,2,2,2},
{288,119,218,137,364,38,27,380,2,2,211,23,33,2,2,2,2,2,225,225,225,2,2,225,225,225,2,2,2,2,2,2},
{277,155,232,309,370,365,348,75,214,214,214,4,4,2,2,2,210,210,210,210,210,210,210,2,2,2,2,2,2,2,2,2},
{292,204,91,41,124,190,107,322,125,125,125,125,125,25,25,62,2,2,146,146,2,2,62,146,2,146,114,146,114,2,2,2},
{282,195,192,409,68,99,253,106,2,2,2,231,55,55,2,323,323,55,55,285,285,285,285,2,2,2,2,2,2,285,285,323},
{299,122,174,403,113,77,63,275,2,2,2,138,276,227,38,227,2,237,2,2,2,2,2,2,2,2,2,2,352,352,352,2},
{282,222,268,86,21,109,353,408,2,2,2,2,135,12,12,216,241,241,241,241,241,241,241,241,241,303,303,303,135,135,135,2},
{374,94,89,257,137,246,186,196,2,2,2,2,2,454,122,122,122,122,2,2,2,28,28,94,94,94,94,94,122,122,122,122},
{288,92,62,428,122,153,481,66,2,2,2,250,250,177,177,177,177,279,279,279,279,279,279,279,2,2,279,177,177,177,177,177},
{288,370,141,284,207,192,450,67,2,2,2,183,217,217,217,183,183,167,202,202,202,202,167,167,2,2,2,164,164,80,167,167},
{286,293,199,39,158,332,242,103,2,2,2,408,266,315,2,2,365,253,315,315,315,315,315,2,2,315,2,2,2,2,2,2},
{407,83,435,187,40,16,52,65,2,2,244,39,77,119,119,2,2,2,119,342,342,2,2,2,2,2,342,2,2,58,58,119},
{398,88,78,57,260,203,203,43,131,131,131,204,204,322,204,2,102,2,325,325,325,325,2,2,2,2,2,2,2,2,2,2},
{390,174,70,155,163,67,225,49,2,34,34,151,151,2,2,111,2,2,111,111,2,2,2,2,2,2,2,2,2,2,2,2},
{393,129,393,169,23,192,168,47,2,2,312,150,71,2,150,2,2,2,61,2,2,61,2,2,2,2,2,2,2,2,2,2},
{408,136,71,63,63,159,222,68,181,181,124,227,14,14,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{294,169,79,242,160,123,178,290,186,186,56,399,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{415,228,69,68,193,122,21,362,33,22,362,57,2,2,2,2,46,46,196,196,196,2,196,196,196,2,196,2,2,2,2,2},
{415,130,241,185,312,175,309,199,94,281,47,47,2,2,2,2,206,307,221,2,2,2,2,2,239,239,239,239,239,206,206,206},
{417,238,147,165,346,19,92,164,266,291,291,43,2,2,2,345,2,2,2,345,345,2,2,2,2,2,345,2,2,2,2,2},
{456,192,86,182,35,174,342,102,210,210,210,393,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,256,256,158},
{307,255,92,38,325,61,103,246,176,319,80,89,2,241,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{432,168,63,154,166,46,479,145,144,288,288,288,288,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{341,256,113,85,188,233,161,29,110,167,91,91,253,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{311,360,312,158,73,16,106,209,472,48,24,203,203,2,2,2,2,234,234,234,2,234,234,203,2,2,2,234,234,234,234,234},
{437,196,161,100,132,246,395,187,35,35,35,2,2,35,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{438,174,338,145,155,276,422,374,4,463,463,99,224,70,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{426,225,211,130,325,283,353,96,282,23,299,2,2,2,63,63,2,276,276,2,2,2,2,2,2,2,2,2,2,2,2,2},
{430,101,288,38,200,332,325,193,123,123,88,2,2,2,2,2,231,231,139,139,139,139,139,139,139,139,139,139,139,139,139,139},
{434,143,308,389,365,363,174,63,121,125,260,2,2,260,260,2,2,2,2,2,2,2,2,2,2,258,2,2,2,258,2,2},
{453,123,201,141,229,223,234,494,102,102,102,2,2,102,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,252},
{438,168,65,264,304,74,168,88,114,132,187,2,127,127,2,2,2,2,2,81,81,56,2,2,2,307,2,2,2,2,81,81},
{324,181,141,129,33,171,173,291,227,373,52,301,301,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{448,119,431,111,135,50,242,95,148,49,49,49,68,2,2,2,2,2,2,2,2,49,2,2,2,2,2,2,2,2,2,2},
{335,114,55,47,33,173,287,345,198,198,136,238,238,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{468,377,243,237,332,512,27,167,22,169,14,14,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{456,162,188,223,408,209,28,164,299,299,258,186,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{445,391,115,226,96,456,239,214,556,158,158,282,2,2,2,2,2,2,2,2,2,2,2,2,2,331,2,2,2,2,2,2},
{360,397,130,172,407,479,295,13,38,199,199,346,2,2,2,2,2,2,145,2,2,2,2,2,2,2,2,2,2,2,2,2},
{512,136,129,361,180,61,274,128,422,27,292,165,2,2,2,2,2,2,363,117,117,117,117,2,2,2,2,363,2,2,2,2},
{478,433,483,302,200,227,273,27,171,171,371,102,2,2,2,2,2,20,2,2,2,2,2,2,2,2,403,403,2,2,2,2},
{485,158,454,86,212,60,93,40,209,188,188,106,2,231,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{390,448,111,145,47,555,367,317,315,52,429,435,429,429,2,2,2,2,2,2,2,2,229,2,2,229,2,2,2,229,2,2},
{490,331,187,398,407,373,497,219,423,423,378,378,2,419,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{378,406,112,198,539,550,516,59,240,240,23,316,2,122,2,2,2,2,2,2,2,2,2,2,111,111,2,2,2,95,2,2},
{474,373,248,330,40,113,105,273,103,407,2,165,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{495,406,306,239,172,323,236,50,37,435,2,310,56,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{498,447,112,241,552,119,227,189,140,140,140,140,140,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{505,132,169,418,342,28,319,301,172,530,317,317,335,2,2,2,2,2,2,376,2,2,2,2,2,2,2,2,2,2,2,2},
{397,393,191,269,462,151,264,134,307,307,2,163,163,2,2,2,2,2,2,2,2,2,2,2,2,2,159,2,2,2,2,2},
{485,491,325,149,122,145,228,100,311,64,2,62,137,2,137,2,2,2,2,2,2,2,392,2,2,2,2,2,2,2,2,2},
{364,462,360,383,182,187,123,69,129,146,2,156,149,2,149,2,2,2,2,2,2,2,303,303,303,2,2,2,2,2,149,266},
{507,195,130,401,363,171,483,20,86,464,2,89,89,2,26,2,2,2,2,2,425,425,2,2,2,2,2,2,2,2,2,2},
{380,220,87,122,242,78,207,371,95,305,2,2,2,2,440,440,445,358,358,331,331,358,445,445,445,445,445,445,445,445,445,445},
{507,221,247,137,182,90,28,207,325,438,2,2,2,2,2,187,232,438,2,2,68,37,37,37,37,37,37,37,37,37,161,2},
{509,265,101,126,203,86,152,416,352,85,2,2,2,284,391,368,2,2,152,2,2,2,325,2,2,2,2,2,2,2,2,2},
{572,359,332,480,68,535,59,504,365,21,2,2,246,54,246,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{415,178,178,372,415,400,73,82,348,99,2,23,325,44,2,2,2,2,2,2,2,2,325,2,2,2,2,2,2,2,2,2},
{430,275,236,361,42,552,368,236,653,74,65,458,288,307,307,2,2,2,2,2,2,2,65,65,2,2,2,2,2,2,2,2},
{434,139,58,437,130,441,188,15,63,145,145,145,300,2,2,2,2,300,2,2,2,2,2,2,2,2,401,401,401,401,401,401},
{542,138,266,514,552,202,103,197,574,48,2,96,96,2,2,96,96,217,2,2,2,2,2,2,2,2,2,2,2,2,2,217},
{546,494,72,272,550,219,213,209,169,404,69,464,86,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{602,466,332,458,99,244,255,183,446,670,2,186,323,2,2,2,2,2,2,2,2,2,2,2,2,2,2,292,165,165,165,165},
{422,413,561,110,242,62,436,478,18,150,606,88,643,2,249,2,2,2,2,456,2,2,2,2,2,2,2,2,2,2,2,456},
{522,141,154,253,264,53,120,93,274,52,44,203,556,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{600,249,375,555,421,322,317,84,517,517,268,106,353,2,2,2,2,2,2,2,2,2,268,2,2,2,2,2,2,302,2,2},
{555,516,310,438,290,559,52,265,248,193,285,441,285,285,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{555,300,232,386,470,300,355,177,57,407,450,279,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{544,177,79,306,256,402,205,496,398,115,115,43,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{534,274,194,220,575,81,206,544,341,85,137,429,429,429,429,344,2,2,2,2,2,315,315,315,315,315,315,72,72,72,2,2},
{400,136,112,136,273,277,205,578,122,122,230,230,2,2,2,2,2,2,2,2,2,2,2,2,2,2,302,2,2,2,2,2},
{576,421,115,52,253,373,17,657,43,178,178,58,485,485,485,485,485,485,2,2,2,159,159,159,159,2,619,2,2,2,2,2},
{576,301,142,329,96,41,302,528,126,112,206,206,2,2,2,2,2,2,206,206,2,206,206,2,191,206,206,191,191,191,191,206},
{548,538,508,250,539,102,73,285,119,433,480,480,2,2,2,480,480,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{622,526,294,56,498,176,237,351,25,26,474,55,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{446,163,469,481,240,278,51,373,491,13,22,419,2,2,2,2,2,2,2,2,2,176,176,2,2,2,2,2,2,2,2,2},
{445,223,102,108,120,166,68,214,737,504,96,96,206,377,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,39,39,528},
{453,121,489,84,434,505,78,575,468,372,468,468,83,468,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{425,355,128,58,194,82,438,117,10,34,34,35,112,107,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{432,479,328,443,253,634,271,429,406,543,406,543,543,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{433,294,192,205,152,70,99,68,392,169,309,390,390,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,199,2,2,2},
{456,383,487,311,57,579,673,264,582,187,184,43,43,2,2,2,2,501,501,501,2,2,2,2,2,2,2,2,2,2,2,2},
{437,561,384,619,363,420,614,117,217,247,405,142,142,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{434,372,239,508,478,26,375,255,151,151,650,112,251,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{437,133,516,423,305,90,135,25,266,487,6,286,286,2,2,2,2,2,2,2,2,2,2,2,2,510,510,2,2,2,2,2},
{463,341,170,401,178,79,305,98,162,166,32,392,335,335,335,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{610,477,478,516,318,184,267,423,190,494,494,2,336,336,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{611,211,491,224,47,54,124,268,271,271,223,2,2,2,2,2,2,2,2,2,2,2,2,359,2,2,2,2,2,2,2,2},
{590,463,461,162,162,622,167,254,29,377,377,75,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{478,388,612,404,491,561,180,80,262,58,94,2,2,275,2,2,2,2,2,151,2,2,2,2,2,312,312,312,2,2,2,275},
{629,225,67,623,298,588,354,49,41,185,176,63,63,63,2,2,2,2,2,2,2,2,2,2,2,2,8,435,32,32,435,435},
{671,275,392,298,612,328,337,215,58,58,124,2,2,490,392,2,2,2,125,457,457,2,2,2,2,2,2,2,2,2,2,457},
{448,126,129,168,209,340,40,96,509,509,509,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{667,246,160,68,737,203,168,628,46,128,358,2,2,2,121,121,2,2,2,2,2,2,560,121,2,2,2,2,2,2,2,121},
{635,212,284,356,187,591,275,361,194,317,488,2,2,2,2,2,2,97,6,2,6,247,2,2,2,2,2,2,2,2,2,6},
{612,395,104,86,264,321,521,325,252,53,178,100,100,100,16,343,343,343,343,343,2,2,2,2,2,2,2,2,2,343,343,343},
{486,428,287,472,292,141,504,178,585,98,282,2,2,2,2,2,2,2,2,2,2,2,2,284,284,284,78,284,2,2,2,2},
{612,327,212,565,450,385,201,649,423,491,106,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{462,579,236,447,60,162,427,258,73,742,742,2,742,742,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{495,440,89,439,65,207,459,407,139,131,624,2,380,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{469,507,276,227,66,237,260,386,27,666,31,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{646,393,273,238,24,13,253,127,368,316,316,316,150,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{626,196,111,465,386,431,181,414,614,391,349,318,389,2,389,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{667,257,290,122,109,523,95,26,282,49,374,236,236,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,88,2,2},
{653,169,261,533,488,282,213,443,337,480,503,174,534,2,2,2,2,2,534,2,2,2,2,534,2,2,2,2,534,2,2,2},
{670,555,160,90,604,604,50,459,376,545,316,180,526,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{639,253,95,380,108,448,223,254,381,30,6,644,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{642,160,702,90,157,254,278,521,650,277,74,554,122,2,2,2,2,2,2,517,174,174,174,2,2,2,2,2,2,2,2,2},
{678,254,190,197,637,49,130,25,374,357,357,411,643,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,537,2,2},
{512,347,65,546,434,87,18,123,672,412,316,6,699,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{657,233,108,38,147,53,136,168,408,477,477,279,268,289,2,2,2,2,2,2,289,2,2,2,2,2,2,2,2,289,289,2},
{498,431,217,101,78,143,111,113,181,825,458,140,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{660,624,376,472,165,66,158,308,492,779,305,305,2,576,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{521,249,388,155,467,245,134,311,72,312,312,623,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{408,348,216,299,302,668,347,63,172,141,272,168,678,2,2,2,512,2,2,2,2,4,2,2,2,494,64,64,64,128,16,512},
{669,421,230,70,212,845,237,347,148,76,823,472,2,2,2,132,2,2,2,2,2,2,2,383,132,383,2,2,383,383,383,383},
{693,530,139,82,780,416,270,278,330,484,484,200,2,2,2,2,137,94,2,2,2,2,2,2,2,2,484,2,2,2,2,2},
{672,150,164,622,196,75,302,119,42,314,314,132,60,60,60,298,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{705,302,411,705,691,160,809,40,32,867,826,826,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{684,229,138,46,407,399,82,254,267,31,31,45,2,209,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{707,323,409,27,31,157,492,463,886,412,251,251,304,190,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{715,521,636,304,402,459,435,571,611,214,214,43,43,358,2,2,2,2,358,2,2,2,2,2,2,358,358,358,2,2,358,358},
{768,224,219,425,467,147,151,643,316,263,263,263,263,263,2,2,2,2,2,272,139,2,2,2,2,2,2,2,2,2,272,53},
{555,543,434,78,850,174,277,194,4,100,471,69,69,424,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{690,206,572,877,600,129,288,52,19,147,222,222,147,147,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{793,279,264,566,252,495,872,492,482,107,294,503,350,350,2,2,2,2,2,2,2,285,285,273,273,273,273,2,2,2,2,2},
{703,427,225,320,136,47,103,547,239,217,73,68,68,204,204,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{791,275,60,137,352,839,67,476,356,216,216,563,563,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{703,312,472,588,228,512,386,668,477,617,389,389,389,2,296,2,2,2,2,343,343,2,2,343,343,2,2,617,617,617,617,2},
{709,509,697,145,252,194,304,192,192,623,623,4,423,2,2,2,199,423,2,2,2,222,222,2,2,623,623,623,623,623,2,222},
{587,453,117,107,672,86,248,568,568,294,294,513,78,2,2,164,82,2,2,2,2,22,2,2,2,2,2,2,2,2,2,2},
{741,466,378,135,737,131,159,469,59,2,59,59,187,2,204,2,2,2,2,2,2,2,2,2,798,2,2,798,798,798,798,798},
{539,310,463,103,553,45,609,326,197,2,62,113,272,2,62,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{750,703,182,242,92,335,272,466,594,2,701,569,474,129,140,140,2,507,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{547,210,113,361,584,121,65,307,98,2,2,552,514,514,2,514,207,514,514,514,2,2,2,2,2,2,2,2,2,2,2,2},
{555,229,328,91,272,815,483,749,468,2,92,92,4,92,2,2,2,258,258,258,2,258,258,2,2,2,2,258,2,2,258,258},
{580,145,358,434,630,73,604,366,366,2,2,398,398,207,2,207,487,2,2,487,207,2,2,207,207,207,2,2,2,2,207,207},
{457,520,93,460,275,525,300,184,354,147,147,147,147,179,82,82,82,82,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{872,630,513,218,719,174,197,104,86,281,281,281,541,642,281,94,2,45,94,2,335,335,2,2,2,2,2,2,2,2,2,84},
{765,421,129,298,867,365,222,476,401,142,90,22,22,88,226,657,2,2,477,2,2,2,2,2,226,226,2,226,2,2,2,226},
{833,634,228,520,113,329,279,420,581,2,2,385,385,110,450,2,733,2,2,2,561,561,2,561,2,2,2,2,2,2,2,2},
{587,553,360,539,227,800,312,143,536,2,2,2,64,64,64,2,2,2,179,179,493,2,2,184,184,184,58,2,2,2,493,493},
{744,466,389,280,229,134,363,177,389,2,2,2,536,273,536,536,536,536,168,45,45,45,45,2,2,2,2,2,2,2,2,2},
{841,222,158,469,253,91,347,241,766,2,2,2,88,88,88,439,439,439,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{462,653,478,67,269,150,474,711,220,669,669,669,669,669,390,352,325,2,229,545,545,545,545,545,545,545,545,2,545,352,309,352},
{468,430,849,689,202,427,45,34,105,2,2,2,2,4,4,4,4,4,4,4,2,2,2,4,4,4,4,4,2,2,2,2},
{610,289,503,744,775,512,605,454,484,2,2,2,444,466,145,631,2,631,631,631,631,631,631,631,631,631,2,2,631,631,631,858},
{792,169,306,843,246,123,293,229,483,2,2,2,165,163,163,163,163,440,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{563,325,717,766,440,705,290,123,228,2,2,2,32,64,146,2,2,2,116,79,79,2,146,146,79,79,79,2,2,146,146,79},
{795,185,350,211,82,537,106,680,62,2,2,537,423,423,423,2,2,501,501,2,501,2,501,2,2,2,2,2,2,2,2,2},
{633,425,295,548,497,163,381,461,89,2,2,831,583,896,38,2,625,2,2,2,276,276,2,2,276,2,2,2,2,2,2,2},
{767,318,84,97,208,387,423,196,417,2,396,396,396,396,396,128,128,2,2,2,328,328,4,4,4,4,101,2,2,328,82,16},
{802,533,869,638,67,192,805,223,219,2,2,191,178,178,77,77,2,2,2,2,431,431,2,2,2,431,431,2,2,431,2,2},
{781,638,410,399,336,465,856,426,28,2,4,4,6,6,2,2,2,449,372,372,449,449,449,2,2,449,449,449,449,449,449,2},
{807,377,237,443,388,286,158,349,491,32,32,260,260,260,2,2,260,615,615,615,2,2,260,260,260,260,260,615,615,615,615,615},
{780,359,766,618,41,596,86,636,287,707,707,96,49,373,613,373,2,2,2,2,2,2,2,613,613,613,2,2,2,2,2,2},
{788,497,334,93,319,169,273,540,904,2,903,569,569,569,272,272,2,2,2,2,571,571,571,571,571,571,571,571,571,571,571,571},
{622,309,913,550,994,90,257,588,29,526,526,526,496,496,576,2,2,2,2,2,182,182,182,2,2,447,447,447,447,447,447,182},
{814,652,456,774,624,870,27,739,464,2,108,578,578,561,295,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{818,280,99,873,165,426,341,74,479,342,727,684,684,662,662,2,2,2,2,2,2,662,2,2,2,2,2,2,2,2,2,2},
{593,411,953,203,89,57,785,354,349,424,424,707,707,707,829,2,2,2,2,2,670,670,670,2,2,424,424,424,2,2,670,424},
{629,560,621,245,683,633,495,551,472,2,31,74,489,684,555,684,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{901,490,693,410,666,119,703,593,201,61,70,70,774,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,418,418},
{669,321,391,548,189,157,337,42,796,871,276,622,30,2,2,2,2,2,2,2,580,580,107,2,2,2,2,2,434,434,434,434},
{610,236,633,300,681,358,72,281,148,466,466,283,275,2,386,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{929,360,102,893,329,136,515,33,170,581,268,35,777,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{859,584,475,745,506,900,40,869,143,612,175,275,209,12,12,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{822,581,76,382,72,347,964,324,137,61,61,28,623,351,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{655,330,324,151,166,431,58,174,142,115,1003,66,724,778,2,2,2,503,503,2,2,2,2,2,2,2,2,2,2,2,2,2},
{867,820,301,252,61,331,105,309,562,218,365,326,768,672,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{623,330,182,489,212,223,741,490,40,412,801,681,681,801,2,2,71,2,2,2,2,2,2,427,2,2,2,2,2,2,2,2},
{859,844,510,859,118,190,550,29,159,622,622,382,258,382,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{612,237,272,53,534,682,372,935,494,536,536,599,599,599,2,536,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{843,730,235,233,816,495,598,134,131,604,227,378,378,553,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{667,397,121,526,321,660,848,729,357,137,268,711,521,521,2,2,2,2,2,2,2,2,2,2,2,2,2,194,2,2,2,521},
{939,783,796,676,259,643,103,289,15,471,80,80,2,239,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,888},
{670,595,333,257,907,413,548,341,327,350,612,700,700,700,700,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{678,274,695,790,169,701,707,1084,470,123,846,846,217,121,317,2,2,2,83,83,83,83,83,83,83,83,83,2,2,2,2,2},
{877,181,375,79,199,256,223,295,135,371,395,354,2,307,944,2,813,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{882,417,475,424,311,646,346,207,74,157,590,356,2,2,324,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{708,442,186,698,345,103,687,463,163,416,416,107,2,2,2,375,375,416,6,2,2,2,2,2,2,2,2,2,2,2,2,2},
{865,675,786,568,112,197,225,348,372,497,215,215,2,2,2,2,159,159,150,224,224,141,2,2,2,2,141,141,141,141,141,141},
{844,244,672,489,839,263,14,233,422,392,8,392,2,2,2,2,2,2,815,815,815,815,257,257,105,105,2,2,2,815,815,815},
{693,726,117,167,535,725,224,78,716,100,460,299,2,2,2,2,921,744,2,2,2,2,2,378,2,2,178,178,178,2,178,178},
{898,559,396,742,51,143,411,221,116,756,756,756,2,2,2,701,701,2,2,2,2,240,225,256,322,322,240,240,240,240,240,322},
{697,540,358,391,932,309,103,73,35,353,353,503,2,2,353,134,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{982,579,548,413,416,103,71,101,1039,526,684,684,2,2,656,2,2,2,2,2,2,2,2,2,2,2,656,656,656,2,656,656},
{695,881,335,126,429,476,772,667,974,98,433,49,129,129,2,2,2,2,2,2,2,2,2,2,544,2,544,2,2,2,2,544},
{859,361,215,569,255,378,543,436,220,34,105,105,816,816,816,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{705,770,134,178,940,944,654,600,46,797,797,591,2,145,616,2,2,2,2,2,2,389,389,2,122,2,2,2,389,389,909,389},
{642,757,247,513,372,54,546,971,271,61,61,1018,2,143,332,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{988,271,675,163,379,108,48,472,870,485,485,18,2,485,528,528,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{865,827,614,74,725,685,724,190,178,272,835,722,2,35,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{923,397,722,186,203,575,24,144,36,526,206,787,12,100,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{718,359,103,558,684,560,67,35,120,342,680,265,265,265,2,2,265,2,2,2,2,2,2,2,2,2,430,2,2,2,2,2},
{927,493,988,194,97,1006,377,578,105,248,707,784,98,784,2,2,2,2,2,2,2,2,2,370,370,2,370,2,2,2,2,2},
{900,455,485,601,353,69,67,965,25,226,314,314,883,923,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{903,259,153,106,289,916,861,41,441,368,131,131,262,671,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{945,358,160,196,82,403,362,195,376,877,521,336,521,77,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{912,516,108,555,306,274,55,197,565,174,659,208,441,441,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{753,242,194,619,345,94,463,485,163,85,412,575,270,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{940,226,320,666,269,54,542,174,109,290,754,524,649,2,202,2,2,2,2,2,2,2,776,202,776,776,776,2,2,202,202,202},
{915,210,456,377,303,237,225,521,621,175,569,20,124,2,601,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{672,652,792,253,796,404,171,90,406,433,43,159,72,2,2,372,2,540,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{733,439,537,37,149,650,916,443,743,621,921,664,664,2,2,2,2,2,682,523,523,523,2,2,523,523,523,523,523,523,523,523},
{982,344,812,567,243,52,246,369,439,205,600,739,730,2,2,2,61,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{982,604,126,65,633,657,22,776,161,45,725,44,4,2,2,2,2,2,2,2,2,2,269,269,2,2,2,2,2,2,2,2},
{745,600,284,1117,459,1135,300,52,845,331,334,334,334,2,334,334,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{936,409,217,57,574,395,481,245,548,268,447,598,375,2,192,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{986,241,233,45,721,325,350,222,35,1065,1065,1065,1065,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{755,796,877,981,259,194,1180,215,90,658,662,662,662,2,36,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{981,626,987,827,466,458,578,346,475,223,223,223,342,1058,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,728},
{949,422,941,491,66,786,592,429,307,123,40,478,478,478,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{992,723,625,251,431,544,309,466,700,644,484,837,904,320,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1077,496,819,340,974,122,39,1209,819,18,461,648,648,394,2,2,2,2,2,2,61,2,2,2,2,2,394,2,2,2,2,394},
{999,674,212,673,279,579,462,754,89,866,345,110,110,887,2,2,2,2,2,707,707,2,2,2,2,2,2,2,2,2,2,707},
{1083,356,367,357,559,213,606,477,71,103,790,103,299,299,2,2,2,2,2,2,406,406,2,2,2,2,2,2,2,2,2,2},
{1005,260,389,960,501,714,118,73,334,1019,704,204,504,205,822,822,2,2,2,2,2,2,2,2,2,2,684,2,2,2,2,2},
{738,749,769,610,306,326,328,578,479,840,840,840,68,192,2,150,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1010,937,449,474,154,456,766,318,275,444,709,2,778,778,778,806,779,779,2,2,2,2,2,2,2,2,806,2,2,2,287,287},
{1011,780,134,945,183,42,741,25,252,164,205,222,222,222,147,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1118,427,294,404,268,217,922,515,19,1045,1045,2,833,291,448,2,2,2,2,2,2,2,2,2,175,2,2,2,2,2,2,2},
{1094,640,912,223,67,472,623,623,1244,65,1009,1209,1209,812,387,2,2,2,513,2,2,2,2,2,2,2,2,2,2,2,1209,234},
{722,375,264,390,515,498,1161,391,884,551,238,2,2,825,549,2,2,2,551,2,2,2,2,2,2,2,2,2,2,2,2,2},
{792,250,299,210,496,682,94,207,220,227,227,2,2,227,73,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1022,409,93,359,983,345,280,280,104,940,940,2,2,382,1039,2,2,2,2,831,2,2,2,2,2,2,2,2,2,2,2,2},
{1027,925,413,335,327,826,250,122,293,773,564,541,420,420,420,774,763,2,2,2,2,2,2,900,110,110,2,763,2,2,2,2},
{1028,730,807,119,209,146,230,498,164,309,309,2,2,2,693,912,430,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{997,525,680,120,466,728,288,110,1082,544,572,2,2,663,290,290,2,2,754,2,2,2,2,2,582,582,582,582,582,2,2,2},
{1055,395,795,561,222,85,294,433,377,89,89,2,2,2,456,821,2,2,821,2,2,2,2,2,2,2,2,2,2,2,2,2},
{997,614,240,638,755,575,874,321,600,235,665,2,2,2,154,154,767,767,2,767,2,2,2,2,2,2,2,2,2,2,2,2},
{802,298,672,424,104,623,152,159,476,760,66,2,2,2,215,215,490,490,490,2,2,2,2,2,490,490,490,490,490,490,490,490},
{1128,788,124,501,561,1015,419,787,48,620,705,2,2,2,2,88,18,2,215,215,215,2,2,215,215,2,2,2,215,2,2,2},
{807,433,721,434,449,242,170,842,21,4,642,2,2,2,2,2,4,4,4,4,2,856,856,856,885,885,856,856,856,856,856,885},
{755,612,235,265,369,855,414,362,478,518,518,2,2,64,16,8,32,4,16,8,8,1041,501,1041,2,2,64,16,8,8,16,270},
{1004,719,1041,460,551,516,135,417,130,698,698,2,2,2,655,655,655,655,655,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1017,568,930,1113,556,1299,114,881,690,475,641,2,2,2,779,779,103,2,528,2,2,2,2,2,2,528,528,2,2,910,910,2},
{814,473,286,752,476,779,420,569,742,164,490,2,2,2,793,812,812,812,2,812,812,2,2,526,526,812,526,2,2,2,526,526},
{818,301,273,664,206,971,895,590,912,523,523,2,2,452,384,255,2,130,130,130,130,865,2,2,2,255,2,2,2,2,2,2},
{820,249,292,1017,1017,143,403,37,433,456,515,2,2,69,640,2,2,2,2,2,2,2,2,2,2,2,2,824,824,824,2,2},
{1078,527,589,244,170,892,827,606,1165,773,189,2,2,240,22,2,2,2,2,2,2,759,621,621,621,621,621,621,621,621,621,621},
{865,1132,428,582,254,408,536,376,825,116,116,1266,1266,1266,705,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1062,268,389,1325,598,276,1270,48,572,439,302,2,544,609,544,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1065,517,247,1142,247,674,385,120,592,177,98,2,956,364,275,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{635,503,594,203,456,1246,221,396,1151,178,66,2,781,587,86,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1157,395,446,280,1130,695,668,271,111,882,477,615,615,615,2,2,2,2,2,2,2,2,615,615,615,615,615,615,615,2,305,2},
{830,397,932,519,818,113,367,694,88,535,535,414,343,175,2,2,2,2,2,2,2,2,2,2,414,864,2,2,864,864,864,864},
{793,463,329,730,390,551,968,92,511,470,424,563,672,563,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1050,749,809,479,87,757,288,172,597,722,4,418,418,390,2,2,2,2,2,390,390,2,2,2,2,2,2,2,2,2,2,2},
{1084,402,130,1077,276,154,1068,779,511,853,83,757,757,38,2,2,2,2,2,202,2,2,2,2,2,2,2,2,2,2,757,2},
{1090,255,271,110,159,235,158,236,271,815,1300,416,416,416,2,2,416,416,2,2,2,399,791,791,2,791,2,2,2,2,791,791},
{1058,417,271,172,312,363,184,191,28,183,759,214,759,39,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1057,385,263,395,901,274,727,340,1117,263,813,870,858,429,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1102,846,985,1085,764,124,764,51,874,612,478,801,478,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1120,665,311,695,319,1033,511,297,602,1030,1030,714,240,240,2,2,2,2,2,2,2,2,2,2,2,2,2,953,2,2,2,2},
{814,293,763,661,575,631,524,636,112,691,595,1103,405,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1106,662,258,190,1315,214,530,263,318,904,877,1317,318,2,510,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1206,469,299,1052,655,114,189,213,321,188,64,475,475,2,2,662,662,662,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1120,1159,358,347,838,207,357,167,476,52,672,38,822,2,2,2,2,2,2,213,2,2,2,2,2,2,2,2,2,2,2,2},
{1076,596,553,545,79,727,881,121,298,169,639,368,695,115,115,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1130,177,84,673,350,543,543,95,128,954,430,884,884,2,884,884,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1222,412,430,707,691,746,131,607,311,607,112,217,912,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{820,461,681,382,273,273,358,274,274,91,887,676,386,2,676,676,2,2,2,2,2,2,2,200,2,2,2,2,200,2,2,2},
{1096,1166,209,407,1127,400,974,322,428,906,631,134,171,2,2,2,2,664,664,664,2,2,2,2,2,2,2,2,2,2,2,2},
{1091,946,437,51,527,802,597,639,587,645,510,586,586,2,2,2,2,2,2,2,2,2,2,2,2,2,2,168,168,168,168,168},
{1148,585,868,1282,666,417,733,1231,515,332,1213,337,337,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1103,276,174,408,233,170,955,108,530,354,585,38,677,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,476},
{1167,478,1169,1053,563,371,108,772,413,497,1338,991,660,2,2,2,2,2,2,2,2,2,2,2,2,27,2,2,2,2,2,2},
{1108,437,1160,324,868,686,361,399,786,1161,1161,707,731,731,655,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1116,331,280,422,1109,341,570,243,849,241,566,61,608,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{898,782,478,1208,196,983,608,537,196,1141,141,296,715,715,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1099,1187,300,240,268,413,1366,634,184,768,773,365,783,224,783,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1158,945,300,1115,205,495,435,302,187,774,774,843,843,284,284,2,2,2,2,909,933,933,933,2,2,909,909,2,2,2,2,909},
{904,660,1283,46,33,124,416,218,152,970,1241,305,307,307,307,260,894,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1127,553,287,58,739,99,514,739,766,42,580,241,598,598,936,936,936,629,629,629,629,2,2,2,2,2,2,2,2,2,2,2},
{1142,370,287,925,307,1232,129,11,1284,1056,33,33,536,521,2,1286,2,2,2,2,2,2,2,2,2,2,2,2,847,847,847,847},
{1140,814,528,677,84,1192,305,637,335,451,103,325,77,969,2,651,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1297,600,419,985,846,493,186,109,147,239,197,762,762,327,327,1004,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1181,615,482,653,238,130,313,506,98,1314,730,730,730,730,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{921,613,628,1288,111,150,191,233,633,83,387,602,105,394,2,2,2,2,2,2,2,351,2,2,351,351,351,2,2,2,351,351},
{1192,555,586,516,1288,733,64,653,364,273,421,215,75,75,2,2,2,2,2,2,953,953,953,953,8,383,383,2,161,383,953,953},
{1160,617,505,1205,374,906,23,408,194,91,91,91,585,984,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1203,1101,497,352,254,309,464,123,607,1080,265,1145,1145,1145,284,284,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1210,656,1026,782,802,442,1319,734,794,165,165,796,93,796,2,829,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{963,646,721,1161,219,667,1088,485,692,692,663,535,553,662,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,686,686,2},
{966,590,140,297,189,844,633,12,847,742,742,244,281,34,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{941,231,1038,309,173,770,413,560,855,660,721,1103,721,721,721,2,2,2,2,2,2,2,2,2,2,2,2,174,2,2,2,2},
{1213,305,656,983,1399,1196,692,986,9,339,754,308,2,308,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{972,768,1109,523,642,546,1452,29,1296,13,813,813,2,1496,2,2,2,2,2,2,2,165,165,165,165,165,165,2,2,2,2,544},
{1330,671,528,831,1426,735,33,425,364,119,363,978,2,761,483,476,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1188,217,838,237,379,202,785,949,479,169,348,872,2,872,872,2,2,2,2,2,2,1028,2,2,2,2,2,2,2,2,2,2},
{1190,286,513,881,390,215,387,130,749,554,1110,519,160,160,160,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1247,353,973,217,1044,1318,1115,319,203,390,1244,225,2,2,508,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{893,560,132,1420,721,191,568,799,412,22,322,93,2,4,4,4,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{987,774,678,175,145,264,588,97,1308,6,828,1129,2,2,2,45,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{955,980,753,96,574,259,1327,556,342,1415,1036,1036,478,478,478,478,507,2,2,2,2,151,2,2,317,2,2,2,2,2,595,595},
{882,1038,211,110,942,337,1305,1225,661,183,381,381,2,2,2,2,347,2,2,2,2,2,2,2,600,431,431,431,431,431,431,431},
{1208,486,343,725,677,1204,135,139,924,170,1111,317,2,2,2,2,202,706,202,107,107,107,2,2,706,706,107,107,2,2,2,706},
{1259,1017,456,298,443,838,137,744,551,334,36,951,2,2,2,699,718,2,2,984,2,2,2,2,2,2,984,984,2,2,2,2},
{1212,1186,641,284,565,636,895,82,690,117,184,184,2,2,2,397,902,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1263,370,132,635,381,47,537,179,1192,301,1282,33,2,2,2,1553,2,2,2,2,2,2,2,2,2,2,2,307,307,2,2,2},
{1223,433,252,572,424,82,221,107,382,430,203,461,2,915,362,964,2,2,964,2,2,2,2,2,964,964,964,964,964,485,485,485},
{1015,593,112,1408,51,104,199,221,931,1010,928,928,2,2,878,878,2,2,2,2,731,731,2,731,731,2,731,2,731,731,731,2},
{1220,410,1193,352,260,434,469,41,1090,961,961,728,2,2,330,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{898,1043,391,1289,29,830,184,321,1136,85,1133,1082,864,864,2,2,2,2,2,2,2,2,789,789,2,789,789,2,2,789,789,2},
{1223,434,851,152,140,1495,190,397,925,37,1080,430,2,2,204,2,759,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{989,1043,184,232,64,403,284,745,171,171,995,223,380,380,1400,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{939,1070,1288,254,973,901,321,109,568,713,336,988,2,946,262,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1276,636,569,258,325,675,342,85,88,579,833,833,833,833,520,2,2,2,2,520,520,2,2,2,2,2,2,2,2,2,2,2},
{982,508,815,214,206,602,448,685,446,572,1549,8,1047,1047,1047,2,2,2,2,2,2,2,363,502,2,2,71,363,2,2,363,363},
{1288,1398,789,514,151,600,1618,1194,1419,441,234,204,1191,438,828,2,857,857,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1002,342,1045,757,1008,979,322,240,1211,171,552,123,2,129,129,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1401,402,525,293,97,223,452,808,61,169,1023,1023,886,886,1023,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1001,644,263,164,136,939,624,95,489,1023,1107,331,331,10,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1011,475,845,532,567,951,663,295,877,1275,227,39,618,683,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1401,741,509,797,47,157,1256,482,1513,899,736,780,780,210,2,2,2,2,783,783,2,2,2,2,2,2,2,2,2,2,2,2},
{1047,880,369,402,641,446,639,586,277,396,419,275,825,820,2,2,2,238,238,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1273,701,831,1294,1580,137,162,415,563,11,92,116,116,116,2,2,2,2,2,2,1029,1029,1029,504,504,877,877,877,877,877,1029,1029},
{1335,400,315,412,172,125,568,1024,58,601,398,985,640,577,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1453,947,486,485,453,415,1164,684,504,605,422,998,727,727,2,2,2,1136,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1057,1198,146,529,284,1286,160,135,75,686,648,1425,821,586,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1052,442,936,64,132,1378,1323,161,161,161,230,131,12,12,2,2,2,2,2,2,2,2,2,2,2,998,998,998,998,2,2,2},
{1422,838,234,554,736,243,344,526,1108,33,1303,699,249,305,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1279,681,423,813,806,269,412,420,985,485,761,1013,649,796,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{938,614,523,557,898,624,178,461,287,985,371,371,260,613,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1335,834,652,528,536,523,497,60,173,777,238,59,4,59,4,8,2,2,2,559,559,559,559,559,559,559,2,2,559,559,559,2},
{1040,998,324,93,887,497,1326,443,152,1193,595,80,80,80,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1302,1116,283,1006,891,838,768,373,468,968,1178,1178,1269,1269,876,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1027,1128,114,395,357,417,848,22,389,1257,734,838,838,301,900,2,90,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1072,724,717,877,873,369,1031,698,917,1641,1641,1641,53,549,549,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{987,1243,424,240,53,1150,558,292,1107,574,814,1474,1474,1068,1186,2,2,2,2,2,2,2,2,2,2,2,2,2,2,859,2,2},
{1040,420,960,882,64,661,292,146,976,427,689,248,248,248,638,2,2,2,2,2,2,2,2,2,2,2,2,861,861,861,2,861},
{1040,522,666,398,78,208,293,818,134,867,147,147,482,2,4,629,629,629,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{987,1280,1245,1300,926,676,56,546,541,690,84,42,1000,1383,1383,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1324,588,1378,592,1445,1029,759,1296,739,931,363,704,312,704,704,704,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1058,454,1557,191,129,297,695,1390,1274,460,923,923,923,2,4,1059,2,2,2,2,2,2,2,2,2,2,2,2,2,1059,2,2},
{1327,572,282,1022,907,1276,409,643,1050,633,187,187,187,2,228,45,2,2,2,2,2,2,320,2,2,2,2,2,2,2,2,2},
{1395,958,237,101,559,891,560,47,524,747,197,589,589,917,887,887,887,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1395,529,461,402,194,392,122,781,111,162,780,593,593,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1378,541,848,848,347,856,102,104,183,156,395,130,1377,2,2,2,159,159,159,2,2,2,772,2,2,2,2,2,2,2,2,2},
{1062,212,784,63,252,873,1302,1108,1380,84,1375,1375,1375,2,2,2,375,374,2,980,2,2,2,980,980,980,2,2,2,2,2,2},
{1384,549,430,781,946,879,901,924,741,114,14,451,36,2,2,2,2,287,287,287,803,803,803,803,2,2,2,803,803,803,803,803},
{1413,627,1329,1092,526,197,31,417,1149,981,964,1003,685,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,717,717,2,2},
{1084,1174,1601,949,910,960,500,461,1290,23,1042,636,212,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1420,531,626,738,376,537,814,206,990,235,847,812,201,201,201,201,726,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1420,624,363,537,1436,278,292,377,263,820,376,382,382,2,654,655,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1091,793,1353,208,506,599,846,503,1011,247,289,61,1050,61,61,61,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1533,978,284,156,914,162,685,1184,252,1375,189,256,640,2,640,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1531,692,414,277,541,1371,1447,682,536,109,432,1240,1240,2,1022,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1128,398,791,1170,76,661,408,259,756,495,79,553,10,10,1532,1532,1532,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1040,704,618,854,374,1470,274,383,941,519,351,351,351,351,351,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1427,988,498,1529,99,678,1323,149,33,426,543,543,335,1507,772,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1102,349,490,266,144,220,599,437,743,764,647,1128,605,265,324,324,324,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1118,496,645,592,354,1133,935,428,72,532,182,182,1370,660,123,2,294,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1102,1042,315,745,1006,771,630,68,587,1187,295,295,295,408,408,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1118,724,1322,405,199,614,1087,885,1313,317,769,660,660,1158,535,2,2,2,373,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1120,772,743,488,346,126,784,584,943,153,311,133,133,969,605,605,2,2,2,2,2,2,2,605,2,2,2,2,2,2,2,2},
{1404,284,176,590,1128,1371,322,543,1136,546,1315,174,174,777,777,891,2,2,2,2,2,2,2,579,579,579,579,2,2,2,2,2},
{1441,791,233,141,141,316,89,296,462,1263,758,482,599,599,578,341,2,2,2,2,2,2,2,2,2,2,2,525,525,525,2,2},
{1413,406,700,547,1166,250,518,543,104,331,205,205,691,691,2,2,118,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1485,400,1497,168,82,680,1103,554,249,702,493,101,296,236,2,236,236,944,944,2,2,394,2,2,2,2,2,2,2,2,2,2},
{1127,869,558,533,1215,194,1762,784,593,777,1153,1079,1079,1079,2,2,2,330,1045,2,1045,1045,2,2,2,2,2,2,2,2,2,787},
{1459,1243,467,533,266,1364,1031,890,1402,486,1678,1678,93,978,2,2,2,978,947,947,2,978,2,2,2,2,2,2,2,2,2,2},
{1139,809,117,522,955,1096,1120,1470,116,184,1565,1565,557,557,2,2,2,2,2,829,1326,2,2,2,2,2,2,2,2,2,2,2},
{1142,984,1044,590,340,241,662,357,366,1305,2,125,631,474,2,2,2,980,2,2,2,2,2,2,2,2,2,2,2,2,2,1273},
{1469,1247,1277,616,209,486,106,552,219,217,471,272,272,1201,2,2,503,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1148,542,1478,496,950,464,1011,235,136,180,2,416,758,453,2,909,2,2,2,2,2,2,2,2,2,2,1019,1019,2,2,2,2},
{1495,1178,874,415,1100,368,1057,1228,562,215,31,31,680,680,680,1208,2,2,2,2,2,2,2,2,1208,2,2,2,2,1208,1208,2},
{1497,1166,1613,1403,107,803,993,539,1436,1289,2,240,334,634,532,1147,2,2,2,2,2,2,2,117,2,2,2,2,2,2,2,117},
{1617,289,1033,169,355,260,30,45,721,906,88,44,44,418,417,218,2,2,846,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1628,721,400,239,728,1336,984,425,65,120,1232,463,463,640,349,616,616,2,2,2,2,2,2,2,2,147,147,2,2,2,2,2},
{1628,286,541,530,1610,201,1220,1592,272,181,2,38,263,1586,1157,1157,1157,2,2,2,1157,1157,2,2,2,1157,2,2,2,2,1157,1157},
{1531,621,210,755,482,82,1308,317,427,168,2,232,116,190,701,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,701},
{1532,575,1245,360,249,630,133,1406,920,1539,63,63,76,82,82,2,2,2,770,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1102,785,118,93,1491,988,275,53,1328,26,2,2,240,647,240,761,761,761,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1478,722,113,1534,1751,115,1728,1234,777,282,508,508,1184,63,1184,855,855,2,2,2,738,738,578,578,2,2,2,2,2,2,2,2},
{1480,536,1421,164,429,84,970,1673,548,497,2,2,530,156,156,128,245,2,2,2,2,260,2,2,2,2,2,2,2,2,2,2},
{1533,1302,1286,538,619,526,1669,145,1034,125,2,1038,1038,388,388,387,729,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1482,961,1093,556,1746,628,427,689,510,751,684,37,37,1229,1256,882,1507,1507,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1472,852,533,433,924,57,53,1036,410,675,1212,1212,1212,600,600,1212,1259,1245,1245,1245,1245,2,2,2,2,2,2,2,2,2,2,2},
{1228,425,1030,699,407,171,568,925,1104,97,2,2,1286,1286,1286,502,2,1219,1219,1219,1290,2,1219,1219,1219,1219,2,2,2,59,2,2},
{1547,657,777,695,1254,224,933,367,212,385,2,2,2,1422,749,245,885,710,2,2,710,710,710,45,710,710,710,710,2,336,710,2},
{1678,466,549,145,351,816,1041,334,192,192,2,2,348,1017,130,4,4,180,180,180,180,512,2,2,2,512,512,512,512,512,128,8},
{1550,569,481,1041,1680,1114,1265,160,386,194,2,2,2,533,929,531,422,531,1355,1355,1355,1355,531,216,216,2,2,2,2,2,2,2},
{1559,462,850,289,1570,71,512,858,810,835,2,2,2,2,1028,1205,1205,546,546,546,1205,1205,1205,1205,1205,2,1205,1205,1205,1205,1205,1205},
{1192,888,701,164,131,613,282,237,525,366,2,2,2,2,1737,845,845,750,2,1062,1062,1062,1062,1062,1062,1062,1062,1062,1062,2,1261,1261},
{1208,426,412,1072,274,248,1544,627,9,458,2,2,2,2,2,2,270,270,270,150,715,282,150,150,150,150,150,150,150,150,150,150},
{1128,393,1522,96,160,581,540,120,441,176,2,2,2,2,2,2,1427,551,1102,1102,328,328,592,592,592,592,592,592,592,592,592,592},
{1202,538,171,1177,1090,690,1566,746,1012,1012,2,2,2,2,313,781,808,313,1125,1117,930,1117,1117,1117,1117,1117,1117,1117,1117,2,2,2},
{1567,1265,372,1633,613,484,243,1523,21,275,2,2,2,431,431,431,431,2,2,978,489,889,889,889,889,889,889,889,2,2,2,2},
{1566,982,815,133,891,412,1179,831,651,268,2,2,2,367,366,367,367,63,63,767,2,2,2,2,2,2,2,2,2,2,2,2},
{1522,1422,1017,124,499,451,731,1112,1355,1355,2,2,2,854,854,336,854,336,1297,2,2,2,193,193,193,193,193,2,2,2,2,2},
{1160,1331,917,1696,401,547,122,592,863,863,2,2,703,703,703,703,495,495,495,2,2,495,495,495,495,495,269,2,2,2,269,269},
{1538,814,1027,677,524,226,756,202,242,102,2,2,912,564,1289,682,2,1125,1125,1125,1125,2,1289,1289,1289,1125,1125,1125,2,1289,1289,1289},
{1598,397,1471,1471,1162,866,236,948,1557,737,2,2,153,737,1408,765,765,608,2,2,2,171,608,608,608,608,2,608,608,2,2,2},
{1598,434,107,270,148,1317,835,123,642,1236,2,2,67,633,771,878,771,878,878,2,2,2,771,2,2,2,2,2,2,2,2,2},
{1628,1502,1042,822,80,403,1335,684,464,426,671,671,336,336,336,2,425,896,2,2,2,2,1337,1337,1337,1337,1337,1337,2,2,2,2},
{1630,715,1368,1273,993,293,385,545,1267,896,1038,1038,270,1325,1325,2,2,961,961,961,961,961,961,2,2,961,961,2,2,961,2,961},
{1612,723,409,641,796,1087,1228,1398,623,262,740,740,870,870,397,2,2,893,893,2,2,1367,328,2,328,2,2,2,2,2,2,2},
{1614,588,652,105,441,844,734,912,532,878,1073,1073,62,1415,693,1431,1431,1431,1431,925,925,925,925,925,925,925,2,2,2,2,2,2},
{1607,1503,1072,471,221,277,854,1236,263,752,2,694,1657,934,553,2,2,2,498,498,2,802,2,46,2,2,2,2,2,2,2,2},
{1172,987,140,1964,584,600,852,1725,456,1199,718,718,791,981,791,2,2,2,2,2,1260,2,2,2,2,2,718,2,2,718,2,718},
{1746,771,620,415,1057,437,613,1034,1662,837,2,1149,1466,1149,1149,1149,1466,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1263,835,1533,789,1259,174,1497,557,644,203,2,289,604,434,434,434,2,844,844,2,2,2,1111,1111,1111,2,2,2,2,2,2,2},
{1272,884,388,1889,956,159,1172,595,219,645,2,629,107,107,1279,75,2,2,2,211,2,2,2,2,2,2,2,2,2,2,2,2},
{1797,904,172,659,349,177,692,448,1141,990,640,99,1073,806,640,640,2,640,640,911,911,911,640,640,640,640,2,2,2,2,2,2},
{1276,442,1008,1352,243,162,711,301,552,1002,668,668,384,71,384,384,2,2,2,2,2,727,727,727,777,777,777,777,777,777,2,777},
{1600,1130,171,1113,813,722,117,990,37,24,969,94,825,1398,1398,1398,1398,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1198,496,714,609,644,1159,873,249,186,1539,136,239,379,1994,2,68,68,68,68,68,2,2,192,2,969,2,2,969,2,2,969,969},
{1678,1316,460,1133,1003,150,1236,1316,1417,218,1763,1763,77,77,2,1491,771,771,771,771,771,2,771,2,2,2,2,2,2,2,2,2},
{1682,449,1067,393,136,854,36,492,637,1053,247,1111,1111,1111,2,247,247,247,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1288,1690,702,760,420,333,1213,1911,805,351,67,67,1568,1568,2,2,604,142,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1288,1858,152,894,346,104,997,203,249,1006,1278,1489,1489,555,2,2,2,1074,1074,518,2,2,518,2,2,518,2,2,2,2,2,2},
{1601,697,532,408,697,1140,1568,47,1499,780,1171,318,318,318,2,2,2,2,318,318,2,2,2,2,2,2,2,2,2,2,2,2},
{1283,1078,791,873,655,412,389,835,292,958,1245,678,1611,1519,2,2,185,2,2,2,2,2,2,1245,1245,2,2,2,2,2,2,1245},
{1685,1610,1447,1093,1255,937,703,431,522,1384,988,988,253,988,2,1892,1892,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1822,589,236,205,797,39,241,1048,181,386,102,102,102,111,1361,1361,1361,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1233,843,813,157,396,669,1531,439,640,733,996,996,996,1566,951,608,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1342,705,302,595,1200,52,83,647,519,139,103,103,103,513,2,513,2,2,2,2,2,513,2,2,2,2,2,2,2,2,2,2},
{1630,1244,142,767,1299,719,629,1716,419,837,1145,1136,1148,1405,1405,1405,2,2,2,2,2,309,309,309,309,309,2,2,2,2,2,2},
{1636,974,279,419,893,1608,1491,156,1486,115,730,730,863,509,924,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1318,1234,213,1089,1567,602,1330,404,467,718,249,215,354,177,59,332,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1732,1771,584,533,297,1056,669,293,146,311,1176,311,590,590,277,2,2,2,2,2,2,2,2,2,539,539,2,2,2,2,2,2},
{1026,512,1196,394,1259,1313,762,549,311,1576,1576,465,465,140,465,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1360,383,1470,502,1010,153,1588,619,1246,396,1107,1107,112,423,423,2,2,2,2,2,202,2,2,2,2,2,2,2,2,2,2,2},
{1320,1636,858,1210,509,194,1575,154,1424,455,1860,832,1075,581,262,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1670,1350,689,1074,437,956,587,642,1154,439,196,1108,1108,1108,990,2,2,2,2,2,1112,2,2,2,2,2,2,2,2,2,2,2},
{1873,890,920,874,591,651,768,478,331,76,760,760,760,760,67,2,2,2,2,1241,1241,1241,1241,2,2,2,2,2,2,2,1241,1241},
{1682,867,333,102,628,891,654,506,995,684,961,563,1313,1313,1313,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1672,1248,429,813,262,92,809,1248,560,1365,1392,753,753,1259,1261,2,2,2,2,2,2,2,2,177,177,2,2,2,2,2,2,2},
{1391,1598,1112,590,797,584,1354,47,1473,1291,1874,48,491,463,990,463,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1875,1576,924,677,461,134,1525,1619,44,701,299,743,728,791,791,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,791,791},
{1267,904,1187,1595,765,1451,494,1573,950,909,87,1265,757,1371,1005,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1360,1091,1478,1237,97,578,1616,494,1422,223,865,1092,359,2,1080,4,2,2,2,688,1965,2,1965,2,2,2,2,2,2,2,2,2},
{1750,386,393,840,723,791,1707,1319,1525,83,1302,571,280,2,280,73,2,2,2,1207,2,2,2,2,2,2,2,2,2,2,2,2},
{1763,1018,1859,432,717,723,874,1294,1050,1800,1237,619,1074,2,10,1237,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1376,652,461,225,361,936,1073,1279,149,619,983,511,1994,2,2,1076,1076,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1947,393,495,946,1375,391,2128,582,1143,695,1872,760,760,2,2,1456,974,974,435,974,974,435,974,2,974,974,2,2,2,2,2,2},
{1768,1463,531,1008,95,1677,362,1105,985,177,1682,1682,244,2,2,1234,1041,1041,1041,2,2,2,1041,1041,2,2,2,2,2,2,1894,2},
{1780,1739,1357,1684,1586,736,208,966,1691,339,339,128,128,2,2,128,128,128,2,2,128,2,2,2,2,1929,2,2,338,2,2,338},
{1387,1459,358,1409,1919,917,777,223,313,1847,1012,1024,1024,2,2,2,2,1420,1420,1428,1420,2,1420,1420,2,2,2,1420,1117,1117,1117,1117},
{1289,907,228,665,1695,1735,489,214,762,1777,321,1674,932,2,2,2,2,1358,709,2,1959,1959,372,2,2,372,372,2,2,372,372,372},
{1378,680,1117,1367,759,62,319,563,505,1138,1093,345,693,2,2,2,780,780,2,2,2,729,729,729,2,2,2,2,2,2,729,729},
{1802,1645,453,1079,604,618,334,855,541,167,37,88,849,2,2,518,518,2,2,530,2,2,2,2,2,2,2,119,119,2,2,2},
{1275,1612,143,1586,502,987,555,436,2236,1826,494,494,358,2,2,213,2,2,2,2,2,2,1585,1585,1585,1585,1585,1585,1585,1585,1585,1585},
{1322,512,560,432,365,87,1835,1137,515,1271,1739,309,309,1229,1229,1229,2,2,2,2,2,2,2,2,416,416,416,416,2,2,2,2},
{1758,835,287,888,391,875,1834,516,1432,1171,98,408,302,976,976,1963,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1444,394,1613,796,645,1406,186,158,402,1364,314,588,606,2,577,117,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1337,1391,137,371,165,87,1026,20,419,99,572,572,918,854,918,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1323,589,526,1555,1636,1172,86,42,1545,57,627,1769,1769,2,867,343,2,2,2,2,2,2,2,724,2,2,2,2,724,724,2,2},
{1323,1647,384,301,270,549,1098,1144,1066,55,88,1805,683,2,945,120,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1327,1075,539,1017,926,350,1102,236,494,1268,286,286,1293,267,227,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1472,661,1538,487,94,2209,563,138,881,1735,718,203,1382,1473,1473,1473,1473,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1413,766,349,1471,45,625,733,1082,170,58,1268,207,1081,1081,1081,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1861,1487,419,97,799,1791,458,1029,370,627,57,414,414,1540,247,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1881,716,268,387,2138,1212,999,408,1363,434,1429,1429,1648,1648,1007,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1480,1131,1089,1688,340,962,505,1816,139,44,1350,403,1385,1996,173,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1868,650,1146,1690,948,43,497,692,1628,1302,1302,108,462,731,731,2,2,2,2,2,2,2,185,185,185,2,2,2,2,2,2,2},
{2023,1204,531,733,1054,618,668,363,783,218,1302,2055,559,2055,2055,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1328,601,601,617,554,467,391,1545,162,1361,807,1565,1565,243,1344,2,725,510,510,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1808,1525,1129,652,1195,329,1410,558,1322,911,161,536,737,94,306,2,2,2,2,2,2,2,2,2,541,541,541,2,2,2,2,2},
{1911,1338,639,1106,854,128,19,1353,847,253,618,517,2054,2054,93,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1825,850,180,1483,864,953,50,81,106,432,1372,1372,1212,10,10,10,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1892,441,977,228,1252,604,735,136,889,878,1319,1319,2127,2127,1963,367,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1820,1553,536,1351,425,1268,227,1742,429,348,1397,552,1151,1151,2,180,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1453,1044,556,833,305,1493,989,1158,726,1790,532,1229,1229,1229,2,2,2,2,2,2,2,2,2,2,259,2,2,2,2,2,420,2},
{2059,592,492,973,137,1331,392,334,635,1480,2254,1796,1796,284,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1460,986,709,268,755,824,83,893,115,656,2071,1323,1001,144,2,2,2,2,2,2,2,2,1527,1527,1527,1527,1527,1527,1527,2,801,801},
{1850,1476,792,840,2037,229,1578,526,431,1485,1450,1001,1001,1001,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1922,1383,813,346,1247,666,1931,1111,2042,79,682,501,1349,1930,2,2,681,681,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1922,542,1739,625,88,1376,259,49,338,318,505,788,1314,657,2,2,2,1314,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1948,1530,576,582,1069,119,2131,41,1178,1677,1677,1677,325,346,2,2,2,2,2,2,1401,2,33,2,2,2,2,2,2,71,71,71},
{1928,1111,168,1252,1467,1083,1927,603,1278,714,1027,50,751,1970,2,2,2,2,621,2,100,2,2,10,10,2,2,2,2,793,793,793},
{1394,896,674,2350,1375,1599,1858,135,762,722,628,685,705,28,2,2,2,2,2,2,2,2,2,2,2,855,2,2,2,2,2,2},
{1540,791,518,419,1130,1068,299,1386,1378,134,859,859,71,162,2,71,71,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2107,709,828,154,542,184,1094,1665,307,1549,177,2007,85,773,2,2,2,2,2,2,2,2,2,2,2,697,2,2,2,2,697,2},
{1977,1218,244,365,576,666,761,238,629,913,1907,986,1351,986,704,1257,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1496,1912,1291,1053,510,2322,1048,1530,2223,673,894,594,628,332,2,2,2,2,2,295,295,295,2,2,2,2,2,2,2,2,2,2},
{1520,1107,1082,687,484,1732,676,1595,467,653,1091,428,2113,332,332,332,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1905,612,920,848,562,2032,230,1305,1073,851,731,798,798,357,516,2,2,2,2,2,2,2,2,1465,1465,373,2,2,2,2,2,2},
{1428,1062,1016,75,297,1130,533,768,464,753,48,1510,1510,418,375,1626,2,221,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1396,729,1710,337,371,489,1341,2117,132,1870,853,853,408,1079,328,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1978,1051,977,588,1423,1001,508,409,825,497,659,1063,384,463,463,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1534,854,2007,1207,947,1773,1571,1505,909,1471,1655,1655,2334,1327,409,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2157,2106,679,238,378,49,1101,588,811,1313,1556,2301,475,812,812,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2187,1515,549,1416,1073,1613,47,1046,390,252,1214,1404,1404,933,1013,2,2,2,1025,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2145,1069,662,709,737,1141,1737,827,1384,1628,107,107,1032,277,277,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2173,1379,155,393,1578,610,1911,899,697,58,185,597,597,1249,1369,2,2,2,2,1369,2,2,2,2,2,2,2,2,2,2,2,2},
{1413,1589,1603,2268,520,333,1416,859,1619,867,1154,512,1291,413,413,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1600,1823,1698,1268,623,583,1932,1674,522,529,1862,1281,246,989,246,2,246,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1559,992,174,1313,612,1487,1487,461,702,37,1660,839,2,95,1628,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2066,1719,710,1294,2041,377,1005,690,132,756,1618,187,187,726,187,615,615,2,2,2,2,851,2,2,2,2,2,2,2,2,2,744},
{2192,1029,310,1609,592,1542,265,117,2006,82,162,205,2,2009,2009,1201,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1570,1504,1414,1143,1999,1932,1015,1015,556,514,626,79,2,79,1795,1461,1461,2,2,2,2,2,2,2,1461,1461,1461,1461,1461,2,2,2},
{1562,937,1964,934,1349,378,459,109,1676,1655,1339,1809,2,768,768,188,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1965,949,1057,1043,2256,1571,970,348,69,1324,1174,485,105,105,105,2172,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2044,1869,838,1424,1097,155,1142,230,1335,420,235,1510,2,431,425,622,2,2,2,2,2,625,2,2,2,625,625,2,2,2,2,2},
{1976,1433,820,504,421,1007,388,1083,635,82,1524,750,2,2,870,106,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1990,1948,1138,1787,253,115,312,1912,341,1624,260,1783,1315,1315,790,790,790,790,790,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1993,585,327,1393,1013,1671,1758,1436,1989,1217,1109,1476,2,2,1042,756,1042,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2056,1062,1605,1943,680,445,113,857,650,1388,2016,1231,2,2,1292,1292,1292,2,1039,1039,1039,1039,1039,2,2,2,2,2,2,2,2,2},
{2008,1773,416,1954,1314,742,1694,505,202,1747,785,375,2,2,2,477,1538,477,2,2,2,2,2,1309,1309,1309,1309,2,2,2,1309,2},
{1658,1008,258,749,427,1071,2052,263,1047,2152,1602,1602,2,2,2,1311,669,669,2,1897,1897,1897,669,669,669,669,669,669,669,669,669,669},
{2258,1887,1875,1021,863,604,543,1115,509,1243,312,213,2,2,2,2,335,770,770,2,1143,567,2,2,567,567,567,411,2,2,2,411},
{2266,1872,991,1468,1168,939,907,833,624,701,386,1713,2,2,2,2,2,931,861,381,1299,2,861,2,2,2,861,861,861,861,861,2},
{2273,1510,803,2278,842,1245,1389,230,822,1564,113,1276,2,2,2,2,1350,273,273,2,2,2,2,2,1281,1281,1281,2,2,1281,1281,1281},
{2278,1028,548,373,190,1443,614,2386,1940,930,557,2069,2,2,2,558,112,103,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2108,776,1568,342,2215,1882,681,1292,1601,586,1481,618,1930,1930,1930,1930,2146,89,89,2,2,2,2,2,2,2,1171,2,2,2,2,2},
{2139,2177,1652,392,715,605,778,632,472,1619,64,64,2,2,2,1747,859,2,2,2,2,2,216,216,216,216,1747,1747,1747,1747,1747,1747},
{1492,448,271,135,1288,417,130,83,235,2313,482,746,2,2,746,609,611,611,611,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1628,846,1504,138,464,401,501,506,967,1027,1540,1035,2,1921,1539,1539,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1630,1677,1624,301,1038,909,887,374,411,143,1021,174,2,1393,19,634,2,2,2,2,2,2,2,873,2,2,873,873,2,2,2,2},
{1654,1131,2054,994,2170,548,801,252,87,219,488,2239,2,1232,1839,1822,2,2,2,968,2,2,2,2,2,2,2,2,2,2,2,2},
{2065,1520,1423,1797,899,1425,1801,776,2365,58,646,695,2,998,998,1342,2,2,2,2,2,2,2,2,2,2,2,2,1150,1150,2,2},
{2304,1948,316,1063,237,607,1143,2575,1388,1022,127,251,2,438,1570,1570,1570,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2177,710,1912,617,809,1078,199,905,673,519,457,52,2,1348,1348,410,2,2,2,2,2,340,2,2,2,2,2,2,2,2,2,2},
{2073,1543,1586,1296,2466,753,455,46,119,1694,2035,1592,206,206,206,2,2,2,2,2,2,2,2,1172,2,2,2,2,2,2,2,2},
{2075,1056,874,2101,566,1790,1333,386,538,1560,2254,331,717,717,717,454,454,2,2,2,2,2,2,2,2,2,2,2,454,454,2,2},
{1670,977,1540,553,855,1729,239,757,191,62,732,549,1092,1092,199,199,199,199,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2096,1155,2257,125,1986,245,1208,2146,2287,680,1413,73,467,1410,1410,2,2,2,2,2,133,133,133,2,2,2,2,2,2,2,2,2},
{1538,1026,2157,1457,1784,2559,184,29,614,273,697,697,1922,697,697,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2106,856,1025,382,389,272,425,672,1021,216,601,292,510,510,876,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1662,608,2478,266,1330,505,40,2058,964,724,596,1221,1221,310,42,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1600,1338,196,1510,1371,1138,957,169,545,1176,1131,2460,1708,541,541,2,363,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1682,1008,737,444,822,999,2066,283,646,1860,1008,778,1178,1178,458,1743,2,2,2,2,2,2,2,2,2,2,2,2,2,1743,1743,1743},
{2132,756,1097,166,202,411,640,717,514,1389,633,633,633,633,633,633,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2386,748,620,478,647,898,320,53,1115,190,60,1860,1860,802,802,2,2,2,2,1264,1346,1346,2,2,2,2,2,2,2,2,2,2},
{2125,996,1081,124,1140,628,1668,1913,151,2495,523,430,260,708,2190,2190,2190,2,2,2,2,2,1660,2,2,497,497,497,497,497,497,2},
{1602,1489,895,383,56,698,2081,1728,794,789,16,16,797,302,52,2,2,2,2,2,2,2,2,2,2,797,797,797,797,797,797,1808},
{2210,606,901,547,131,1924,1852,1271,194,766,390,390,520,795,1429,1429,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1731,599,817,724,718,1038,1082,2503,1341,936,421,1802,1304,1304,1491,186,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1614,1058,847,689,749,1028,1047,1474,117,1369,1442,1442,1540,700,104,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1733,679,2041,2420,326,934,1172,1431,193,370,1073,1073,1073,260,2,2,2,2,2,2,2,2,2,2,2,2,1193,2,2,2,2,2},
{2168,1532,769,2570,1303,357,1793,1633,1226,1025,205,1218,1984,764,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2234,1706,356,581,532,933,1704,387,1345,1345,34,135,350,307,614,614,307,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1656,2093,354,310,306,1553,106,459,175,55,1482,958,254,254,2,356,356,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1654,1035,330,533,1446,953,499,142,1527,1748,265,1437,265,510,2,2,2,2,2,2,2,1835,1835,1835,1835,2,2,2,2,2,2,2},
{1600,479,1457,246,2025,618,1612,2139,169,1492,1097,1327,2007,2007,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1744,447,845,2145,748,1555,1193,1312,916,1770,1294,546,794,323,2,2,2,2,2,1733,1733,2,2,1730,2,1733,1733,2,2,1733,551,551},
{1766,1558,1901,1393,987,1859,815,1165,50,2065,88,88,1453,1453,2,2,2,995,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1615,1267,1242,1494,399,663,68,1209,1573,528,640,1200,248,640,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1678,592,1351,509,312,721,163,1597,1262,199,2643,1330,1661,992,2,2,719,2,2,2,2,2,2,2,2,2,2,2,2,2,1704,2},
{2207,970,838,2043,1016,561,267,329,584,608,679,303,832,1613,959,959,959,1409,1409,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2217,352,447,914,1200,561,614,1616,509,2292,1114,1114,1229,52,1053,1053,1053,2,2,2,2,2,2,2,2,2,2,2,2,2,795,795},
{2313,595,1593,1951,133,282,372,2396,1117,226,2104,267,374,267,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2312,1231,1604,997,652,1096,1070,320,481,662,911,1610,342,2527,606,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2245,1541,1828,783,615,428,1282,1892,848,1219,2465,314,314,314,2,2,2,2,2,2,2,2,2,2,2,2,1323,2,2,2,2,1323},
{2522,1030,324,1264,628,1339,480,234,2351,1085,1979,2333,1339,1356,1356,2286,2,2,2,2,2,2,2,2,2,2,2,2,2530,2,2,2},
{2519,1136,612,209,994,1179,1060,2621,130,485,661,1444,2122,124,258,1114,2,2,806,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2524,1894,253,2072,1242,355,888,1362,28,480,452,1216,595,545,354,1145,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2569,1356,1053,410,437,58,1508,831,2272,383,1725,615,1191,1191,1191,2493,186,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2386,1106,709,251,784,929,1551,2481,304,2148,1546,955,2453,866,866,2,2,2264,2264,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2228,1163,1995,649,1000,680,325,1591,774,767,711,711,1418,524,711,401,976,2,2,2,2,2005,2005,2,2,2,2,2,2,1390,1390,2},
{2362,1706,564,1088,1296,1267,70,1015,496,1298,758,154,240,240,154,154,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1715,2260,357,557,783,1195,2288,1997,1120,144,247,175,1277,203,203,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2294,2360,1353,748,1439,226,940,2316,1112,1527,214,1406,1429,712,1124,2,595,595,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2303,1018,316,280,1616,909,97,1126,1295,736,216,54,2045,726,1673,2,2,2,2,2,779,779,2,2,2,2,2,2,2,2,2,2},
{2390,491,1217,1148,2314,2250,2180,308,613,662,1346,1346,1346,1280,778,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1732,527,1303,664,71,294,404,917,1074,180,2618,2412,441,1987,1750,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1695,1287,1346,1181,1412,1653,830,2025,957,1720,1614,887,964,964,964,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1756,2308,1986,101,957,633,1940,1002,390,1237,95,1441,95,95,705,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2461,1412,540,1183,229,300,47,585,518,402,1863,1863,560,1326,1326,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1707,717,366,287,1883,50,599,1371,474,1551,947,2142,1885,947,2008,1004,1004,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2632,567,1149,1227,1156,2052,643,1585,1197,581,63,718,699,149,149,1940,2,2,2,2,2,2,2,2,2,2,2,2146,2,2,2,2},
{1773,2024,377,340,1938,103,1180,600,199,848,2449,2449,506,506,762,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2435,1920,394,1482,266,1637,911,1697,1689,1249,1085,1085,397,2292,1355,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2345,662,270,324,1061,1080,1952,593,1480,2111,2667,2093,2059,2120,955,1447,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1777,455,1487,1190,455,1542,977,2308,437,1129,410,856,1420,412,412,766,2,2034,2034,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2662,2224,1142,656,59,598,730,458,226,1151,741,1286,1015,2,688,2017,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2666,768,529,990,2329,130,1678,2466,318,1083,387,1524,511,2,731,731,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2501,1216,246,1278,718,704,2019,88,273,1203,67,1488,1828,2,2,1489,1489,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2474,2292,1818,2061,2833,751,2172,1708,1210,1675,370,131,163,2,2,163,163,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1751,1575,889,828,82,1956,712,499,1420,1686,339,2326,2035,2,2,558,558,2,1234,2,2,2,2,2,2,2,2,2,2,2,1239,1239},
{2522,1148,1943,168,218,252,543,1535,2004,130,353,353,42,2,2,2,1173,1173,2,1547,2,2,2,2,2,2,2,1547,1173,1547,1547,2},
{2695,432,1213,579,865,1637,1857,84,447,155,2492,347,1980,2,2,2,1155,1155,1155,2,1933,1933,1933,2,2,2,2,2,2,2,1901,1901},
{1808,1683,474,1761,106,602,1416,217,1351,1602,366,393,1966,2,2,2,2,2,378,378,606,606,606,2,2,2,2,2,919,919,919,919},
{2428,1576,1692,449,2012,240,1167,418,272,1557,2197,645,645,2,2,2,2,2,2150,2150,2,2,562,715,2,2,2,81,81,2,2,2},
{2727,781,1689,1709,997,2563,1032,468,44,992,1214,725,75,2,2,2,2,360,360,380,2,2,2,2,2,2,2,2,2,2,2,2},
{1948,1085,1344,2090,1435,2389,3193,1007,1003,244,667,1838,2062,2,2,2,1802,299,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2433,932,689,818,2014,1498,749,1645,867,1627,47,1766,2193,2,2,2030,2030,2,430,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2463,712,1525,2092,2942,352,761,242,2178,2339,483,1905,1347,2,2,65,529,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2547,920,386,925,74,579,323,2319,520,2332,1535,751,1591,2,770,770,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2452,2588,2055,665,818,2622,413,1260,965,211,989,1219,166,2,1251,1251,2,1256,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1957,2311,993,276,293,2826,1087,880,927,1811,1122,2974,2974,2,2,590,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2552,998,533,827,1619,831,1861,918,750,1955,241,1899,448,2151,2151,449,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1860,579,1000,1575,898,170,185,1032,293,2754,438,459,459,2,1199,1199,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2602,2417,1888,2528,1410,669,1543,233,814,2478,225,1449,1449,224,1671,1671,2,2,931,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1889,2527,1366,1371,387,925,1751,162,250,1064,292,467,467,546,1244,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2492,1186,1350,1616,2749,1962,33,708,279,813,1390,489,1203,268,173,2410,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2500,1575,423,541,561,380,262,1564,1923,1242,2084,1758,1283,2213,924,924,2,2,2,2,2,2,2,2,2,2,2,1827,1827,2,2,2},
{1842,1736,489,743,1539,1681,683,1412,1418,312,2778,2778,1975,1975,803,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2824,1183,2201,278,241,2230,1591,1648,1036,818,1321,1312,754,813,813,813,813,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1900,2506,952,1059,163,870,681,1235,1271,1188,2071,1705,1183,648,404,2,2,2,2,2,2,2,2,2236,2236,2,2,2,2,2,2,2},
{2662,1443,2327,132,490,1149,1572,744,429,621,1763,2383,1903,1246,964,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2673,2182,1307,1776,1233,1828,1828,340,249,216,503,160,160,582,926,2129,2129,2129,2129,2129,2129,2129,2129,2129,2129,2129,2129,2,1018,1018,1103,1103},
{2042,620,1074,2057,2758,859,815,1127,766,1693,252,808,981,416,416,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2102,881,2170,1673,705,101,58,1712,1568,214,758,488,1007,269,243,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2692,2665,961,1478,324,429,1311,376,1648,130,2083,1047,409,343,343,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2122,1087,563,1669,647,2996,151,2458,250,310,71,1348,355,965,2815,1333,1333,2,2,2,2,2218,2,2,2,2,2,2,2,2,2,2},
{1952,1968,2260,2945,2464,1055,2626,570,1316,1828,1828,970,970,221,220,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2072,1947,1779,254,2822,1552,855,804,3452,202,695,82,684,208,1270,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1947,1699,1341,486,1765,1960,264,899,1082,1674,987,1878,930,1008,930,930,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1953,1527,1643,591,1517,2427,1232,1555,2542,495,675,2534,2534,3106,83,3106,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2744,1728,2213,792,761,1667,1908,31,447,442,815,2865,762,762,762,762,2,2,2,2,2,2,2,2,2,2,2,2,649,649,649,2},
{2722,1406,1257,807,2191,3017,1330,1023,602,2124,794,530,733,733,1083,2528,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{1963,1525,437,398,609,393,2420,3059,435,1251,1977,1672,450,1960,1954,1960,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2626,2468,2838,845,2060,218,1080,912,911,1973,1365,920,1316,1316,2,1316,1316,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2734,1727,1743,1026,809,1154,779,244,1238,1616,812,784,825,1810,1810,1810,1810,1559,1559,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2180,2262,1651,204,3193,2121,2725,1016,629,1834,603,2848,26,26,728,728,728,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2648,1328,2578,133,1377,105,2485,2139,323,1045,145,761,1201,1848,2,814,814,814,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2999,358,250,1379,102,2349,1491,2074,42,376,2811,1220,296,296,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2810,1274,499,742,1724,425,190,1561,1302,2603,2255,917,661,661,2,2,2,495,2,2,2,2,2,2,2,2,2,2575,2,2,2,2},
{2150,589,876,1616,2655,432,902,1028,433,1375,574,1400,1400,1400,2,2,2,2,2,1529,1529,1529,1529,1529,1529,1529,1529,1529,1529,1529,1529,1529},
{1665,1856,201,824,796,249,1217,590,1375,1175,1599,824,824,3319,2,2,2,601,1961,1961,2,2,2,1961,2,2,2,2,2,2,1961,2},
{2704,2239,1260,140,2161,2781,1840,574,2353,343,3218,61,2108,2038,1873,2,1833,1408,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2173,876,802,2197,3338,176,1783,224,1763,1160,1264,1264,2864,554,2,552,552,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2708,1663,2279,824,836,1598,2101,1620,1202,1606,1368,1079,1167,1999,2848,2848,2848,1101,1101,1101,2,2,2,662,2,2,2,2272,2,2,2,2},
{1987,1463,2328,1890,1443,2086,283,2895,522,1577,1514,1657,2605,891,2,1181,1181,2,2,2121,2,2,2,2,2,2,2,2,2,2,2,2},
{2173,1637,1139,905,1802,1378,296,439,1507,1017,1427,209,708,462,1508,1508,1508,2,2,2,2,2,2,2,2,2,2,2240,2240,1459,1459,1459},
{2206,1526,628,2877,802,2587,1253,1258,1044,2195,3246,40,2898,2898,1704,598,2,2145,2,2,2,2145,2,2,2,2,2,2,2,2,2,2},
{2182,618,1022,1433,1138,1580,2590,149,796,2090,743,294,294,1117,720,3003,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2025,1805,1466,1213,2006,1903,568,1700,1355,865,1783,1006,1006,1070,1070,268,2,2,2,2,2388,2388,845,845,845,2,2,2,2,2,2,2},
{2185,1038,3050,1461,2270,2159,958,1637,233,2483,525,987,437,437,437,3065,2,2,2160,2160,2,2,2,2,2,2,2,2,2,2,2160,2160},
{2083,1465,847,1450,502,447,2168,794,1761,1324,162,188,2853,2853,636,973,2,563,2,2,2,2,2,2,2,2089,2089,2089,2089,2089,2,2},
{2923,2303,203,508,472,648,3169,269,515,3147,2415,1700,1700,1700,1461,1461,1461,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2300,1116,1555,2794,1095,998,1999,894,963,753,324,2130,2675,2675,554,2045,2,2,2,2,2,2,2,2130,2130,2130,2,2,2,2,2,2},
{2103,768,702,1548,1486,2228,2846,861,665,1497,1046,1046,2252,394,394,1901,1155,2,2,2,2,2,2,2,2,2,2,2,192,192,192,192},
{2923,640,661,2179,1207,182,872,171,738,269,1372,222,908,2069,2069,2,1550,516,2,2,2,2,2,2,2,2,2,2,1109,2,2,2},
{2833,2005,387,733,562,468,317,224,94,478,1606,2522,1606,2001,1087,2,2,1087,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2125,2479,1749,1226,1169,1681,459,652,1087,2211,1613,686,2213,1689,2446,2,2,2925,2925,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2953,1059,205,3093,138,132,2148,1345,1499,216,151,1296,2446,1610,1632,2,2,2,2,4,4,2,2,2,987,987,2,2,2,2,2,2},
{3199,1431,593,2050,2785,507,1540,1103,1740,459,62,1766,1781,1121,1600,2,1600,1600,125,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2258,1714,415,373,1919,2605,693,827,1918,496,1479,1903,86,1083,415,2,2,38,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3289,2032,329,2169,2323,1599,517,1704,1847,804,632,40,40,40,40,40,40,40,40,2,2,1600,2,2,1600,2,2,2,2,2,2,2},
{2165,2725,2293,368,705,3063,494,103,12,1332,175,2331,3144,2165,1709,1709,2090,2,2,2,2,1363,1363,2,566,2,2,2,2,2,2,2},
{2300,1070,2169,2540,734,1002,912,1386,2215,224,1285,880,2052,2052,1301,959,563,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3267,1852,1037,648,611,1250,432,853,1467,179,715,2,2033,841,2607,2607,2607,2607,2,2,2,2,1874,1874,2,1874,899,2,2,2,2,2},
{2348,2565,794,859,1740,1596,532,462,457,1014,1227,2,2761,954,249,249,2,458,458,2,2,2,2,2,909,909,2,2,2,2,2,2},
{3038,2399,1450,1276,1222,727,552,646,1055,2351,686,63,252,504,3166,1802,2,2,1165,1165,1165,2,2,2,2,1165,1165,1165,2,2,1165,2},
{3038,2519,1494,107,2597,802,535,1669,1695,1928,1940,1580,1580,85,2274,1551,2,2,2431,560,560,560,2,2,1098,2,2,2,2,2,2,2},
{3040,1044,1927,1952,1479,3124,1373,1990,588,2550,1277,2,629,2671,1842,2712,840,1702,2,1669,2,1347,2,2,2,2,1669,1669,1669,1669,2,1669},
{3056,1567,691,1243,653,751,248,842,1954,480,458,2,2,2451,934,3172,3556,2259,2312,2,2562,2562,2,2,2562,2562,2562,2562,2562,2,2,2},
{2959,2553,1333,877,2492,3169,2498,686,2030,2820,3233,1313,1313,1471,1471,1471,1471,2,2,1471,1471,2,2,1481,2,1887,2,2,2,2,2,2},
{3398,964,862,301,1705,2002,310,644,144,1091,1507,2,2,2460,496,496,2517,2517,1842,2,2,1964,2,2,2,2,2,1676,2,2,2,2},
{2379,3034,166,302,2108,1078,2976,68,158,134,1567,2,2,1514,1514,1514,1883,1883,2,2,1883,1883,1883,1883,1883,1883,1883,1883,1883,2,2,2},
{2386,1270,1204,1032,1474,224,496,2296,1536,1219,311,2,2,2,2,1238,2108,2108,2108,2108,2108,2108,2108,2108,1444,1444,1444,1444,1444,1444,1444,2},
{2431,739,2488,1386,1632,2107,2602,2139,1751,349,3147,2,2,64,16,8,32,4,4,32,728,728,728,728,2,2,64,16,8,180,180,180},
{3405,2142,1621,110,2112,2097,807,740,747,282,372,2,2,2,2,2493,2493,2493,1299,2,132,1872,2,1843,2,2,2,2,2,2,2,2},
{3157,1230,685,1513,663,1335,2100,1441,1826,1670,1539,2,2,2,2899,2899,1378,54,2,46,46,2,2,1362,1362,2,2,2,2,2,2,2},
{2415,822,3658,449,1980,891,129,823,1787,621,514,2668,2668,2668,2668,2668,666,269,2830,2,2,2,2,241,370,370,370,370,2,2,2,2},
{2463,2664,2825,1208,882,629,428,428,356,343,1730,2,769,769,769,1714,769,2,2,955,769,2,2,955,955,955,2,2,2,955,955,955},
{2447,1588,1077,831,1413,2362,1499,1812,1112,815,129,1034,1034,1867,194,518,1454,723,723,1251,2,160,2,2,1251,1251,2,2,2,2,2,2},
{3094,1638,1514,843,1503,1884,1481,727,723,1319,226,2,676,2401,1699,562,639,639,1176,2,2,2,2,824,2,2,2,2,2,2,2,2},
{3125,2004,547,2986,2919,471,948,1747,201,1862,802,2,1238,1277,1277,1277,2,2,1245,1245,1245,2,2,2743,1245,1245,2,2,2,2,2,2},
{2582,2469,533,1726,1575,1505,2448,2031,1257,427,588,1633,202,3553,1938,672,195,195,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2378,636,1958,1628,1255,2285,2208,1626,719,2944,1086,1436,1436,1719,2111,655,2637,2637,2,2,2,2637,2637,2,2637,2637,2637,2637,2637,2,2637,2637},
{2372,3079,2161,515,368,847,955,1257,1937,315,2666,1938,1723,1252,1252,362,362,2,2205,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2518,2060,1055,362,1455,1899,1105,1560,2237,2451,2080,181,2346,181,1829,1829,1829,2,2,1509,1509,1509,2,1509,2,2,2,2,2,2,2,2},
{3580,1671,674,1838,814,1409,323,3021,1047,2579,2579,2968,2968,102,2656,2638,2638,4006,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3194,1576,1084,859,2879,1600,953,1429,471,867,1105,1490,293,293,293,2,2,198,2619,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3215,2004,3333,2271,3283,1660,2135,1696,1413,1362,834,253,253,253,3802,2,2,2,1881,690,690,2,2,2,1881,1881,1881,1881,1881,2,1881,1881},
{3719,2441,2094,1665,1707,1827,1310,230,1635,143,386,1029,1070,1062,1062,2,1062,1062,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3249,1309,1232,472,711,2557,1479,1027,145,489,1377,2928,2928,3522,3522,3522,968,415,415,2,2,2,2,1332,1332,1332,2,1332,2891,2,1332,2891},
{2462,1962,257,2244,1966,1905,204,262,799,319,752,1696,971,971,3781,1426,1426,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3434,3131,1399,3413,1533,281,3288,1242,810,135,2506,2506,1742,946,1015,1044,1044,1044,2,2,2,2,1044,1837,1837,1837,1837,1837,2,2,2,2},
{2518,1200,631,596,1946,365,2960,413,592,3878,242,2714,2364,1402,1402,2322,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3362,2012,1759,2002,1365,150,3120,471,1590,3246,1296,196,196,196,2984,2323,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{3382,899,3140,2860,1155,1840,2822,355,1753,1856,1018,822,52,52,52,1102,1102,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2728,1334,274,1330,2674,2614,931,2250,883,1506,2193,1345,1089,500,2,219,390,2,2,2,2,2,2,2,390,2,2,2,2,2,2,2},
{3911,3343,202,675,1733,71,166,176,1323,2864,899,2155,1108,2172,2,2,1829,2172,1107,2,2,2,2,1107,1107,1107,2,2,2,1107,2,2},
{2757,3466,1411,1168,340,2760,1053,524,53,2090,1227,26,260,830,2,2,2,1139,2,2,2,2,2,2,2,2,2,2,2,2,2,2},
{2662,902,2371,1920,1097,1476,1008,1012,3556,468,3374,2560,591,1446,2,298,298,149,149,149,149,149,3135,3135,3135,3135,3135,2,2,2,2,2},
{2861,1407,1848,245,2186,1209,164,2577,625,132,657,2333,2333,2213,2213,2213,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2}
};
Cuba-3.0/src/divonne/Rule.c 0000644 0000000 0000000 00000046241 11655703144 014245 0 ustar root root /*
Rule.c
integration with cubature rules
code lifted with minor modifications from DCUHRE
by J. Berntsen, T. Espelid, and A. Genz
this file is part of Divonne
last modified 6 Nov 11 th
*/
enum { nrules = 5 };
#define TYPEDEFSET \
typedef struct { \
count n; \
real weight[nrules], scale[nrules], norm[nrules]; \
real gen[NDIM]; \
} Set
/*********************************************************************/
static void Rule13Alloc(This *t)
{
static creal w[][nrules] = {
{ .00844923090033615, .3213775489050763, .3372900883288987,
-.8264123822525677, .6539094339575232 },
{ .023771474018994404, -.1767341636743844, -.1644903060344491,
.306583861409436, -.2041614154424632},
{ .02940016170142405, .07347600537466073, .07707849911634623,
.002389292538329435, -.174698151579499 },
{ .006644436465817374, -.03638022004364754, -.03804478358506311,
-.1343024157997222, .03937939671417803 },
{ .0042536044255016, .021252979220987123, .02223559940380806,
.08833366840533902, .006974520545933992 },
{ 0, .1460984204026913, .1480693879765931,
0, 0 },
{ .0040664827465935255, .017476132861520992, 4.467143702185815e-6,
.0009786283074168292, .0066677021717782585 },
{ .03362231646315497, .1444954045641582, .150894476707413,
-.1319227889147519, .05512960621544304 },
{ .033200804136503725, .0001307687976001325, 3.6472001075162155e-5,
.00799001220015063, .05443846381278608 },
{ .014093686924979677, .0005380992313941161, .000577719899901388,
.0033917470797606257, .02310903863953934 },
{ .000977069770327625, .0001042259576889814, .0001041757313688177,
.0022949157182832643, .01506937747477189 },
{ .007531996943580376, -.001401152865045733, -.001452822267047819,
-.01358584986119197, -.060570216489018905 },
{ .02577183086722915, .008041788181514763, .008338339968783704,
.04025866859057809, .04225737654686337},
{ .015625, -.1420416552759383, -.147279632923196,
.003760268580063992, .02561989142123099 }
};
static creal g[] = {
.12585646717265545, .3506966822267133,
.4795480315809981, .4978005239276064,
.25, .07972723291487795,
.1904495567970094, .3291384627633596,
.43807365825146577, .499121592026599,
.4895111329084231, .32461421628226944,
.43637106005656195, .1791307322940614,
.2833333333333333, .1038888888888889 };
enum { nsets = 14, ndim = 2 };
TYPEDEFSET;
count n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
Copy(last->weight, w[0], nrules);
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[1], nrules);
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[2], nrules);
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[3], nrules);
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[4], nrules);
last->gen[0] = g[3];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[5], nrules);
last->gen[0] = g[4];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[6], nrules);
last->gen[0] = g[5];
last->gen[1] = g[5];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[7], nrules);
last->gen[0] = g[6];
last->gen[1] = g[6];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[8], nrules);
last->gen[0] = g[7];
last->gen[1] = g[7];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[9], nrules);
last->gen[0] = g[8];
last->gen[1] = g[8];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[10], nrules);
last->gen[0] = g[9];
last->gen[1] = g[9];
++last;
n += last->n = 4*ndim*(ndim - 1);
Copy(last->weight, w[11], nrules);
last->gen[0] = g[10];
last->gen[1] = g[11];
++last;
n += last->n = 4*ndim*(ndim - 1);
Copy(last->weight, w[12], nrules);
last->gen[0] = g[12];
last->gen[1] = g[13];
++last;
n += last->n = 4*ndim*(ndim - 1);
Copy(last->weight, w[13], nrules);
last->gen[0] = g[14];
last->gen[1] = g[15];
t->rule13.first = first;
t->rule13.last = last;
t->rule13.errcoeff[0] = 10;
t->rule13.errcoeff[1] = 1;
t->rule13.errcoeff[2] = 5;
t->rule13.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static void Rule11Alloc(This *t)
{
static creal w[][nrules] = {
{ .0009903847688882167, 1.715006248224684, 1.936014978949526,
.517082819560576, 2.05440450381852 },
{ .0084964717409851, -.3755893815889209, -.3673449403754268,
.01445269144914044, .013777599884901202 },
{ .00013587331735072814, .1488632145140549, .02929778657898176,
-.3601489663995932, -.576806291790441 },
{ .022982920777660364, -.2497046640620823, -.1151883520260315,
.3628307003418485, .03726835047700328 },
{ .004202649722286289, .1792501419135204, .05086658220872218,
.007148802650872729, .0068148789397772195 },
{ .0012671889041675774, .0034461267589738897, .04453911087786469,
-.09222852896022966, .057231697338518496 },
{ .0002109560854981544, -.005140483185555825, -.022878282571259,
.01719339732471725, -.044930187438112855 },
{ .016830857056410086, .006536017839876424, .02908926216345833,
-.102141653746035, .027292365738663484 },
{ .00021876823557504823, -.00065134549392297, -.002898884350669207,
-.007504397861080493, .000354747395055699 },
{ .009690420479796819, -.006304672433547204, -.028059634133074954,
.01648362537726711, .01571366799739551 },
{ .030773311284628138, .01266959399788263, .05638741361145884,
.05234610158469334, .049900992192785674 },
{ .0084974310856038, -.005454241018647931, -.02427469611942451,
.014454323316130661, .0137791555266677 },
{ .0017749535291258914, .004826995274768427, .021483070341828822,
.003019236275367777, .0028782064230998723 }
};
static creal g[] = {
.095, .25,
.375, .4,
.4975, .49936724991757,
.38968518428362114, .49998494965443835,
.3951318612385894, .22016983438253684,
.4774686911397297, .2189239229503431,
.4830546566815374, .2288552938881567 };
enum { nsets = 13, ndim = 3 };
TYPEDEFSET;
count n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
Copy(last->weight, w[0], nrules);
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[1], nrules);
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[2], nrules);
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[3], nrules);
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[4], nrules);
last->gen[0] = g[3];
++last;
n += last->n = 2*ndim;
Copy(last->weight, w[5], nrules);
last->gen[0] = g[4];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[6], nrules);
last->gen[0] = g[5];
last->gen[1] = g[5];
++last;
n += last->n = 2*ndim*(ndim - 1);
Copy(last->weight, w[7], nrules);
last->gen[0] = g[6];
last->gen[1] = g[6];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
Copy(last->weight, w[8], nrules);
last->gen[0] = g[7];
last->gen[1] = g[7];
last->gen[2] = g[7];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
Copy(last->weight, w[9], nrules);
last->gen[0] = g[8];
last->gen[1] = g[8];
last->gen[2] = g[8];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
Copy(last->weight, w[10], nrules);
last->gen[0] = g[9];
last->gen[1] = g[9];
last->gen[2] = g[9];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2);
Copy(last->weight, w[11], nrules);
last->gen[0] = g[10];
last->gen[1] = g[11];
last->gen[2] = g[11];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2);
Copy(last->weight, w[12], nrules);
last->gen[0] = g[12];
last->gen[1] = g[12];
last->gen[2] = g[13];
t->rule11.first = first;
t->rule11.last = last;
t->rule11.errcoeff[0] = 4;
t->rule11.errcoeff[1] = .5;
t->rule11.errcoeff[2] = 3;
t->rule11.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static void Rule9Alloc(This *t)
{
static creal w[] = {
-.0023611709677855117884, .11415390023857325268,
-.63833920076702389094, .74849988504685208004,
-.0014324017033399125142, .057471507864489725949,
-.14225104571434243234, -.062875028738286979989,
.254591133248959089, -1.207328566678236261,
.89567365764160676508, -.36479356986049146661,
.0035417564516782676826, -.072609367395893679605,
.10557491625218991012, .0021486025550098687713,
-.032268563892953949998, .010636783990231217481,
.014689102496143490175, .51134708346467591431,
.45976448120806344646, .18239678493024573331,
-.04508628929435784076, .21415883524352793401,
-.027351546526545644722, .054941067048711234101,
.11937596202570775297, .65089519391920250593,
.14744939829434460168, .057693384490973483573,
.034999626602143583822, -1.3868627719278281436,
-.2386668732575008879, .015532417276607053264,
.0035328099607090870236, .09231719987444221619,
.02254314464717892038, .013675773263272822361,
-.32544759695960125297, .0017708782258391338413,
.0010743012775049343856, .25150011495314791996 };
static creal g[] = {
.47795365790226950619, .20302858736911986780,
.44762735462617812882, .125,
.34303789878087814570 };
enum { nsets = 9 };
TYPEDEFSET;
ccount ndim = t->ndim;
ccount twondim = 1 << ndim;
count dim, n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
last->weight[0] = ndim*(ndim*(ndim*w[0] + w[1]) + w[2]) + w[3];
last->weight[1] = ndim*(ndim*(ndim*w[4] + w[5]) + w[6]) - w[7];
last->weight[2] = ndim*w[8] - last->weight[1];
last->weight[3] = ndim*(ndim*w[9] + w[10]) - 1 + last->weight[0];
last->weight[4] = ndim*w[11] + 1 - last->weight[0];
++last;
n += last->n = 2*ndim;
last->weight[0] = ndim*(ndim*w[12] + w[13]) + w[14];
last->weight[1] = ndim*(ndim*w[15] + w[16]) + w[17];
last->weight[2] = w[18] - last->weight[1];
last->weight[3] = ndim*w[19] + w[20] + last->weight[0];
last->weight[4] = w[21] - last->weight[0];
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
last->weight[0] = ndim*w[22] + w[23];
last->weight[1] = ndim*w[24] + w[25];
last->weight[2] = w[26] - last->weight[1];
last->weight[3] = ndim*w[27] + w[28];
last->weight[4] = -last->weight[0];
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
last->weight[0] = w[29];
last->weight[1] = w[30];
last->weight[2] = -w[29];
last->weight[3] = w[31];
last->weight[4] = -w[29];
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim;
last->weight[2] = w[32];
last->gen[0] = g[3];
++last;
n += last->n = 2*ndim*(ndim - 1);
last->weight[0] = w[33] - ndim*w[12];
last->weight[1] = w[34] - ndim*w[15];
last->weight[2] = -last->weight[1];
last->weight[3] = w[35] + last->weight[0];
last->weight[4] = -last->weight[0];
last->gen[0] = g[0];
last->gen[1] = g[0];
++last;
n += last->n = 4*ndim*(ndim - 1);
last->weight[0] = w[36];
last->weight[1] = w[37];
last->weight[2] = -w[37];
last->weight[3] = w[38];
last->weight[4] = -w[36];
last->gen[0] = g[0];
last->gen[1] = g[1];
++last;
n += last->n = 4*ndim*(ndim - 1)*(ndim - 2)/3;
last->weight[0] = w[39];
last->weight[1] = w[40];
last->weight[2] = -w[40];
last->weight[3] = w[39];
last->weight[4] = -w[39];
last->gen[0] = g[0];
last->gen[1] = g[0];
last->gen[2] = g[0];
++last;
n += last->n = twondim;
last->weight[0] = w[41]/twondim;
last->weight[1] = w[7]/twondim;
last->weight[2] = -last->weight[1];
last->weight[3] = last->weight[0];
last->weight[4] = -last->weight[0];
for( dim = 0; dim < ndim; ++dim )
last->gen[dim] = g[4];
t->rule9.first = first;
t->rule9.last = last;
t->rule9.errcoeff[0] = 5;
t->rule9.errcoeff[1] = 1;
t->rule9.errcoeff[2] = 5;
t->rule9.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static void Rule7Alloc(This *t)
{
static creal w[] = {
.019417866674748388428, -.40385257701150182546,
.64485668767465982223, .01177982690775806141,
-.18041318740733609012, -.088785828081335044443,
.056328645808285941374, -.0097089333373741942142,
-.99129176779582358138, -.17757165616267008889,
.12359398032043233572, .074978148702033690681,
.55489147051423559776, .088041241522692771226,
.021118358455513385083, -.0099302203239653333087,
-.064100053285010904179, .030381729038221007659,
.0058899134538790307051, -.0048544666686870971071,
.35514331232534017777 };
static creal g[] = {
.47795365790226950619, .20302858736911986780,
.375, .34303789878087814570 };
enum { nsets = 6 };
TYPEDEFSET;
ccount ndim = t->ndim;
ccount twondim = 1 << ndim;
count dim, n, r;
Set *first, *last, *s, *x;
Alloc(first, nsets);
Clear(first, nsets);
last = first;
n = last->n = 1;
last->weight[0] = ndim*(ndim*w[0] + w[1]) + w[2];
last->weight[1] = ndim*(ndim*w[3] + w[4]) - w[5];
last->weight[2] = ndim*w[6] - last->weight[1];
last->weight[3] = ndim*(ndim*w[7] + w[8]) - w[9];
last->weight[4] = 1 - last->weight[0];
++last;
n += last->n = 2*ndim;
last->weight[0] = w[10];
last->weight[1] = w[11];
last->weight[2] = -w[10];
last->weight[3] = w[12];
last->weight[4] = -w[10];
last->gen[0] = g[1];
++last;
n += last->n = 2*ndim;
last->weight[0] = w[13] - ndim*w[0];
last->weight[1] = w[14] - ndim*w[3];
last->weight[2] = w[15] - last->weight[1];
last->weight[3] = w[16] - ndim*w[7];
last->weight[4] = -last->weight[0];
last->gen[0] = g[0];
++last;
n += last->n = 2*ndim;
last->weight[2] = w[17];
last->gen[0] = g[2];
++last;
n += last->n = 2*ndim*(ndim - 1);
last->weight[0] = -w[7];
last->weight[1] = w[18];
last->weight[2] = -w[18];
last->weight[3] = w[19];
last->weight[4] = w[7];
last->gen[0] = g[0];
last->gen[1] = g[0];
++last;
n += last->n = twondim;
last->weight[0] = w[20]/twondim;
last->weight[1] = w[5]/twondim;
last->weight[2] = -last->weight[1];
last->weight[3] = w[9]/twondim;
last->weight[4] = -last->weight[0];
for( dim = 0; dim < ndim; ++dim )
last->gen[dim] = g[3];
t->rule7.first = first;
t->rule7.last = last;
t->rule7.errcoeff[0] = 5;
t->rule7.errcoeff[1] = 1;
t->rule7.errcoeff[2] = 5;
t->rule7.n = n;
for( s = first; s <= last; ++s )
for( r = 1; r < nrules - 1; ++r ) {
creal scale = (s->weight[r] == 0) ? 100 :
-s->weight[r + 1]/s->weight[r];
real sum = 0;
for( x = first; x <= last; ++x )
sum += x->n*fabs(x->weight[r + 1] + scale*x->weight[r]);
s->scale[r] = scale;
s->norm[r] = 1/sum;
}
}
/*********************************************************************/
static inline void RuleIni(Rule *rule)
{
rule->first = NULL;
}
/*********************************************************************/
static inline bool RuleIniQ(Rule *rule)
{
return rule->first == NULL;
}
/*********************************************************************/
static inline void RuleFree(Rule *rule)
{
free(rule->first);
}
/*********************************************************************/
static real *ExpandFS(cThis *t, cBounds *b, real *g, real *x)
{
count dim, ndim = t->ndim;
next:
/* Compute centrally symmetric sum for permutation of G */
for( dim = 0; dim < ndim; ++dim )
*x++ = (.5 + g[dim])*b[dim].lower + (.5 - g[dim])*b[dim].upper;
for( dim = 0; dim < ndim; ) {
g[dim] = -g[dim];
if( g[dim++] < 0 ) goto next;
}
/* Find next distinct permutation of G and loop back for next sum.
Permutations are generated in reverse lexicographic order. */
for( dim = 1; dim < ndim; ++dim ) {
creal gd = g[dim];
if( g[dim - 1] > gd ) {
count i, j = dim, ix = dim, dx = dim - 1;
for( i = 0; i < --j; ++i ) {
creal tmp = g[i];
g[i] = g[j];
g[j] = tmp;
if( tmp <= gd ) --dx;
if( g[i] > gd ) ix = i;
}
if( g[dx] <= gd ) dx = ix;
g[dim] = g[dx];
g[dx] = gd;
goto next;
}
}
/* Restore original order to generators */
for( dim = 0; dim < --ndim; ++dim ) {
creal tmp = g[dim];
g[dim] = g[ndim];
g[ndim] = tmp;
}
return x;
}
/*********************************************************************/
static void SampleRule(This *t, ccount iregion)
{
SAMPLERDEFS;
TYPEDEFSET;
Set *first = (Set *)samples->rule->first;
Set *last = (Set *)samples->rule->last;
Set *s;
creal *errcoeff = samples->rule->errcoeff;
count comp, rul, sn;
for( s = first; s <= last; ++s )
if( s->n ) x = ExpandFS(t, b, s->gen, x);
DoSample(t, n, samples->x, f, t->ndim);
for( comp = 0; comp < t->ncomp; ++comp ) {
real sum[nrules];
creal *f1 = f++;
Zap(sum);
for( s = first; s <= last; ++s )
for( sn = s->n; sn; --sn ) {
creal fun = *f1;
f1 += t->ncomp;
for( rul = 0; rul < nrules; ++rul )
sum[rul] += fun*s->weight[rul];
}
/* Search for the null rule, in the linear space spanned by two
successive null rules in our sequence, which gives the greatest
error estimate among all normalized (1-norm) null rules in this
space. */
for( rul = 1; rul < nrules - 1; ++rul ) {
real maxerr = 0;
for( s = first; s <= last; ++s )
maxerr = Max(maxerr,
fabs(sum[rul + 1] + s->scale[rul]*sum[rul])*s->norm[rul]);
sum[rul] = maxerr;
}
r[comp].avg = region->vol*sum[0];
r[comp].err = region->vol*(
(errcoeff[0]*sum[1] <= sum[2] && errcoeff[0]*sum[2] <= sum[3]) ?
errcoeff[1]*sum[1] :
errcoeff[2]*Max(Max(sum[1], sum[2]), sum[3]) );
}
}
Cuba-3.0/src/divonne/Sample.c 0000644 0000000 0000000 00000015152 11655734250 014556 0 ustar root root /*
Sample.c
most of what is related to sampling
this file is part of Divonne
last modified 7 Nov 11 th
*/
#define MARKMASK 0xfffffff
#define Marked(x) ((x) & ~MARKMASK)
#define Unmark(x) ((x) & MARKMASK)
#define EXTRAPOLATE_EPS (.25*t->border.lower)
/*#define EXTRAPOLATE_EPS 0x1p-26*/
/*********************************************************************/
static inline void SamplesIni(Samples *samples)
{
samples->x = NULL;
}
/*********************************************************************/
static inline bool SamplesIniQ(cSamples *samples)
{
return samples->x == NULL;
}
/*********************************************************************/
static inline void SamplesFree(cSamples *samples)
{
free(samples->x);
}
/*********************************************************************/
static void SampleSobol(This *t, ccount iregion)
{
SAMPLERDEFS;
real avg[NCOMP], norm;
number i;
count dim, comp;
for( i = 0; i < n; ++i ) {
t->rng.getrandom(t, x);
for( dim = 0; dim < t->ndim; ++x, ++dim )
*x = b[dim].lower + *x*(b[dim].upper - b[dim].lower);
}
DoSample(t, n, samples->x, f, t->ndim);
ResCopy(avg, f);
f += t->ncomp;
for( i = 2; i < n; ++i )
for( comp = 0; comp < t->ncomp; ++comp )
avg[comp] += *f++;
norm = region->vol/samples->neff;
for( comp = 0; comp < t->ncomp; ++comp ) {
r[comp].avg = norm*avg[comp];
r[comp].err = 0;
}
}
/*********************************************************************/
static void SampleKorobov(This *t, ccount iregion)
{
SAMPLERDEFS;
real *xlast = x + t->ndim, *flast = f + t->ncomp;
real avg[NCOMP], norm;
cnumber neff = samples->neff;
number nextra = 0, i;
real dist = 0;
count dim, comp;
for( i = 1; i < n; ++i ) {
number c = i;
for( dim = 0; dim < t->ndim; ++dim ) {
creal dx = abs(2*c - neff)/(real)neff;
*xlast++ = b[dim].lower + dx*(b[dim].upper - b[dim].lower);
c = c*samples->coeff % neff;
}
}
for( dim = 0; dim < t->ndim; ++dim ) {
creal dx = (x[dim] = b[dim].upper) - t->border.upper;
if( dx > 0 ) dist += Sq(dx);
}
if( dist > 0 ) {
dist = sqrt(dist)/EXTRAPOLATE_EPS;
for( dim = 0; dim < t->ndim; ++dim ) {
real x2 = x[dim], dx = x2 - t->border.upper;
if( dx > 0 ) {
x[dim] = t->border.upper;
x2 = t->border.upper - dx/dist;
}
xlast[dim] = x2;
}
nextra = 1;
}
DoSample(t, n + nextra, x, f, t->ndim);
ResCopy(avg, flast);
flast += t->ncomp;
for( i = 2; i < n; ++i )
for( comp = 0; comp < t->ncomp; ++comp )
avg[comp] += *flast++;
if( nextra ) {
for( comp = 0; comp < t->ncomp; ++comp )
f[comp] += dist*(f[comp] - flast[comp]);
for( dim = 0; dim < t->ndim; ++dim )
x[dim] = b[dim].upper;
}
norm = region->vol/samples->neff;
for( comp = 0; comp < t->ncomp; ++comp ) {
r[comp].avg = norm*(avg[comp] + avg[comp] + f[comp]);
r[comp].err = 0;
}
}
/*********************************************************************/
#define IsSobol(k) NegQ(k)
#define IsRule(k, d) (k == 9 || k == 7 || (k == 11 && d == 3) || (k == 13 && d == 2))
/* The following coding is used for key1, key2, key3:
0 = for key1, key2: use default,
for key3: do nothing,
1 = for key3: split region again,
7 = degree-7 cubature rule,
9 = degree-9 cubature rule,
11 = degree-11 cubature rule (only in 3 dims),
13 = degree-13 cubature rule (only in 2 dims),
-inf..-40 = absolute # of points, Sobol numbers,
-39..-1 = multiplicator, Sobol numbers,
1..39 = multiplicator, Korobov numbers,
40..inf = absolute # of points, Korobov numbers. */
static count SamplesLookup(This *t, Samples *samples, cint key,
cnumber nwant, cnumber nmax, number nmin)
{
number n;
if( key == 13 && t->ndim == 2 ) {
if( RuleIniQ(&t->rule13) ) Rule13Alloc(t);
samples->rule = &t->rule13;
samples->n = n = nmin = t->rule13.n;
samples->sampler = SampleRule;
}
else if( key == 11 && t->ndim == 3 ) {
if( RuleIniQ(&t->rule11) ) Rule11Alloc(t);
samples->rule = &t->rule11;
samples->n = n = nmin = t->rule11.n;
samples->sampler = SampleRule;
}
else if( key == 9 ) {
if( RuleIniQ(&t->rule9) ) Rule9Alloc(t);
samples->rule = &t->rule9;
samples->n = n = nmin = t->rule9.n;
samples->sampler = SampleRule;
}
else if( key == 7 ) {
if( RuleIniQ(&t->rule7) ) Rule7Alloc(t);
samples->rule = &t->rule7;
samples->n = n = nmin = t->rule7.n;
samples->sampler = SampleRule;
}
else {
n = Abs1(key);
if( n < 40 ) n *= nwant;
samples->sampler = (key < 0) ? SampleSobol :
(n = n/2 + 1, SampleKorobov);
samples->n = IMin(n, nmax);
}
samples->neff = samples->n;
return IDim(n - nmax) | Marked(nmax - nmin);
}
/*********************************************************************/
static void SamplesAlloc(cThis *t, Samples *samples)
{
#define FIRST -INT_MAX
#define MarkLast(x) (x | Marked(INT_MAX))
#include "KorobovCoeff.c"
number nx, nf;
if( samples->sampler == SampleKorobov ) {
enum { max = Elements(prime) - 2 };
cint n = IMin(2*samples->n - 1, MAXPRIME);
int i = Hash(n), p;
count shift = 2 + NegQ(n - 1000);
while( i = IMin(IDim(i), max),
n > (p = prime[i + 1]) || n <= prime[i] ) {
cint d = (n - Unmark(p)) >> ++shift;
i += Min1(d);
}
samples->coeff = coeff[i][t->ndim - KOROBOV_MINDIM];
samples->neff = p = Unmark(p);
samples->n = p/2 + 1;
}
nx = t->ndim*(samples->n + 1); /* need 1 for extrapolation */
nf = t->ncomp*(samples->n + 1);
Alloc(samples->x, nx + nf + t->ncomp + t->ncomp);
samples->f = samples->x + nx;
}
/*********************************************************************/
static real Sample(This *t, creal *x0)
{
real xtmp[2*NDIM], ftmp[2*NCOMP], *xlast = xtmp, f;
real dist = 0;
count dim, comp;
number n = 1;
for( dim = 0; dim < t->ndim; ++dim ) {
creal x1 = *xlast++ = Min(Max(*x0++, 0.), 1.);
real dx;
if( (dx = x1 - t->border.lower) < 0 ||
(dx = x1 - t->border.upper) > 0 ) dist += Sq(dx);
}
if( dist > 0 ) {
dist = sqrt(dist)/EXTRAPOLATE_EPS;
for( dim = 0; dim < t->ndim; ++dim ) {
real x2 = xtmp[dim], dx, b;
if( (dx = x2 - (b = t->border.lower)) < 0 ||
(dx = x2 - (b = t->border.upper)) > 0 ) {
xtmp[dim] = b;
x2 = b - dx/dist;
}
*xlast++ = x2;
}
n = 2;
}
DoSample(t, n, xtmp, ftmp, t->ndim);
comp = Untag(t->selectedcomp);
f = ftmp[comp];
if( n > 1 ) f += dist*(f - ftmp[comp + t->ncomp]);
return Sign(t->selectedcomp)*f;
}
Cuba-3.0/src/divonne/Split.c 0000644 0000000 0000000 00000016231 11660457061 014425 0 ustar root root /*
Split.c
determine optimal cuts for splitting a region
this file is part of Divonne
last modified 15 Nov 11 th
*/
#define BNDTOL .05
#define FRACT .5
#define BIG 1e10
#define SINGTOL 1e-4
#define LHSTOL .1
#define GAMMATOL .1
/* the next four macros must be in sync with the typedef of Bounds! */
#define Lower(d) (2*d)
#define Upper(d) (2*d + 1)
#define Dim(i) ((i) >> 1)
#define SignedDelta(i) (2*(i & 1) - 1)*delta[i]
typedef struct {
count i;
real save, delta;
real f, df, fold;
real lhs, row, sol;
} Cut;
/*********************************************************************/
static inline real Div(creal a, creal b)
{
return (b != 0 && fabs(b) < BIG*fabs(a)) ? a/b : a;
}
/*********************************************************************/
static void SomeCut(This *t, Cut *cut, Bounds *b)
{
count dim, maxdim;
static count nextdim = 0;
real xmid[NDIM], ymid, maxdev;
for( dim = 0; dim < t->ndim; ++dim )
xmid[dim] = .5*(b[dim].upper + b[dim].lower);
ymid = Sample(t, xmid);
maxdev = 0;
maxdim = 0;
for( dim = 0; dim < t->ndim; ++dim ) {
real ylower, yupper, dev;
creal x = xmid[dim];
xmid[dim] = b[dim].lower;
ylower = Sample(t, xmid);
xmid[dim] = b[dim].upper;
yupper = Sample(t, xmid);
xmid[dim] = x;
dev = fabs(ymid - .5*(ylower + yupper));
if( dev >= maxdev ) {
maxdev = dev;
maxdim = dim;
}
}
if( maxdev > 0 ) nextdim = 0;
else maxdim = nextdim++ % t->ndim;
cut->i = Upper(maxdim);
cut->save = b[maxdim].upper;
b[maxdim].upper = xmid[maxdim];
}
/*********************************************************************/
static inline real Volume(cThis *t, creal *delta)
{
real vol = 1;
count dim;
for( dim = 0; dim < t->ndim; ++dim )
vol *= delta[Lower(dim)] + delta[Upper(dim)];
return vol;
}
/*********************************************************************/
static inline real SetupEqs(Cut *cut, ccount ncuts, real f)
{
real sqsum = 0;
Cut *c = &cut[ncuts];
while( --c >= cut ) {
sqsum += Sq(c->lhs = f - c->f);
f = c->f;
}
return sqsum;
}
/*********************************************************************/
static inline void SolveEqs(Cut *cut, count ncuts,
creal *delta, creal diff)
{
real last = 0;
real r = 1;
Cut *c;
for( c = cut; ; ++c ) {
ccount dim = Dim(c->i);
c->row = r -=
Div(diff, (delta[Lower(dim)] + delta[Upper(dim)])*c->df);
if( --ncuts == 0 ) break;
last += r*c->lhs;
}
last = Div(c->lhs - last, r);
for( ; c >= cut; last += (--c)->lhs ) {
creal delmin = -(c->delta = delta[c->i]);
creal delmax = FRACT*(delmin + c->save);
c->sol = Div(last, c->df);
if( c->sol > delmax ) c->sol = .75*delmax;
if( c->sol < delmin ) c->sol = .75*delmin;
}
}
/*********************************************************************/
static count FindCuts(This *t, Cut *cut, Bounds *bounds, creal vol,
real *xmajor, creal fmajor, creal fdiff)
{
cint sign = (fdiff < 0) ? -1 : 1;
count ncuts = 0, icut;
real delta[2*NDIM];
real gamma, fgamma, lhssq;
count dim, div;
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = &bounds[dim];
creal xsave = xmajor[dim];
real dist = b->upper - xsave;
if( dist >= BNDTOL*(b->upper - b->lower) ) {
Cut *c = &cut[ncuts++];
c->i = Upper(dim);
c->save = dist;
xmajor[dim] += dist *= FRACT;
c->f = Sample(t, xmajor);
xmajor[dim] = xsave;
}
delta[Upper(dim)] = dist;
}
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = &bounds[dim];
creal xsave = xmajor[dim];
real dist = xsave - b->lower;
if( dist >= BNDTOL*(b->upper - b->lower) ) {
Cut *c = &cut[ncuts++];
c->i = Lower(dim);
c->save = dist;
xmajor[dim] -= dist *= FRACT;
c->f = Sample(t, xmajor);
xmajor[dim] = xsave;
}
delta[Lower(dim)] = dist;
}
if( ncuts == 0 ) {
SomeCut(t, cut, bounds);
return 1;
}
for( ; ; ) {
real mindiff = INFTY;
Cut *mincut = cut;
for( icut = 0; icut < ncuts; ++icut ) {
Cut *c = &cut[icut];
creal diff = fabs(fmajor - c->f);
if( diff <= mindiff ) {
mindiff = diff;
mincut = c;
}
}
gamma = Volume(t, delta)/vol;
fgamma = fmajor + (gamma - 1)*fdiff;
if( sign*(mincut->f - fgamma) < 0 ) break;
if( --ncuts == 0 ) {
SomeCut(t, cut, bounds);
return 1;
}
delta[mincut->i] = mincut->save;
memcpy(mincut, mincut + 1, (char *)&cut[ncuts] - (char *)mincut);
}
for( icut = 0; icut < ncuts; ++icut ) {
Cut *c = &cut[icut];
c->fold = c->f;
c->df = (c->f - fmajor)/delta[c->i];
}
lhssq = SetupEqs(cut, ncuts, fgamma);
repeat:
SolveEqs(cut, ncuts, delta, gamma*fdiff);
for( div = 1; div <= 16; div *= 4 ) {
real gammanew, lhssqnew;
for( icut = 0; icut < ncuts; ++icut ) {
Cut *c = &cut[icut];
real *x = &xmajor[Dim(c->i)];
creal xsave = *x;
delta[c->i] = c->delta + c->sol/div;
*x += SignedDelta(c->i);
c->f = Sample(t, xmajor);
*x = xsave;
}
gammanew = Volume(t, delta)/vol;
fgamma = fmajor + (gammanew - 1)*fdiff;
lhssqnew = SetupEqs(cut, ncuts, fgamma);
if( lhssqnew <= lhssq ) {
real fmax;
if( fabs(gammanew - gamma) < GAMMATOL*gamma ) break;
gamma = gammanew;
fmax = fabs(fgamma);
for( icut = 0; icut < ncuts; ++icut ) {
Cut *c = &cut[icut];
creal dfmin = SINGTOL*c->df;
creal sol = c->sol/div;
real df = c->f - c->fold;
df = (fabs(sol) < BIG*fabs(df)) ? df/sol : 1;
c->df = (fabs(df) < fabs(dfmin)) ? dfmin : df;
fmax = Max(fmax, fabs(c->f));
c->fold = c->f;
}
if( lhssqnew < Sq((1 + fmax)*LHSTOL) ) break;
lhssq = lhssqnew;
goto repeat;
}
}
for( icut = 0; icut < ncuts; ++icut ) {
Cut *c = &cut[icut];
real *b = (real *)bounds + c->i;
c->save = *b;
*b = xmajor[Dim(c->i)] + SignedDelta(c->i);
}
return ncuts;
}
/*********************************************************************/
static void Split(This *t, ccount iregion)
{
TYPEDEFREGION;
Region *region = RegionPtr(iregion);
Cut cut[2*NDIM], *c;
Errors errors[NCOMP];
count ncuts, succ;
int depth;
real *b, tmp;
t->selectedcomp = region->cutcomp;
t->neval_cut -= t->neval;
ncuts = FindCuts(t, cut, region->bounds, region->vol,
(real *)region->result + region->xmajor, region->fmajor,
region->fmajor - region->fminor);
t->neval_cut += t->neval;
depth = region->depth - ncuts;
EnlargeRegions(t, ++ncuts);
region = RegionPtr(iregion);
region->depth = -ncuts;
succ = iregion + region->next;
region->next = t->nregions - iregion;
b = (real *)region->bounds;
region = RegionPtr(t->nregions);
VecCopy(region->bounds, b);
region->depth = IDim(depth) + 1;
region->next = 1;
region->isamples = 0;
for( c = cut; --ncuts; ++c ) {
ccount ci = c->i;
creal tmp = b[ci ^ 1];
b[ci ^ 1] = b[ci];
b[ci] = c->save;
region = RegionPtr(++t->nregions);
VecCopy(region->bounds, b);
region->depth = IDim(depth) + 1;
region->next = 1;
region->isamples = 0;
++depth;
b[ci ^ 1] = tmp;
}
region->next = succ - t->nregions++;
}
Cuba-3.0/src/divonne/common.c 0000644 0000000 0000000 00000001313 11655711670 014620 0 ustar root root /*
common.c
includes most of the modules
this file is part of Divonne
last modified 7 Nov 11 th
*/
#include "Random.c"
#include "ChiSquare.c"
#include "Rule.c"
#include "Sample.c"
#include "FindMinimum.c"
#include "Split.c"
#include "Explore.c"
#include "Iterate.c"
static inline bool BadDimension(cThis *t, ccount key)
{
if( t->ndim > NDIM ) return true;
if( IsSobol(key) ) return
t->ndim < SOBOL_MINDIM || (t->seed == 0 && t->ndim > SOBOL_MAXDIM);
if( IsRule(key, t->ndim) ) return t->ndim < 1;
return t->ndim < KOROBOV_MINDIM || t->ndim > KOROBOV_MAXDIM;
}
static inline bool BadComponent(cThis *t)
{
if( t->ncomp > NCOMP ) return true;
return t->ncomp < 1;
}
#include "Integrate.c"
Cuba-3.0/src/divonne/decl.h 0000644 0000000 0000000 00000005130 11660147513 014240 0 ustar root root /*
decl.h
Type declarations
this file is part of Divonne
last modified 14 Nov 11 th
*/
#include "stddecl.h"
#define Tag(x) ((x) | INT_MIN)
#define Untag(x) ((x) & INT_MAX)
typedef struct {
real lower, upper;
} Bounds;
typedef const Bounds cBounds;
typedef struct {
real avg, err;
} PhaseResult;
typedef struct {
real avg, spreadsq;
real spread, secondspread;
real nneed, maxerrsq, mindevsq;
PhaseResult phase[2];
int iregion;
} Totals;
typedef struct {
void *first, *last;
real errcoeff[3];
count n;
} Rule;
typedef const Rule cRule;
typedef struct samples {
real *x, *f;
void (*sampler)(struct _this *t, ccount);
cRule *rule;
number n, neff;
count coeff;
} Samples;
typedef const Samples cSamples;
typedef struct {
real diff, err, spread;
} Errors;
typedef const Errors cErrors;
typedef int (*Integrand)(ccount *, creal *, ccount *, real *, void *, cint *);
typedef void (*PeakFinder)(ccount *, cBounds *, number *, real *);
typedef struct _this {
count ndim, ncomp;
#ifndef MLVERSION
Integrand integrand;
void *userdata;
PeakFinder peakfinder;
int ncores, *child;
int running, nchildren;
fd_set children;
#endif
real epsrel, epsabs;
int flags, seed;
number mineval, maxeval;
int key1, key2, key3;
count maxpass;
Bounds border;
real maxchisq, mindeviation;
number ngiven, nextra;
real *xgiven, *xextra, *fgiven, *fextra;
count ldxgiven;
count nregions;
number neval, neval_opt, neval_cut;
count phase;
count selectedcomp, size;
Samples samples[3];
Totals *totals;
Rule rule7, rule9, rule11, rule13;
RNGState rng;
void *voidregion;
jmp_buf abort;
} This;
typedef const This cThis;
#define TYPEDEFREGION \
typedef struct { \
real avg, err, spread, chisq; \
real fmin, fmax; \
real xmin[NDIM], xmax[NDIM]; \
} Result; \
typedef const Result cResult; \
typedef struct region { \
int depth, next; \
count isamples, cutcomp, xmajor; \
real fmajor, fminor, vol; \
Bounds bounds[NDIM]; \
Result result[NCOMP]; \
} Region
#define RegionPtr(n) (&((Region *)t->voidregion)[n])
#define CHUNKSIZE 4096
#define AllocRegions(t) \
MemAlloc((t)->voidregion, ((t)->size = CHUNKSIZE)*sizeof(Region))
#define EnlargeRegions(t, n) if( (t)->nregions + n > (t)->size ) \
ReAlloc((t)->voidregion, ((t)->size += CHUNKSIZE)*sizeof(Region))
#define SAMPLERDEFS \
TYPEDEFREGION; \
Region *region = RegionPtr(iregion); \
cBounds *b = region->bounds; \
Result *r = region->result; \
cSamples *samples = &t->samples[region->isamples]; \
real *x = samples->x, *f = samples->f; \
cnumber n = samples->n
Cuba-3.0/src/suave/Fluct.c 0000644 0000000 0000000 00000002564 11624752152 014073 0 ustar root root /*
Fluct.c
compute the fluctuation in the left and right half
this file is part of Suave
last modified 23 Aug 11 th
*/
#if defined(HAVE_LONG_DOUBLE) && defined(HAVE_POWL)
typedef long double realx;
#define XDBL_MAX_EXP LDBL_MAX_EXP
#define XDBL_MAX LDBL_MAX
#define powx powl
#define ldexpx ldexpl
#else
typedef double realx;
#define XDBL_MAX_EXP DBL_MAX_EXP
#define XDBL_MAX DBL_MAX
#define powx pow
#define ldexpx ldexp
#endif
typedef const realx crealx;
typedef struct {
realx fluct;
number n;
} Var;
/*********************************************************************/
static void Fluct(cThis *t, Var *var,
cBounds *b, creal *w, number n, ccount comp, creal avg, creal err)
{
creal *x = w + n;
creal *f = x + n*t->ndim + comp;
count nvar = 2*t->ndim;
creal norm = 1/(err*Max(fabs(avg), err));
creal flat = 2/3./t->flatness;
crealx max = ldexpx(1., (int)((XDBL_MAX_EXP - 2)/t->flatness));
Clear(var, nvar);
while( n-- ) {
count dim;
crealx arg = 1 + fabs(*w++)*Sq(*f - avg)*norm;
crealx ft = powx(arg < max ? arg : max, t->flatness);
f += t->ncomp;
for( dim = 0; dim < t->ndim; ++dim ) {
Var *v = &var[2*dim + (*x++ >= b[dim].mid)];
crealx f = v->fluct + ft;
v->fluct = (f > XDBL_MAX/2) ? XDBL_MAX/2 : f;
++v->n;
}
}
while( nvar-- ) {
var->fluct = powx(var->fluct, flat);
++var;
}
}
Cuba-3.0/src/suave/Grid.c 0000644 0000000 0000000 00000005757 11401212262 013674 0 ustar root root /*
Grid.c
utility functions for the Vegas grid
this file is part of Suave
last modified 1 Jun 10 th
*/
static void RefineGrid(cThis *t, Grid grid, Grid margsum)
{
real avgperbin, thisbin, newcur, delta;
Grid imp, newgrid;
int bin, newbin;
/* smooth the f^2 value stored for each bin */
real prev = margsum[0];
real cur = margsum[1];
real norm = margsum[0] = .5*(prev + cur);
for( bin = 1; bin < NBINS - 1; ++bin ) {
creal s = prev + cur;
prev = cur;
cur = margsum[bin + 1];
norm += margsum[bin] = (s + cur)/3.;
}
norm += margsum[NBINS - 1] = .5*(prev + cur);
if( norm == 0 ) return;
norm = 1/norm;
/* compute the importance function for each bin */
avgperbin = 0;
for( bin = 0; bin < NBINS; ++bin ) {
real impfun = 0;
if( margsum[bin] > 0 ) {
creal r = margsum[bin]*norm;
avgperbin += impfun = pow((r - 1)/log(r), 1.5);
}
imp[bin] = impfun;
}
avgperbin /= NBINS;
/* redefine the size of each bin */
cur = newcur = 0;
thisbin = 0;
bin = -1;
for( newbin = 0; newbin < NBINS - 1; ++newbin ) {
while( thisbin < avgperbin ) {
thisbin += imp[++bin];
prev = cur;
cur = grid[bin];
}
thisbin -= avgperbin;
delta = (cur - prev)*thisbin;
newgrid[newbin] = SHARPEDGES ?
cur - delta/imp[bin] :
(newcur = Max(newcur + 0x1p-48,
cur - 2*delta/(imp[bin] + imp[IDim(bin - 1)])));
}
Copy(grid, newgrid, NBINS - 1);
grid[NBINS - 1] = 1;
}
/*********************************************************************/
static void Reweight(cThis *t, Bounds *b,
creal *w, creal *f, creal *lastf, cResult *total)
{
Grid margsum[NDIM];
real scale[NCOMP];
cbin_t *bin = (cbin_t *)lastf;
count dim, comp;
if( t->ncomp == 1 ) scale[0] = 1;
else {
for( comp = 0; comp < t->ncomp; ++comp )
scale[comp] = (total[comp].avg == 0) ? 0 : 1/total[comp].avg;
}
Zap(margsum);
while( f < lastf ) {
real fsq = 0;
for( comp = 0; comp < t->ncomp; ++comp )
fsq += Sq(*f++*scale[comp]);
fsq *= Sq(*w++);
if( fsq != 0 )
for( dim = 0; dim < t->ndim; ++dim )
margsum[dim][bin[dim]] += fsq;
bin += t->ndim;
}
for( dim = 0; dim < t->ndim; ++dim )
RefineGrid(t, b[dim].grid, margsum[dim]);
}
/*********************************************************************/
static void StretchGrid(cGrid grid, Grid gridL, Grid gridR)
{
real prev = 0, cur, step, x;
count bin = 0;
while( bin < NBINS ) {
cur = grid[bin++];
if( cur >= .5 ) break;
prev = cur;
}
step = (bin - (cur - .5)/(cur - prev))/NBINS;
prev = x = 0;
cur = *grid;
for( bin = 0; bin < NBINS; ++bin ) {
x += step;
if( x > 1 ) {
--x;
prev = cur;
cur = *++grid;
}
gridL[bin] = 2*(prev + (cur - prev)*x);
}
step = 1 - step;
for( bin = 0; bin < NBINS - 1; ++bin ) {
x += step;
if( x > 1 ) {
--x;
prev = cur;
cur = *++grid;
}
gridR[bin] = 2*(prev + (cur - prev)*x) - 1;
}
gridR[NBINS - 1] = 1;
}
Cuba-3.0/src/suave/Integrate.c 0000644 0000000 0000000 00000016375 11526453134 014744 0 ustar root root /*
Integrate.c
integrate over the unit hypercube
this file is part of Suave
last modified 15 Feb 11 th
*/
static int Integrate(This *t, real *integral, real *error, real *prob)
{
TYPEDEFREGION;
count dim, comp, df;
int fail;
Result totals[NCOMP];
Region *anchor = NULL, *region = NULL;
if( VERBOSE > 1 ) {
char s[256];
sprintf(s, "Suave input parameters:\n"
" ndim " COUNT "\n ncomp " COUNT "\n"
" epsrel " REAL "\n epsabs " REAL "\n"
" flags %d\n seed %d\n"
" mineval " NUMBER "\n maxeval " NUMBER "\n"
" nnew " NUMBER "\n flatness " REAL,
t->ndim, t->ncomp,
t->epsrel, t->epsabs,
t->flags, t->seed,
t->mineval, t->maxeval,
t->nnew, t->flatness);
Print(s);
}
if( BadComponent(t) ) return -2;
if( BadDimension(t) ) return -1;
if( (fail = setjmp(t->abort)) ) goto abort;
t->epsabs = Max(t->epsabs, NOTZERO);
IniRandom(t);
RegionAlloc(anchor, t->nnew, t->nnew);
anchor->next = NULL;
anchor->div = 0;
for( dim = 0; dim < t->ndim; ++dim ) {
Bounds *b = &anchor->bounds[dim];
b->lower = 0;
b->upper = 1;
b->mid = .5;
if( dim == 0 ) {
count bin;
/* define the initial distribution of bins */
for( bin = 0; bin < NBINS; ++bin )
b->grid[bin] = (bin + 1)/(real)NBINS;
}
else Copy(b->grid, anchor->bounds[0].grid, NBINS);
}
Sample(t, t->nnew, anchor, anchor->w,
anchor->w + t->nnew,
anchor->w + t->nnew + t->ndim*t->nnew);
df = anchor->df;
ResCopy(totals, anchor->result);
for( t->nregions = 1; ; ++t->nregions ) {
Var var[NDIM][2], *vLR;
real maxratio, maxerr, minfluct, bias, mid;
Region *regionL, *regionR, *reg, **parent, **par;
Bounds *bounds, *boundsL, *boundsR;
count maxcomp, bisectdim;
number n, nL, nR, nnewL, nnewR;
real *w, *wL, *wR, *x, *xL, *xR, *f, *fL, *fR, *wlast, *flast;
if( VERBOSE ) {
char s[128 + 128*NCOMP], *p = s;
p += sprintf(p, "\n"
"Iteration " COUNT ": " NUMBER " integrand evaluations so far",
t->nregions, t->neval);
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *tot = &totals[comp];
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL " \tchisq " REAL " (" COUNT " df)",
comp + 1, tot->avg, tot->err, tot->chisq, df);
}
Print(s);
}
maxratio = -INFTY;
maxcomp = 0;
for( comp = 0; comp < t->ncomp; ++comp ) {
creal ratio = totals[comp].err/MaxErr(totals[comp].avg);
if( ratio > maxratio ) {
maxratio = ratio;
maxcomp = comp;
}
}
if( maxratio <= 1 && t->neval >= t->mineval ) {
fail = 0;
break;
}
if( t->neval >= t->maxeval ) break;
maxerr = -INFTY;
parent = &anchor;
region = anchor;
for( par = &anchor; (reg = *par); par = ®->next ) {
creal err = reg->result[maxcomp].err;
if( err > maxerr ) {
maxerr = err;
parent = par;
region = reg;
}
}
Fluct(t, var[0],
region->bounds, region->w, region->n, maxcomp,
region->result[maxcomp].avg, Max(maxerr, t->epsabs));
bias = (t->epsrel < 1e-50) ? 2 :
Max(pow(2., -(real)region->div/t->ndim)/t->epsrel, 2.);
minfluct = INFTY;
bisectdim = 0;
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
creal fluct = (var[dim][0].fluct + var[dim][1].fluct)*
(bias - b->upper + b->lower);
if( fluct < minfluct ) {
minfluct = fluct;
bisectdim = dim;
}
}
vLR = var[bisectdim];
minfluct = vLR[0].fluct + vLR[1].fluct;
nnewL = IMax(
(minfluct == 0) ? t->nnew/2 : (count)(vLR[0].fluct/minfluct*t->nnew),
MINSAMPLES );
nL = vLR[0].n + nnewL;
nnewR = IMax(t->nnew - nnewL, MINSAMPLES);
nR = vLR[1].n + nnewR;
RegionAlloc(regionL, nL, nnewL);
RegionAlloc(regionR, nR, nnewR);
*parent = regionL;
regionL->next = regionR;
regionR->next = region->next;
regionL->div = regionR->div = region->div + 1;
bounds = ®ion->bounds[bisectdim];
mid = bounds->mid;
n = region->n;
w = wlast = region->w; x = w + n; f = flast = x + n*t->ndim;
wL = regionL->w; xL = wL + nL; fL = xL + nL*t->ndim;
wR = regionR->w; xR = wR + nR; fR = xR + nR*t->ndim;
while( n-- ) {
cbool final = (*w < 0);
if( x[bisectdim] < mid ) {
if( final && wR > regionR->w ) *(wR - 1) = -fabs(*(wR - 1));
*wL++ = *w++;
VecCopy(xL, x);
xL += t->ndim;
ResCopy(fL, f);
fL += t->ncomp;
}
else {
if( final && wL > regionL->w ) *(wL - 1) = -fabs(*(wL - 1));
*wR++ = *w++;
VecCopy(xR, x);
xR += t->ndim;
ResCopy(fR, f);
fR += t->ncomp;
}
x += t->ndim;
f += t->ncomp;
if( n && final ) wlast = w, flast = f;
}
Reweight(t, region->bounds, wlast, flast, f, totals);
VecCopy(regionL->bounds, region->bounds);
VecCopy(regionR->bounds, region->bounds);
boundsL = ®ionL->bounds[bisectdim];
boundsR = ®ionR->bounds[bisectdim];
boundsL->mid = .5*(boundsL->lower + (boundsL->upper = mid));
boundsR->mid = .5*((boundsR->lower = mid) + boundsR->upper);
StretchGrid(bounds->grid, boundsL->grid, boundsR->grid);
Sample(t, nnewL, regionL, wL, xL, fL);
Sample(t, nnewR, regionR, wR, xR, fR);
df += regionL->df + regionR->df - region->df;
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
Result *rL = ®ionL->result[comp];
Result *rR = ®ionR->result[comp];
Result *tot = &totals[comp];
real diff, sigsq;
tot->avg += diff = rL->avg + rR->avg - r->avg;
diff = Sq(.25*diff);
sigsq = rL->sigsq + rR->sigsq;
if( sigsq > 0 ) {
creal c = Sq(1 + sqrt(diff/sigsq));
rL->sigsq *= c;
rR->sigsq *= c;
}
rL->err = sqrt(rL->sigsq += diff);
rR->err = sqrt(rR->sigsq += diff);
tot->sigsq += rL->sigsq + rR->sigsq - r->sigsq;
tot->err = sqrt(tot->sigsq);
tot->chisq += rL->chisq + rR->chisq - r->chisq;
}
free(region);
region = NULL;
}
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *tot = &totals[comp];
integral[comp] = tot->avg;
error[comp] = tot->err;
prob[comp] = ChiSquare(tot->chisq, df);
}
#ifdef MLVERSION
if( REGIONS ) {
MLPutFunction(stdlink, "List", 2);
MLPutFunction(stdlink, "List", t->nregions);
for( region = anchor; region; region = region->next ) {
real lower[NDIM], upper[NDIM];
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
lower[dim] = b->lower;
upper[dim] = b->upper;
}
MLPutFunction(stdlink, "Cuba`Suave`region", 4);
MLPutRealList(stdlink, lower, t->ndim);
MLPutRealList(stdlink, upper, t->ndim);
MLPutFunction(stdlink, "List", t->ncomp);
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
real res[] = {r->avg, r->err, r->chisq};
MLPutRealList(stdlink, res, Elements(res));
}
MLPutInteger(stdlink, region->df);
}
}
#endif
abort:
free(region);
while( (region = anchor) ) {
anchor = anchor->next;
free(region);
}
return fail;
}
Cuba-3.0/src/suave/Sample.c 0000644 0000000 0000000 00000010571 11621173266 014234 0 ustar root root /*
Sample.c
the sampling step of Suave
this file is part of Suave
last modified 12 Aug 11 th
*/
typedef struct {
real sum, sqsum;
real weight, weightsum, avg, avgsum;
real guess, chisum, chisqsum;
} Cumulants;
/*********************************************************************/
static void Sample(This *t, cnumber nnew, void *voidregion,
real *lastw, real *lastx, real *lastf)
{
TYPEDEFREGION;
Region *const region = (Region *)voidregion;
count comp, dim, df;
number n;
Cumulants cumul[NCOMP];
char **ss, *s;
ccount chars = 128*(region->div + 1);
creal jacobian = 1/ldexp((real)nnew, region->div);
real *w = lastw, *f = lastx;
bin_t *bin = (bin_t *)(lastf + nnew*t->ncomp);
for( n = nnew; n; --n ) {
real weight = jacobian;
t->rng.getrandom(t, f);
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
creal pos = *f*NBINS;
ccount ipos = (count)pos;
creal prev = (ipos == 0) ? 0 : b->grid[ipos - 1];
creal diff = b->grid[ipos] - prev;
*f++ = b->lower + (prev + (pos - ipos)*diff)*(b->upper - b->lower);
*bin++ = ipos;
weight *= diff*NBINS;
}
*w++ = weight;
}
DoSample(t, nnew, lastx, lastf, lastw, region->div + 1);
w[-1] = -w[-1];
lastw = w;
w = region->w;
region->n = lastw - w;
if( VERBOSE > 2 ) {
char *p0;
MemAlloc(ss, t->ndim*64 + t->ncomp*(sizeof(char *) + chars));
s = (char *)(ss + t->ncomp);
p0 = s + t->ndim*64;
for( comp = 0; comp < t->ncomp; ++comp ) {
ss[comp] = p0;
p0 += chars;
}
}
Zap(cumul);
df = n = 0;
while( w < lastw ) {
cbool final = (*w < 0);
creal weight = fabs(*w++);
++n;
for( comp = 0; comp < t->ncomp; ++comp ) {
Cumulants *c = &cumul[comp];
creal wfun = weight*(*f++);
c->sum += wfun;
c->sqsum += Sq(wfun);
if( final ) {
if( n > 1 ) {
real w = Weight(c->sum, c->sqsum, n);
c->weightsum += c->weight = w;
c->avgsum += c->avg = w*c->sum;
if( VERBOSE > 2 ) {
creal sig = sqrt(1/w);
ss[comp] += (df == 0) ?
sprintf(ss[comp], "\n[" COUNT "] "
REAL " +- " REAL " (" NUMBER ")", comp + 1,
c->sum, sig, n) :
sprintf(ss[comp], "\n "
REAL " +- " REAL " (" NUMBER ")",
c->sum, sig, n);
}
if( df == 0 ) c->guess = c->sum;
else {
c->chisum += w *= c->sum - c->guess;
c->chisqsum += w*c->sum;
}
}
c->sum = c->sqsum = 0;
}
}
if( final ) ++df, n = 0;
}
region->df = --df;
for( comp = 0; comp < t->ncomp; ++comp ) {
Result *r = ®ion->result[comp];
Cumulants *c = &cumul[comp];
creal sigsq = 1/c->weightsum;
creal avg = sigsq*c->avgsum;
if( LAST ) {
r->sigsq = 1/c->weight;
r->avg = r->sigsq*c->avg;
}
else {
r->sigsq = sigsq;
r->avg = avg;
}
r->err = sqrt(r->sigsq);
r->chisq = (sigsq < .9*NOTZERO) ? 0 : c->chisqsum - avg*c->chisum;
/* This catches the special case where the integrand is constant
over the entire region. Unless that constant is zero, only the
first set of samples will have zero variance, and hence weight
(n - 1) 1e30 (see above). All other sets have been sampled
from a non-constant weight function and therefore inevitably
show some variance. This is an artificial effect, brought about
by the fact that the constancy of the integrand in the region is
seen only in this subdivision, and can degrade the chi-square
score quite a bit. If the constancy was determined from more
than two samples (hence .9*NOTZERO), the chi-squares from the
other sets are removed here. */
}
if( VERBOSE > 2 ) {
char *p = s;
char *p0 = p + t->ndim*64;
for( dim = 0; dim < t->ndim; ++dim ) {
cBounds *b = ®ion->bounds[dim];
p += sprintf(p,
(dim == 0) ? "\nRegion (" REALF ") - (" REALF ")" :
"\n (" REALF ") - (" REALF ")",
b->lower, b->upper);
}
for( comp = 0; comp < t->ncomp; ++comp ) {
cResult *r = ®ion->result[comp];
p += sprintf(p, "%s \tchisq " REAL " (" COUNT " df)",
p0, r->chisq, df);
p0 += chars;
}
Print(s);
free(ss);
}
}
Cuba-3.0/src/suave/Suave.c 0000644 0000000 0000000 00000003670 11640313271 014071 0 ustar root root /*
Suave.c
Subregion-adaptive Vegas Monte-Carlo integration
by Thomas Hahn
last modified 27 Sep 11 th
*/
#include "decl.h"
#define Print(s) puts(s); fflush(stdout)
/*********************************************************************/
#define SUAVE
#include "DoSample.c"
/*********************************************************************/
#include "common.c"
Extern void EXPORT(Suave)(ccount ndim, ccount ncomp,
Integrand integrand, void *userdata,
creal epsrel, creal epsabs,
cint flags, cint seed,
cnumber mineval, cnumber maxeval,
cnumber nnew, creal flatness,
count *pnregions, number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.seed = seed;
t.mineval = mineval;
t.maxeval = maxeval;
t.nnew = nnew;
t.flatness = flatness;
t.nregions = 0;
t.neval = 0;
ForkCores(&t);
*pfail = Integrate(&t, integral, error, prob);
*pnregions = t.nregions;
*pneval = t.neval;
WaitCores(&t);
}
/*********************************************************************/
Extern void EXPORT(suave)(ccount *pndim, ccount *pncomp,
Integrand integrand, void *userdata,
creal *pepsrel, creal *pepsabs,
cint *pflags, cint *pseed,
cnumber *pmineval, cnumber *pmaxeval,
cnumber *pnnew, creal *pflatness,
count *pnregions, number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = *pndim;
t.ncomp = *pncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = *pepsrel;
t.epsabs = *pepsabs;
t.flags = *pflags;
t.seed = *pseed;
t.mineval = *pmineval;
t.maxeval = *pmaxeval;
t.nnew = *pnnew;
t.flatness = *pflatness;
t.nregions = 0;
t.neval = 0;
ForkCores(&t);
*pfail = Integrate(&t, integral, error, prob);
*pnregions = t.nregions;
*pneval = t.neval;
WaitCores(&t);
}
Cuba-3.0/src/suave/Suave.tm 0000644 0000000 0000000 00000022630 11621173323 014265 0 ustar root root :Evaluate: BeginPackage["Cuba`"]
:Evaluate: Suave::usage =
"Suave[f, {x, xmin, xmax}..] computes a numerical approximation to the integral of the real scalar or vector function f.
The output is a list with entries of the form {integral, error, chi-square probability} for each component of the integrand."
:Evaluate: NNew::usage = "NNew is an option of Suave.
It specifies the number of new integrand evaluations in each subdivision."
:Evaluate: Flatness::usage = "Flatness is an option of Suave.
It determines how prominently individual samples with a large fluctuation figure in the total fluctuation, which in turn determines how a region is split up.
Explicitly, if F[i] is the individual fluctuation of sample i, the total fluctuation is computed as Sum[(1 + F[i])^p, {i, nsamples}]^(2/3/p), i.e. as the p-norm of the fluctuation vector to the power 2/3, where p is the number given by Flatness.
Thus with increasing p, the fluctuation becomes more and more dominated by outliers, i.e. points with a large fluctuation.
As suggested by the name Flatness, p should be chosen large for `flat' integrands and small for `volatile' integrands with high peaks.
Note that since p appears in the exponent, one should not use too large values (say, no more than a few hundred) lest terms be truncated internally to prevent overflow."
:Evaluate: MinPoints::usage = "MinPoints is an option of Suave.
It specifies the minimum number of points to sample."
:Evaluate: Final::usage = "Final is an option of Suave.
It can take the values Last or All which determine whether only the last (largest) or all sets of samples collected on a subregion over the iterations contribute to the final result."
:Evaluate: PseudoRandom::usage = "PseudoRandom is an option of Suave.
It can take the following values:
False for Sobol quasi-random numbers (default),
True or 0 for Mersenne Twister pseudo-random numbers,
any other integer value n for Ranlux pseudo-random numbers of luxury level n."
:Evaluate: PseudoRandomSeed::usage = "PseudoRandomSeed is an option of Suave.
It specifies the seed for the pseudo-random number generator."
:Evaluate: SharpEdges::usage = "SharpEdges is an option of Suave.
It turns off smoothing of the importance function for integrands with sharp edges."
:Evaluate: Regions::usage = "Regions is an option of Suave.
It specifies whether the regions into which the integration region has been cut are returned together with the integration results."
:Evaluate: Region::usage = "Region[ll, ur, res, df] describes a subregion:
ll and ur are multidimensional equivalents of the region's lower left and upper right corner.
res gives the integration results for the region in a list with entries of the form {integral, error, chi-square} for each component of the integrand.
df is the number of degrees of freedom corresponding to the chi-square values in res."
:Evaluate: $Weight::usage = "$Weight is a global variable set by Suave during the evaluation of the integrand to the weight of the point being sampled."
:Evaluate: $Iteration::usage = "$Iteration is a global variable set by Suave during the evaluation of the integrand to the present iteration number."
:Evaluate: MapSample::usage = "MapSample is a function used to map the integrand over the points to be sampled."
:Evaluate: Begin["`Suave`"]
:Begin:
:Function: Suave
:Pattern: MLSuave[ndim_, ncomp_,
epsrel_, epsabs_, flags_, seed_,
mineval_, maxeval_,
nnew_, flatness_]
:Arguments: {ndim, ncomp,
epsrel, epsabs, flags, seed,
mineval, maxeval,
nnew, flatness}
:ArgumentTypes: {Integer, Integer,
Real, Real, Integer, Integer,
Integer, Integer,
Integer, Real}
:ReturnType: Manual
:End:
:Evaluate: Attributes[Suave] = {HoldFirst}
:Evaluate: Options[Suave] = {PrecisionGoal -> 3, AccuracyGoal -> 12,
MinPoints -> 0, MaxPoints -> 50000, NNew -> 1000, Flatness -> 50,
Verbose -> 1, Final -> Last,
PseudoRandom -> False, PseudoRandomSeed -> 5489,
SharpEdges -> False, Regions -> False, Compiled -> True}
:Evaluate: Suave[f_, v:{_, _, _}.., opt___Rule] :=
Block[ {ff = HoldForm[f], ndim = Length[{v}], ncomp,
tags, vars, lower, range, jac, tmp, defs, intT,
rel, abs, mineval, maxeval, nnew, flatness,
verbose, final, level, seed, edges, regions, compiled,
$Weight, $Iteration},
Message[Suave::optx, #, Suave]&/@
Complement[First/@ {opt}, tags = First/@ Options[Suave]];
{rel, abs, mineval, maxeval, nnew, flatness,
verbose, final, level, seed, edges, regions, compiled} =
tags /. {opt} /. Options[Suave];
{vars, lower, range} = Transpose[{v}];
jac = Simplify[Times@@ (range -= lower)];
tmp = Array[tmpvar, ndim];
defs = Simplify[lower + range tmp];
Block[{Set}, define[compiled, tmp, Thread[vars = defs], jac]];
intT = integrandT[f];
Block[#,
ncomp = Length[intT@@ RandomReal[1, ndim]];
MLSuave[ndim, ncomp, 10.^-rel, 10.^-abs,
Min[Max[verbose, 0], 3] +
If[final === Last, 4, 0] +
If[TrueQ[edges], 8, 0] +
If[TrueQ[regions], 128, 0] +
If[IntegerQ[level], 256 level, 0],
If[level =!= False && IntegerQ[seed], seed, 0],
mineval, maxeval,
nnew, flatness]
]& @ vars
]
:Evaluate: tmpvar[n_] := ToExpression["Cuba`Suave`t" <> ToString[n]]
:Evaluate: Attributes[foo] = {HoldAll}
:Evaluate: define[True, tmp_, defs_, jac_] := (
TtoX := TtoX = Compile[tmp, defs];
integrandT[f_] := Compile[tmp, eval[defs, Chop[f jac]//N],
{{_eval, _Real, 1}}] )
:Evaluate: define[_, tmp_, defs_, jac_] := (
TtoX := TtoX = Function[tmp, defs];
integrandT[f_] := Function[tmp, eval[defs, Chop[f jac]//N]] )
:Evaluate: eval[_, f_Real] = {f}
:Evaluate: eval[_, f:{__Real}] = f
:Evaluate: eval[x_, _] := (Message[Suave::badsample, ff, x]; {})
:Evaluate: sample[x_, w_, iter_] := (
$Iteration = iter;
Check[Flatten @ MapSample[
($Weight = #[[1]]; intT@@ #[[2]])&,
Transpose[{w, Partition[x, ndim]}] ], {}] )
:Evaluate: MapSample = Map
:Evaluate: region[ll_, ur_, r___] := Region[TtoX@@ ll, TtoX@@ ur, r]
:Evaluate: Suave::badsample = "`` is not a real-valued function at ``."
:Evaluate: Suave::baddim = "Cannot integrate in `` dimensions."
:Evaluate: Suave::badcomp = "Cannot integrate `` components."
:Evaluate: Suave::accuracy =
"Desired accuracy was not reached within `` function evaluations on `` subregions."
:Evaluate: Suave::success = "Needed `` function evaluations on `` subregions."
:Evaluate: End[]
:Evaluate: EndPackage[]
/*
Suave.tm
Subregion-adaptive Vegas Monte Carlo integration
by Thomas Hahn
last modified 12 Aug 11 th
*/
#include "mathlink.h"
#include "decl.h"
/*********************************************************************/
static void Status(MLCONST char *msg, cint n1, cint n2)
{
MLPutFunction(stdlink, "CompoundExpression", 2);
MLPutFunction(stdlink, "Message", 3);
MLPutFunction(stdlink, "MessageName", 2);
MLPutSymbol(stdlink, "Suave");
MLPutString(stdlink, msg);
MLPutInteger(stdlink, n1);
MLPutInteger(stdlink, n2);
}
/*********************************************************************/
static void Print(MLCONST char *s)
{
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Print", 1);
MLPutString(stdlink, s);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
MLNewPacket(stdlink);
}
/*********************************************************************/
static void DoSample(This *t, cnumber n, real *x, real *f,
real *w, cint iter)
{
real *mma_f;
long mma_n;
if( MLAbort ) longjmp(t->abort, -99);
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Cuba`Suave`sample", 3);
MLPutRealList(stdlink, x, n*t->ndim);
MLPutRealList(stdlink, w, n);
MLPutInteger(stdlink, iter);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
if( !MLGetRealList(stdlink, &mma_f, &mma_n) ) {
MLClearError(stdlink);
MLNewPacket(stdlink);
longjmp(t->abort, -99);
}
if( mma_n != n*t->ncomp ) {
MLDisownRealList(stdlink, mma_f, mma_n);
longjmp(t->abort, -3);
}
Copy(f, mma_f, n*t->ncomp);
MLDisownRealList(stdlink, mma_f, mma_n);
t->neval += n;
}
/*********************************************************************/
#include "common.c"
static inline void DoIntegrate(This *t)
{
real integral[NCOMP], error[NCOMP], prob[NCOMP];
cint fail = Integrate(t, integral, error, prob);
if( fail < 0 ) {
switch( fail ) {
case -99:
MLPutFunction(stdlink, "Abort", 0);
return;
case -1:
Status("baddim", t->ndim, 0);
break;
case -2:
Status("badcomp", t->ncomp, 0);
break;
}
MLPutSymbol(stdlink, "$Failed");
}
else {
Status(fail ? "accuracy" : "success", t->neval, t->nregions);
MLPutFunction(stdlink, "Thread", 1);
MLPutFunction(stdlink, "List", 3);
MLPutRealList(stdlink, integral, t->ncomp);
MLPutRealList(stdlink, error, t->ncomp);
MLPutRealList(stdlink, prob, t->ncomp);
}
}
/*********************************************************************/
void Suave(cint ndim, cint ncomp,
creal epsrel, creal epsabs,
cint flags, cint seed,
cnumber mineval, cnumber maxeval,
cnumber nnew, creal flatness)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.seed = seed;
t.mineval = mineval;
t.maxeval = maxeval;
t.nnew = nnew;
t.flatness = flatness;
t.nregions = 0;
t.neval = 0;
DoIntegrate(&t);
MLEndPacket(stdlink);
}
/*********************************************************************/
int main(int argc, char **argv)
{
return MLMain(argc, argv);
}
Cuba-3.0/src/suave/common.c 0000644 0000000 0000000 00000001212 11401506617 014267 0 ustar root root /*
common.c
includes most of the modules
this file is part of Suave
last modified 2 Jun 10 th
*/
#define RegionAlloc(p, n, nnew) MemAlloc(p, \
sizeof(Region) + \
(n)*(t->ndim + t->ncomp + 1)*sizeof(real) + \
(nnew)*t->ndim*sizeof(bin_t))
static inline bool BadDimension(cThis *t)
{
if( t->ndim > NDIM ) return true;
return t->ndim < SOBOL_MINDIM ||
(t->seed == 0 && t->ndim > SOBOL_MAXDIM);
}
static inline bool BadComponent(cThis *t)
{
if( t->ncomp > NCOMP ) return true;
return t->ncomp < 1;
}
#include "Random.c"
#include "ChiSquare.c"
#include "Grid.c"
#include "Sample.c"
#include "Fluct.c"
#include "Integrate.c"
Cuba-3.0/src/suave/decl.h 0000644 0000000 0000000 00000002242 11642543044 013721 0 ustar root root /*
decl.h
Type declarations
this file is part of Suave
last modified 4 Oct 11 th
*/
#include "stddecl.h"
#define MINSAMPLES 10
#define NBINS 64
typedef unsigned char bin_t;
/* Note: bin_t must be wide enough to hold the numbers 0..NBINS */
typedef const bin_t cbin_t;
typedef real Grid[NBINS];
typedef const Grid cGrid;
typedef struct {
real avg, err, sigsq, chisq;
} Result;
typedef const Result cResult;
typedef struct {
real lower, upper, mid;
Grid grid;
} Bounds;
typedef const Bounds cBounds;
typedef int (*Integrand)(ccount *, creal *, ccount *, real *,
void *, creal *, cint *);
typedef struct _this {
count ndim, ncomp;
#ifndef MLVERSION
Integrand integrand;
void *userdata;
int ncores, *child;
#endif
real epsrel, epsabs;
int flags, seed;
number mineval, maxeval;
number nnew;
real flatness;
count nregions;
number neval;
RNGState rng;
jmp_buf abort;
} This;
typedef const This cThis;
#define TYPEDEFREGION \
typedef struct region { \
struct region *next; \
count div, df; \
number n; \
Result result[NCOMP]; \
Bounds bounds[NDIM]; \
real fluct[NCOMP][NDIM][2]; \
real w[]; \
} Region
Cuba-3.0/src/vegas/Grid.c 0000644 0000000 0000000 00000004562 11377667064 013701 0 ustar root root /*
Grid.c
utility functions for the Vegas grid
this file is part of Vegas
last modified 28 May 10 th
*/
static inline void GetGrid(cThis *t, Grid *grid)
{
count bin, dim;
unsigned const int slot = abs(t->gridno) - 1;
if( t->gridno < 0 && slot < MAXGRIDS ) griddim_[slot] = 0;
if( slot < MAXGRIDS && gridptr_[slot] ) {
if( griddim_[slot] == t->ndim ) {
VecCopy(grid, gridptr_[slot]);
return;
}
free(gridptr_[slot]);
gridptr_[slot] = NULL;
}
for( bin = 0; bin < NBINS; ++bin )
grid[0][bin] = (bin + 1)/(real)NBINS;
for( dim = 1; dim < t->ndim; ++dim )
Copy(&grid[dim], &grid[0], 1);
}
/*********************************************************************/
static inline void PutGrid(cThis *t, Grid *grid)
{
unsigned const int slot = abs(t->gridno) - 1;
if( slot < MAXGRIDS ) {
if( gridptr_[slot] == NULL ) Alloc(gridptr_[slot], t->ndim);
griddim_[slot] = t->ndim;
VecCopy(gridptr_[slot], grid);
}
}
/*********************************************************************/
static void RefineGrid(cThis *t, Grid grid, Grid margsum)
{
real avgperbin, thisbin, newcur, delta;
Grid imp, newgrid;
int bin, newbin;
/* smooth the f^2 value stored for each bin */
real prev = margsum[0];
real cur = margsum[1];
real norm = margsum[0] = .5*(prev + cur);
for( bin = 1; bin < NBINS - 1; ++bin ) {
creal s = prev + cur;
prev = cur;
cur = margsum[bin + 1];
norm += margsum[bin] = (s + cur)/3.;
}
norm += margsum[NBINS - 1] = .5*(prev + cur);
if( norm == 0 ) return;
norm = 1/norm;
/* compute the importance function for each bin */
avgperbin = 0;
for( bin = 0; bin < NBINS; ++bin ) {
real impfun = 0;
if( margsum[bin] > 0 ) {
creal r = margsum[bin]*norm;
avgperbin += impfun = pow((r - 1)/log(r), 1.5);
}
imp[bin] = impfun;
}
avgperbin /= NBINS;
/* redefine the size of each bin */
cur = newcur = 0;
thisbin = 0;
bin = -1;
for( newbin = 0; newbin < NBINS - 1; ++newbin ) {
while( thisbin < avgperbin ) {
thisbin += imp[++bin];
prev = cur;
cur = grid[bin];
}
thisbin -= avgperbin;
delta = (cur - prev)*thisbin;
newgrid[newbin] = SHARPEDGES ?
cur - delta/imp[bin] :
(newcur = Max(newcur,
cur - 2*delta/(imp[bin] + imp[IDim(bin - 1)])));
}
Copy(grid, newgrid, NBINS - 1);
grid[NBINS - 1] = 1;
}
Cuba-3.0/src/vegas/Integrate.c 0000644 0000000 0000000 00000013315 11623407752 014720 0 ustar root root /*
Integrate.c
integrate over the unit hypercube
this file is part of Vegas
last modified 19 Aug 11 th
*/
static int Integrate(This *t, real *integral, real *error, real *prob)
{
real *sample;
count dim, comp;
int fail;
struct {
count niter;
number nsamples, neval;
Cumulants cumul[NCOMP];
Grid grid[NDIM];
} state;
int statemsg = VERBOSE;
struct stat st;
if( VERBOSE > 1 ) {
char s[512];
sprintf(s, "Vegas input parameters:\n"
" ndim " COUNT "\n ncomp " COUNT "\n"
" epsrel " REAL "\n epsabs " REAL "\n"
" flags %d\n seed %d\n"
" mineval " NUMBER "\n maxeval " NUMBER "\n"
" nstart " NUMBER "\n nincrease " NUMBER "\n"
" nbatch " NUMBER "\n gridno %d\n"
" statefile \"%s\"",
t->ndim, t->ncomp,
t->epsrel, t->epsabs,
t->flags, t->seed,
t->mineval, t->maxeval,
t->nstart, t->nincrease, t->nbatch,
t->gridno, t->statefile);
Print(s);
}
if( BadComponent(t) ) return -2;
if( BadDimension(t) ) return -1;
SamplesAlloc(sample);
if( (fail = setjmp(t->abort)) ) goto abort;
IniRandom(t);
if( t->statefile && *t->statefile == 0 ) t->statefile = NULL;
if( t->statefile &&
stat(t->statefile, &st) == 0 &&
st.st_size == sizeof state && (st.st_mode & 0400) ) {
cint h = open(t->statefile, O_RDONLY);
read(h, &state, sizeof state);
close(h);
t->rng.skiprandom(t, t->neval = state.neval);
if( VERBOSE ) {
char s[256];
sprintf(s, "\nRestoring state from %s.", t->statefile);
Print(s);
}
}
else {
state.niter = 0;
state.nsamples = t->nstart;
Zap(state.cumul);
GetGrid(t, state.grid);
}
/* main iteration loop */
for( ; ; ) {
number nsamples = state.nsamples;
creal jacobian = 1./nsamples;
Grid margsum[NCOMP][NDIM];
Zap(margsum);
for( ; nsamples > 0; nsamples -= t->nbatch ) {
cnumber n = IMin(t->nbatch, nsamples);
real *w = sample;
real *x = w + n;
real *f = x + n*t->ndim;
real *lastf = f + n*t->ncomp;
bin_t *bin = (bin_t *)lastf;
while( x < f ) {
real weight = jacobian;
t->rng.getrandom(t, x);
for( dim = 0; dim < t->ndim; ++dim ) {
creal pos = *x*NBINS;
ccount ipos = (count)pos;
creal prev = (ipos == 0) ? 0 : state.grid[dim][ipos - 1];
creal diff = state.grid[dim][ipos] - prev;
*x++ = prev + (pos - ipos)*diff;
*bin++ = ipos;
weight *= diff*NBINS;
}
*w++ = weight;
}
DoSample(t, n, w, f, sample, state.niter + 1);
w = sample;
bin = (bin_t *)lastf;
while( f < lastf ) {
creal weight = *w++;
for( comp = 0; comp < t->ncomp; ++comp ) {
real wfun = weight*(*f++);
if( wfun ) {
Cumulants *c = &state.cumul[comp];
Grid *m = margsum[comp];
c->sum += wfun;
c->sqsum += wfun *= wfun;
for( dim = 0; dim < t->ndim; ++dim )
m[dim][bin[dim]] += wfun;
}
}
bin += t->ndim;
}
}
fail = 0;
/* compute the integral and error values */
for( comp = 0; comp < t->ncomp; ++comp ) {
Cumulants *c = &state.cumul[comp];
real avg, sigsq;
real w = Weight(c->sum, c->sqsum, state.nsamples);
sigsq = 1/(c->weightsum += w);
avg = sigsq*(c->avgsum += w*c->sum);
c->avg = LAST ? (sigsq = 1/w, c->sum) : avg;
c->err = sqrt(sigsq);
fail |= (c->err > MaxErr(c->avg));
if( state.niter == 0 ) c->guess = c->sum;
else {
c->chisum += w *= c->sum - c->guess;
c->chisqsum += w*c->sum;
}
c->chisq = c->chisqsum - avg*c->chisum;
c->sum = c->sqsum = 0;
}
if( VERBOSE ) {
char s[128 + 128*NCOMP], *p = s;
p += sprintf(p, "\n"
"Iteration " COUNT ": " NUMBER " integrand evaluations so far",
state.niter + 1, t->neval);
for( comp = 0; comp < t->ncomp; ++comp ) {
cCumulants *c = &state.cumul[comp];
p += sprintf(p, "\n[" COUNT "] "
REAL " +- " REAL " \tchisq " REAL " (" COUNT " df)",
comp + 1, c->avg, c->err, c->chisq, state.niter);
}
Print(s);
}
if( fail == 0 && t->neval >= t->mineval ) {
if( t->statefile ) unlink(t->statefile);
break;
}
if( t->neval >= t->maxeval && t->statefile == NULL ) break;
if( t->ncomp == 1 )
for( dim = 0; dim < t->ndim; ++dim )
RefineGrid(t, state.grid[dim], margsum[0][dim]);
else {
for( dim = 0; dim < t->ndim; ++dim ) {
Grid wmargsum;
Zap(wmargsum);
for( comp = 0; comp < t->ncomp; ++comp ) {
real w = state.cumul[comp].avg;
if( w != 0 ) {
creal *m = margsum[comp][dim];
count bin;
w = 1/Sq(w);
for( bin = 0; bin < NBINS; ++bin )
wmargsum[bin] += w*m[bin];
}
}
RefineGrid(t, state.grid[dim], wmargsum);
}
}
++state.niter;
state.nsamples += t->nincrease;
if( t->statefile ) {
cint h = creat(t->statefile, 0666);
if( h != -1 ) {
state.neval = t->neval;
write(h, &state, sizeof state);
close(h);
if( statemsg ) {
char s[256];
sprintf(s, "\nSaving state to %s.", t->statefile);
Print(s);
statemsg = false;
}
}
if( t->neval >= t->maxeval ) break;
}
}
for( comp = 0; comp < t->ncomp; ++comp ) {
cCumulants *c = &state.cumul[comp];
integral[comp] = c->avg;
error[comp] = c->err;
prob[comp] = ChiSquare(c->chisq, state.niter);
}
abort:
free(sample);
PutGrid(t, state.grid);
return fail;
}
Cuba-3.0/src/vegas/Vegas.c 0000644 0000000 0000000 00000004557 11640313254 014043 0 ustar root root /*
Vegas.c
Vegas Monte-Carlo integration
by Thomas Hahn
last modified 27 Sep 11 th
*/
#include "decl.h"
#define Print(s) puts(s); fflush(stdout)
/*********************************************************************/
#define VEGAS
#include "DoSample.c"
/*********************************************************************/
#include "common.c"
Extern void EXPORT(Vegas)(ccount ndim, ccount ncomp,
Integrand integrand, void *userdata,
creal epsrel, creal epsabs, cint flags, cint seed,
cnumber mineval, cnumber maxeval,
cnumber nstart, cnumber nincrease, cnumber nbatch,
cint gridno, cchar *statefile,
number *pneval, int *pfail,
real *integral, real *error, real *prob)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.seed = seed;
t.mineval = mineval;
t.maxeval = maxeval;
t.nstart = nstart;
t.nincrease = nincrease;
t.nbatch = nbatch;
t.gridno = gridno;
t.statefile = statefile;
t.neval = 0;
ForkCores(&t);
*pfail = Integrate(&t, integral, error, prob);
*pneval = t.neval;
WaitCores(&t);
}
/*********************************************************************/
Extern void EXPORT(vegas)(ccount *pndim, ccount *pncomp,
Integrand integrand, void *userdata,
creal *pepsrel, creal *pepsabs, cint *pflags, cint *pseed,
cnumber *pmineval, cnumber *pmaxeval,
cnumber *pnstart, cnumber *pnincrease,
cnumber *pnbatch, cint *pgridno, cchar *statefile,
number *pneval, int *pfail,
real *integral, real *error, real *prob, int statefilelen)
{
char *s = NULL;
This t;
t.ndim = *pndim;
t.ncomp = *pncomp;
t.integrand = integrand;
t.userdata = userdata;
t.epsrel = *pepsrel;
t.epsabs = *pepsabs;
t.flags = *pflags;
t.seed = *pseed;
t.mineval = *pmineval;
t.maxeval = *pmaxeval;
t.nstart = *pnstart;
t.nincrease = *pnincrease;
t.nbatch = *pnbatch;
t.gridno = *pgridno;
t.neval = 0;
if( statefile ) {
/* strip trailing spaces */
while( statefilelen > 0 && statefile[statefilelen - 1] == ' ' )
--statefilelen;
if( statefilelen > 0 && (s = malloc(statefilelen + 1)) ) {
memcpy(s, statefile, statefilelen);
s[statefilelen] = 0;
}
}
t.statefile = s;
ForkCores(&t);
*pfail = Integrate(&t, integral, error, prob);
*pneval = t.neval;
free(s);
WaitCores(&t);
}
Cuba-3.0/src/vegas/Vegas.tm 0000644 0000000 0000000 00000021515 11621173052 014231 0 ustar root root :Evaluate: BeginPackage["Cuba`"]
:Evaluate: Vegas::usage = "Vegas[f, {x, xmin, xmax}..] computes a numerical approximation to the integral of the real scalar or vector function f.
The output is a list with entries of the form {integral, error, chi-square probability} for each component of the integrand."
:Evaluate: NStart::usage = "NStart is an option of Vegas.
It specifies the number of integrand evaluations per iteration to start with."
:Evaluate: NIncrease::usage = "NIncrease is an option of Vegas.
It specifies the increase in the number of integrand evaluations per iteration."
:Evaluate: NBatch::usage = "NBatch is an option of Vegas.
It specifies how many points are sent in one MathLink packet to be sampled by Mathematica."
:Evaluate: GridNo::usage = "GridNo is an option of Vegas.
Vegas maintains an internal table in which it can memorize up to 10 grids, to be used on subsequent integrations.
A GridNo between 1 and 10 selects the slot in this internal table.
For other values the grid is initialized from scratch and discarded at the end of the integration."
:Evaluate: StateFile::usage = "StateFile is an option of Vegas.
It specifies a file in which the internal state is stored after each iteration and from which it can be restored on a subsequent run.
The state file is removed once the prescribed accuracy has been reached."
:Evaluate: MinPoints::usage = "MinPoints is an option of Vegas.
It specifies the minimum number of points to sample."
:Evaluate: Final::usage = "Final is an option of Vegas.
It can take the values Last or All which determine whether only the last (largest) or all of the samples collected on a subregion over the iterations contribute to the final result."
:Evaluate: PseudoRandom::usage = "PseudoRandom is an option of Vegas.
It can take the following values:
False for Sobol quasi-random numbers (default),
True or 0 for Mersenne Twister pseudo-random numbers,
any other integer value n for Ranlux pseudo-random numbers of luxury level n."
:Evaluate: PseudoRandomSeed::usage = "PseudoRandomSeed is an option of Vegas.
It specifies the seed for the pseudo-random number generator."
:Evaluate: SharpEdges::usage = "SharpEdges is an option of Vegas.
It turns off smoothing of the importance function for integrands with sharp edges."
:Evaluate: $Weight::usage = "$Weight is a global variable set by Vegas during the evaluation of the integrand to the weight of the point being sampled."
:Evaluate: $Iteration::usage = "$Iteration is a global variable set by Suave during the evaluation of the integrand to the present iteration number."
:Evaluate: MapSample::usage = "MapSample is a function used to map the integrand over the points to be sampled."
:Evaluate: Begin["`Vegas`"]
:Begin:
:Function: Vegas
:Pattern: MLVegas[ndim_, ncomp_,
epsrel_, epsabs_, flags_, seed_,
mineval_, maxeval_,
nstart_, nincrease_, nbatch_,
gridno_, statefile_]
:Arguments: {ndim, ncomp,
epsrel, epsabs, flags, seed,
mineval, maxeval,
nstart, nincrease, nbatch,
gridno, statefile}
:ArgumentTypes: {Integer, Integer,
Real, Real, Integer, Integer,
Integer, Integer,
Integer, Integer, Integer,
Integer, String}
:ReturnType: Manual
:End:
:Evaluate: Attributes[Vegas] = {HoldFirst}
:Evaluate: Options[Vegas] = {PrecisionGoal -> 3, AccuracyGoal -> 12,
MinPoints -> 0, MaxPoints -> 50000,
NStart -> 1000, NIncrease -> 500,
NBatch -> 1000, GridNo -> 0, StateFile -> "",
Verbose -> 1, Final -> All,
PseudoRandom -> False, PseudoRandomSeed -> 5489,
SharpEdges -> False, Compiled -> True}
:Evaluate: Vegas[f_, v:{_, _, _}.., opt___Rule] :=
Block[ {ff = HoldForm[f], ndim = Length[{v}], ncomp,
tags, vars, lower, range, jac, tmp, defs, intT,
rel, abs, mineval, maxeval, nstart, nincrease, nbatch,
gridno, verbose, final, level, seed, edges, compiled,
$Weight, $Iteration},
Message[Vegas::optx, #, Vegas]&/@
Complement[First/@ {opt}, tags = First/@ Options[Vegas]];
{rel, abs, mineval, maxeval, nstart, nincrease, nbatch,
gridno, state, verbose, final, level, seed, edges, compiled} =
tags /. {opt} /. Options[Vegas];
{vars, lower, range} = Transpose[{v}];
jac = Simplify[Times@@ (range -= lower)];
tmp = Array[tmpvar, ndim];
defs = Simplify[lower + range tmp];
Block[{Set}, define[compiled, tmp, Thread[vars = defs], jac]];
intT = integrandT[f];
Block[#,
ncomp = Length[intT@@ RandomReal[1, ndim]];
MLVegas[ndim, ncomp, 10.^-rel, 10.^-abs,
Min[Max[verbose, 0], 3] +
If[final === Last, 4, 0] +
If[TrueQ[edges], 8, 0]
If[IntegerQ[level], 256 level, 0],
If[level =!= False && IntegerQ[seed], seed, 0],
mineval, maxeval,
nstart, nincrease, nbatch,
gridno, state]
]& @ vars
]
:Evaluate: tmpvar[n_] := ToExpression["Cuba`Vegas`t" <> ToString[n]]
:Evaluate: Attributes[foo] = {HoldAll}
:Evaluate: define[True, tmp_, defs_, jac_] :=
integrandT[f_] := Compile[tmp, eval[defs, Chop[f jac]//N],
{{_eval, _Real, 1}}]
:Evaluate: define[_, tmp_, defs_, jac_] :=
integrandT[f_] := Function[tmp, eval[defs, Chop[f jac]//N]]
:Evaluate: eval[_, f_Real] = {f}
:Evaluate: eval[_, f:{__Real}] = f
:Evaluate: eval[x_, _] := (Message[Vegas::badsample, ff, x]; {})
:Evaluate: sample[x_, w_, iter_] := (
$Iteration = iter;
Check[Flatten @ MapSample[
($Weight = #[[1]]; intT@@ #[[2]])&,
Transpose[{w, Partition[x, ndim]}] ], {}] )
:Evaluate: MapSample = Map
:Evaluate: Vegas::badsample = "`` is not a real-valued function at ``."
:Evaluate: Vegas::baddim = "Cannot integrate in `` dimensions."
:Evaluate: Vegas::badcomp = "Cannot integrate `` components."
:Evaluate: Vegas::accuracy =
"Desired accuracy was not reached within `` function evaluations."
:Evaluate: Vegas::success = "Needed `` function evaluations."
:Evaluate: End[]
:Evaluate: EndPackage[]
/*
Vegas.tm
Vegas Monte Carlo integration
by Thomas Hahn
last modified 12 Aug 11 th
*/
#include "mathlink.h"
#include "decl.h"
/*********************************************************************/
static void Status(MLCONST char *msg, cint n)
{
MLPutFunction(stdlink, "CompoundExpression", 2);
MLPutFunction(stdlink, "Message", 2);
MLPutFunction(stdlink, "MessageName", 2);
MLPutSymbol(stdlink, "Vegas");
MLPutString(stdlink, msg);
MLPutInteger(stdlink, n);
}
/*********************************************************************/
static void Print(MLCONST char *s)
{
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Print", 1);
MLPutString(stdlink, s);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
MLNewPacket(stdlink);
}
/*********************************************************************/
static void DoSample(This *t, cnumber n, real *x, real *f,
real *w, cint iter)
{
real *mma_f;
long mma_n;
if( MLAbort ) longjmp(t->abort, -99);
MLPutFunction(stdlink, "EvaluatePacket", 1);
MLPutFunction(stdlink, "Cuba`Vegas`sample", 3);
MLPutRealList(stdlink, x, n*t->ndim);
MLPutRealList(stdlink, w, n);
MLPutInteger(stdlink, iter);
MLEndPacket(stdlink);
MLNextPacket(stdlink);
if( !MLGetRealList(stdlink, &mma_f, &mma_n) ) {
MLClearError(stdlink);
MLNewPacket(stdlink);
longjmp(t->abort, -99);
}
if( mma_n != n*t->ncomp ) {
MLDisownRealList(stdlink, mma_f, mma_n);
longjmp(t->abort, -3);
}
Copy(f, mma_f, n*t->ncomp);
MLDisownRealList(stdlink, mma_f, mma_n);
t->neval += n;
}
/*********************************************************************/
#include "common.c"
static inline void DoIntegrate(This *t)
{
real integral[NCOMP], error[NCOMP], prob[NCOMP];
cint fail = Integrate(t, integral, error, prob);
if( fail < 0 ) {
switch( fail ) {
case -99:
MLPutFunction(stdlink, "Abort", 0);
return;
case -1:
Status("baddim", t->ndim);
break;
case -2:
Status("badcomp", t->ncomp);
break;
}
MLPutSymbol(stdlink, "$Failed");
}
else {
Status(fail ? "accuracy" : "success", t->neval);
MLPutFunction(stdlink, "Thread", 1);
MLPutFunction(stdlink, "List", 3);
MLPutRealList(stdlink, integral, t->ncomp);
MLPutRealList(stdlink, error, t->ncomp);
MLPutRealList(stdlink, prob, t->ncomp);
}
}
/*********************************************************************/
void Vegas(cint ndim, cint ncomp,
creal epsrel, creal epsabs,
cint flags, cint seed,
cnumber mineval, cnumber maxeval,
cnumber nstart, cnumber nincrease, cint nbatch,
cint gridno, cchar *statefile)
{
This t;
t.ndim = ndim;
t.ncomp = ncomp;
t.epsrel = epsrel;
t.epsabs = epsabs;
t.flags = flags;
t.seed = seed;
t.mineval = mineval;
t.maxeval = maxeval;
t.nstart = nstart;
t.nincrease = nincrease;
t.nbatch = nbatch;
t.gridno = gridno;
t.statefile = statefile;
t.neval = 0;
DoIntegrate(&t);
MLEndPacket(stdlink);
}
/*********************************************************************/
int main(int argc, char **argv)
{
return MLMain(argc, argv);
}
Cuba-3.0/src/vegas/common.c 0000644 0000000 0000000 00000001132 11402651424 014250 0 ustar root root /*
common.c
Code common to Vegas.c and Vegas.tm
this file is part of Vegas
last modified 6 Jun 10 th
*/
#include "Random.c"
#include "ChiSquare.c"
#include "Grid.c"
#define SamplesAlloc(p) MemAlloc(p, \
t->nbatch*((t->ndim + t->ncomp + 1)*sizeof(real) + \
t->ndim*sizeof(bin_t)))
static inline bool BadDimension(cThis *t)
{
if( t->ndim > NDIM ) return true;
return t->ndim < SOBOL_MINDIM ||
(t->seed == 0 && t->ndim > SOBOL_MAXDIM);
}
static inline bool BadComponent(cThis *t)
{
if( t->ncomp > NCOMP ) return true;
return t->ncomp < 1;
}
#include "Integrate.c"
Cuba-3.0/src/vegas/decl.h 0000644 0000000 0000000 00000001737 11642543013 013707 0 ustar root root /*
decl.h
Type declarations
this file is part of Vegas
last modified 4 Oct 11 th
*/
#include "stddecl.h"
#define MAXGRIDS 10
#define NBINS 128
typedef unsigned char bin_t;
/* Note: bin_t must be wide enough to hold the numbers 0..NBINS */
typedef const bin_t cbin_t;
typedef real Grid[NBINS];
typedef struct {
real sum, sqsum;
real weightsum, avgsum;
real chisum, chisqsum, guess;
real avg, err, chisq;
} Cumulants;
typedef const Cumulants cCumulants;
typedef int (*Integrand)(ccount *, creal *, ccount *, real *,
void *, creal *, cint *);
typedef struct _this {
count ndim, ncomp;
#ifndef MLVERSION
Integrand integrand;
void *userdata;
int ncores, *child;
#endif
real epsrel, epsabs;
int flags, seed;
number mineval, maxeval;
number nstart, nincrease, nbatch;
int gridno;
cchar *statefile;
number neval;
RNGState rng;
jmp_buf abort;
} This;
typedef const This cThis;
static Grid *gridptr_[MAXGRIDS];
static count griddim_[MAXGRIDS];
Cuba-3.0/tools/fcc 0000755 0000000 0000000 00000001414 11611274410 012542 0 ustar root root #! /bin/sh
# script to compile C programs that are linked
# against Fortran libraries
# last modified 19 Jul 11 th
args=
objs=
ldflags=
fldflags=
compileonly=
cc="${REALCC:-cc}"
cxx="${REALCXX:-c++}"
test `basename $0` = f++ && cc="$cxx"
while test $# -gt 0 ; do
case "$1" in
-arch)
shift
;;
-st | -b32 | -b64)
;; # ignore mcc-specific flags
-Wno-long-double)
;; # mcc adds this on Macs & gcc 4 doesn't like it
-[Ll]* | -Wl*)
ldflags="$ldflags '$1'"
;;
*.tm.o)
objs="'$1' $objs"
;;
*.a | *.o | *.so)
objs="$objs '$1'"
;;
*.cc)
args="$args '$1'"
cc="$cxx"
;;
-c)
compileonly="-c"
;;
-o)
args="$args -o '$2'"
shift
;;
*)
args="$args '$1'"
;;
esac
shift
done
eval "set -x ; exec $cc $args ${compileonly:-$objs $ldflags $fldflags}"
Cuba-3.0/tools/mcc 0000755 0000000 0000000 00000004774 11611274563 012576 0 ustar root root #! /bin/sh
# this script jumps in if there is no working mcc on the path:
# - on Mac OS it (hopefully) figures out the location of mcc,
# - on Cygwin it substitutes mcc completely
# last modified 19 Jul 11 th
sdkpath()
{
mathcmd="$1"
shift
mathcmd=`IFS=:
PATH="$PATH:$*" which $mathcmd`
eval `"$mathcmd" -run '
Print["sysid=\"", $SystemID, "\""];
Print["topdir=\"", $TopDirectory, "\""];
Exit[]' < /dev/null | tr '\r' ' ' | tail -2`
# check whether Cygwin's dlltool can handle 64-bit DLLs
test "$sysid" = Windows-x86-64 && {
${DLLTOOL:-dlltool} --help | grep x86-64 > /dev/null || sysid=Windows
}
topdir=`cd "$topdir" ; echo $PWD`
for sdk in \
"$topdir/SystemFiles/Links/MathLink/DeveloperKit/$sysid/CompilerAdditions" \
"$topdir/SystemFiles/Links/MathLink/DeveloperKit/CompilerAdditions" \
"$topdir/AddOns/MathLink/DeveloperKit/$sysid/CompilerAdditions" ; do
test -d "$sdk" && return
done
echo "MathLink SDK not found" 1>&2
exit 1
}
cygmcc()
{
sdkpath math \
"`cygpath '$ProgramW6432'`/Wolfram Research/Mathematica"/* \
"`cygpath '$PROGRAMFILES'`/Wolfram Research/Mathematica"/*
for sdk in "$sdk"/m* ; do
break
done
cache=MLcyg-cache
test -d $cache || mkdir $cache
MLversion=3
for OSbits in 32 64 ; do
dllname=ml${OSbits}i$MLversion
libname="$sdk/lib/${dllname}m.lib"
test -f "$libname" && break
done
lib="$cache/${dllname}m"
test -f "$lib.a" || {
( echo "EXPORTS"
${NM:-nm} -C --defined-only "$libname" | awk '/ T [^.]/ { print $3 }'
) > "$lib.def"
${DLLTOOL:-dlltool} -k --dllname "$dllname.dll" \
--def "$lib.def" --output-lib "$lib.a"
}
tmp=
args="-DWIN$OSbits -I'$sdk/include'"
for arg in "$@" ; do
case "$arg" in
*.tm)
cp "$arg" "$arg.tm"
"$sdk"/bin/mprep -lines -o "$arg.c" "$arg.tm"
tmp="$tmp '$arg.c' '$arg.tm'"
args="$args '$arg.c'" ;;
*)
args="$args '$arg'" ;;
esac
done
trap "rm -f $tmp" 0 1 2 3 15
eval "set -x ; ${CC:-gcc} $args $lib.a -mwindows"
}
macmcc()
{
sdkpath MathKernel \
/Applications/Mathematica*/Contents/MacOS \
$HOME/Desktop/Mathematica*/Contents/MacOS
exec "$sdk/mcc" "$@"
}
defaultmcc()
{
sdkpath math \
/usr/local/bin \
/usr/local/Wolfram/bin \
/usr/local/Wolfram/Mathematica/*/Executables \
/opt/Wolfram/bin \
/opt/Wolfram/Mathematica/*/Executables
exec "$sdk/mcc" "$@"
}
shopt -s nullglob 2> /dev/null
case `uname -s` in
Darwin) macmcc "$@" ;;
CYG*) cygmcc "$@" ;;
*) defaultmcc "$@" ;;
esac
Cuba-3.0/tools/mkstatic 0000755 0000000 0000000 00000000700 11600036440 013620 0 ustar root root #! /bin/sh
exe=
mach=
mlmach=
case `uname -s` in
Linux) tag=Linux
st=-static
mach=-m32
mlmach=-b32
;;
Darwin) tag=Mac
st=-static-libgcc
;;
CYG*) tag=Windows
export CC=i686-pc-mingw32-gcc
st="-static -static-libgcc"
exe=.exe
;;
esac
./configure CFLAGS="-O3 -fomit-frame-pointer -ffast-math $st $mach" MCFLAGS="-st $mlmach"
make math
for file in Vegas Suave Divonne Cuhre ; do
gzip $file$exe
mv $file$exe.gz $file$exe-$tag.gz
done
Cuba-3.0/tools/partview.cpp 0000644 0000000 0000000 00000013362 11526503205 014435 0 ustar root root /*
partview.cpp
Partition viewer for Cuba
last modified 15 Feb 11 th
*/
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include "quit.xpm"
#include "print.xpm"
// --------------------------------------------------------------
class PartitionPlane : public QWidget
{
public:
PartitionPlane( const int dimx, const int dimy, QWidget *parent = 0 )
: QWidget(parent), m_dimx(dimx), m_dimy(dimy), m_got(0) {
}
void addBound( const int dim, const double lower, const double upper );
void drawRegion( QPainter *p, const QRect &r );
void drawRegions( QPainter *p );
QSize sizeHint() const {
return QSize(InitialSize, InitialSize);
}
QString filename() const {
return QString("%1-%2.ps").arg(m_dimx).arg(m_dimy);
}
protected:
void paintEvent( QPaintEvent * ) {
QPainter p(this);
drawRegions( &p );
}
private:
int m_dimx, m_dimy, m_got;
int m_xlower, m_xupper, m_ylower, m_yupper;
typedef std::list regionList;
typedef regionList::iterator regionIt;
regionList m_regions;
enum {
Hue = 0, // red
InitialSize = 400,
CoordScale = 4*InitialSize };
};
void PartitionPlane::addBound( const int dim,
const double lower, const double upper )
{
if( dim == m_dimx ) {
m_xlower = int(CoordScale*lower);
m_xupper = int(CoordScale*upper);
m_got |= 1;
}
if( dim == m_dimy ) {
m_ylower = int(CoordScale*lower);
m_yupper = int(CoordScale*upper);
m_got |= 2;
}
if( m_got == 3 ) {
m_got = 0;
const QRect rect = QRect(m_xlower, CoordScale - m_yupper,
m_xupper - m_xlower + 1, m_yupper - m_ylower + 1);
const int area = rect.width()*rect.height();
regionIt r;
for( r = m_regions.begin(); r != m_regions.end(); ++r ) {
if( rect == *r ) return;
if( area > (*r).width()*(*r).height() ) break;
}
m_regions.insert(r, rect);
QPainter p(this);
drawRegion( &p, rect );
}
}
void PartitionPlane::drawRegion( QPainter *p, const QRect &r )
{
p->setWindow(0, 0, CoordScale, CoordScale);
QColor c;
const double ratio = r.width()*r.height()/
double(CoordScale*CoordScale);
const int saturation = int(255/(M_PI/2)*asin(1 - ratio));
c.setHsv( Hue, saturation, 255 );
p->setBrush(c);
p->setPen(palette().foreground().color());
p->drawRect(r);
}
void PartitionPlane::drawRegions( QPainter *p )
{
for( regionIt r = m_regions.begin(); r != m_regions.end(); ++r )
drawRegion( p, *r );
}
// --------------------------------------------------------------
class PartitionViewer : public QMainWindow
{
Q_OBJECT
public:
PartitionViewer( QWidget *parent );
void addPlane( const int dimx, const int dimy );
void addBound( const int dim, const double lower, const double upper );
int count() const { return m_tabs->count(); }
void tabupdate() {
if( m_tabs->currentWidget() != 0 ) m_tabs->currentWidget()->update();
}
public slots:
void print();
private:
QTabWidget *m_tabs;
QPrinter *m_printer;
};
PartitionViewer::PartitionViewer( QWidget *parent = 0 )
: QMainWindow(parent)
{
setWindowTitle(tr("Cuba Partition Viewer"));
QToolBar *toolbar = new QToolBar(this);
addToolBar(Qt::LeftToolBarArea, toolbar);
QAction *quit = new QAction( QPixmap(quit_xpm), tr("&Quit"), this );
connect( quit, SIGNAL(activated()), qApp, SLOT(quit()) );
toolbar->addAction(quit);
#ifndef QT_NO_PRINTER
QAction *print = new QAction( QPixmap(print_xpm), tr("&Print..."), this );
connect( print, SIGNAL(activated()), this, SLOT(print()) );
toolbar->addAction(print);
m_printer = new QPrinter;
#endif
m_tabs = new QTabWidget(this);
setCentralWidget(m_tabs);
}
void PartitionViewer::addPlane( const int dimx, const int dimy )
{
PartitionPlane *plane = new PartitionPlane(dimx, dimy, this);
m_tabs->addTab( plane, tr("%1-%2 plane").arg(dimx).arg(dimy) );
}
void PartitionViewer::addBound( const int dim,
const double lower, const double upper )
{
for( int index = 0; index < m_tabs->count(); ++index ) {
PartitionPlane *plane = (PartitionPlane *)m_tabs->widget(index);
if( plane ) plane->addBound(dim, lower, upper);
}
}
void PartitionViewer::print()
{
#ifndef QT_NO_PRINTER
PartitionPlane *plane = (PartitionPlane *)m_tabs->currentWidget();
if( !plane ) return;
QPrintDialog printDialog(m_printer, this);
if( printDialog.exec() == QDialog::Accepted ) {
QPainter p;
if( p.begin(m_printer) ) {
p.setViewport( QRect(QPoint(0, 0), plane->sizeHint()) );
plane->drawRegions( &p );
}
}
#endif
}
#include "partview.moc"
// --------------------------------------------------------------
int main( int argc, char **argv )
{
QApplication app(argc, argv);
PartitionViewer partview;
argc = (argc - 1) & -2;
for( int arg = 0; arg < argc; ) {
const int dimx = atoi(argv[++arg]);
const int dimy = atoi(argv[++arg]);
if( dimx > 0 && dimy > 0 ) partview.addPlane(dimx, dimy);
}
if( partview.count() == 0 ) {
fprintf(stderr, "Usage: %s dimx dimy ...\n"
"reads Cuba's verbose = 3 output from stdin and displays\n"
"the dimx-dimy plane of the tessellation on screen.\n"
"Each pair of dimensions is shown in a separate window.\n\n",
argv[0]);
exit(1);
}
partview.show();
int dim = 0;
char line[128];
while( fgets(line, sizeof line, stdin) ) {
double lower, upper;
fputs(line, stdout);
if( sscanf(line, "%*[^(](%lf) - (%lf)", &lower, &upper) == 2 )
partview.addBound(++dim, lower, upper);
else dim = 0;
app.processEvents();
}
fflush(stdout);
partview.tabupdate();
return app.exec();
}
Cuba-3.0/tools/partview.m 0000644 0000000 0000000 00000001722 10200671342 014100 0 ustar root root (*
partview.m
A partition viewer for Cuba results in Mathematica
last modified 4 Feb 05 th
*)
BeginPackage["Cuba`"]
PartView::usage = "For a Cuba result obtained with Regions -> True,
PartView[result, dimx, dimy] displays the dimx-dimy plane of the
tessellation used in the integration."
Rect::usage = "Rect[{x1, y1}, {x2, y2}] is the graphics primitive used
by PartView to render a rectangle."
Begin["`PartView`"]
PartView[expr_, dimx_Integer, dimy_Integer] :=
Block[ {r, g, maxarea},
r = Cases[expr,
Region[ll_, ur_, ___] :> {ll[[{dimx, dimy}]], ur[[{dimx, dimy}]]},
Infinity];
maxarea = Times@@ (Max/@ #2 - Min/@ #1 &)@@ Transpose[r, {3, 1, 2}];
(Show[#]; #)& @ Graphics[Apply[Rect, r, 1], AspectRatio -> 1]
]
maxarea = 1
Rect[{l_, d_}, {r_, u_}] := {
{ Hue[0, (ArcSin[1 - (r - l) (u - d)/maxarea]/(Pi/2))^2, 1],
Rectangle[{l, d}, {r, u}] },
{ RGBColor[0, 0, 0],
Line[{{l, d}, {r, d}, {r, u}, {l, u}, {l, d}}] }
}
End[]
EndPackage[]
Cuba-3.0/tools/partview.pro 0000644 0000000 0000000 00000000162 10205053420 014435 0 ustar root root TEMPLATE = app
CONFIG += qt release
SOURCES += partview.cpp
HEADERS += quit.xpm print.xpm
DESTDIR = .
MOC_DIR = .
Cuba-3.0/tools/print.xpm 0000644 0000000 0000000 00000017753 10205046663 013765 0 ustar root root /* XPM */
static const char * print_xpm[] = {
"48 48 207 2",
" c None",
". c #929292",
"+ c #A0A0A0",
"@ c #9E9E9E",
"# c #9D9D9D",
"$ c #9C9C9C",
"% c #9B9B9B",
"& c #9A9A9A",
"* c #999999",
"= c #DADADA",
"- c #FFFFFF",
"; c #FCFCFC",
"> c #F9F9F9",
", c #F7F7F7",
"' c #F4F4F4",
") c #EBEBEB",
"! c #323232",
"~ c #D7D7D7",
"{ c #F1F1F1",
"] c #EFEFEF",
"^ c #ECECEC",
"/ c #E3E3E3",
"( c #313131",
"_ c #FEFEFE",
": c #F6F6F6",
"< c #EEEEEE",
"[ c #E9E9E9",
"} c #E1E1E1",
"| c #333333",
"1 c #D8D8D8",
"2 c #F3F3F3",
"3 c #E6E6E6",
"4 c #DEDEDE",
"5 c #E7E7E7",
"6 c #E4E4E4",
"7 c #DDDDDD",
"8 c #343434",
"9 c #DBDBDB",
"0 c #363636",
"a c #DCDCDC",
"b c #373737",
"c c #DFDFDF",
"d c #393939",
"e c #D9D9D9",
"f c #D5D5D5",
"g c #E0E0E0",
"h c #D6D6D6",
"i c #D3D3D3",
"j c #3B3B3B",
"k c #E2E2E2",
"l c #D4D4D4",
"m c #D1D1D1",
"n c #3C3C3C",
"o c #D0D0D0",
"p c #CECECE",
"q c #3E3E3E",
"r c #CDCDCD",
"s c #797979",
"t c #F0F0F0",
"u c #EDEDED",
"v c #E8E8E8",
"w c #E5E5E5",
"x c #737373",
"y c #6C6C6C",
"z c #959595",
"A c #C5C5C5",
"B c #757575",
"C c #8B8B8B",
"D c #878787",
"E c #858585",
"F c #838383",
"G c #828282",
"H c #808080",
"I c #7E7E7E",
"J c #7D7D7D",
"K c #7B7B7B",
"L c #7A7A7A",
"M c #777777",
"N c #767676",
"O c #747474",
"P c #717171",
"Q c #707070",
"R c #6E6E6E",
"S c #6D6D6D",
"T c #6B6B6B",
"U c #606060",
"V c #D2D2D2",
"W c #5E5E5E",
"X c #5A5A5A",
"Y c #5B5B5B",
"Z c #595959",
"` c #585858",
" . c #565656",
".. c #555555",
"+. c #545454",
"@. c #535353",
"#. c #515151",
"$. c #4F4F4F",
"%. c #4E4E4E",
"&. c #4D4D4D",
"*. c #494949",
"=. c #8F8F8F",
"-. c #FBFBFB",
";. c #EAEAEA",
">. c #B3B3B3",
",. c #FDFDFD",
"'. c #FAFAFA",
"). c #CCCCCC",
"!. c #CACACA",
"~. c #BDBDBD",
"{. c #3A3A3A",
"]. c #676767",
"^. c #F8F8F8",
"/. c #C4C4C4",
"(. c #B0B0B0",
"_. c #A1A1A1",
":. c #B8B8B8",
"<. c #F8F6F8",
"[. c #B5B5B5",
"}. c #E9F2E9",
"|. c #ACCEAC",
"1. c #B9D3B9",
"2. c #F5F7F5",
"3. c #7C7C7C",
"4. c #FDFAFD",
"5. c #7CC57C",
"6. c #5BD55B",
"7. c #39C339",
"8. c #FFFBFF",
"9. c #76C776",
"0. c #05BF05",
"a. c #07B507",
"b. c #8CCB8C",
"c. c #4B4B4B",
"d. c #F5F6F5",
"e. c #B2D1B2",
"f. c #CADFCA",
"g. c #FCFAFC",
"h. c #2E2E2E",
"i. c #F9F8F9",
"j. c #FFFCFF",
"k. c #C0C0C0",
"l. c #A6A6A6",
"m. c #C2C2C2",
"n. c #AAAAAA",
"o. c #C3C3C3",
"p. c #ABABAB",
"q. c #A3A3A3",
"r. c #CFCFCF",
"s. c #C8C8C8",
"t. c #C7C7C7",
"u. c #C9C9C9",
"v. c #909090",
"w. c #8D8D8D",
"x. c #8E8E8E",
"y. c #626262",
"z. c #A2A2A2",
"A. c #BFBFBF",
"B. c #000000",
"C. c #464646",
"D. c #B1B1B1",
"E. c #BBBBBB",
"F. c #252525",
"G. c #3D3D3D",
"H. c #010101",
"I. c #727272",
"J. c #BEBEBE",
"K. c #292929",
"L. c #BABABA",
"M. c #B6B6B6",
"N. c #030303",
"O. c #888888",
"P. c #C1C1C1",
"Q. c #9F9F9F",
"R. c #131313",
"S. c #B7B7B7",
"T. c #B9B9B9",
"U. c #8C8C8C",
"V. c #B4B4B4",
"W. c #BCBCBC",
"X. c #111111",
"Y. c #303030",
"Z. c #474747",
"`. c #101010",
" + c #505050",
".+ c #ACACAC",
"++ c #AEAEAE",
"@+ c #616161",
"#+ c #8A8A8A",
"$+ c #A5A5A5",
"%+ c #F5F5F5",
"&+ c #F2F2F2",
"*+ c #272727",
"=+ c #1B1B1B",
"-+ c #454545",
";+ c #949494",
">+ c #121212",
",+ c #AFAFAF",
"'+ c #979797",
")+ c #404040",
"!+ c #787878",
"~+ c #646464",
"{+ c #5F5F5F",
"]+ c #5D5D5D",
"^+ c #5C5C5C",
"/+ c #575757",
"(+ c #434343",
" . + @ @ @ @ @ @ @ @ @ @ @ # $ % & * * * * ",
" = - - - - - - - - - - - - - - ; > , ' ' ) ! ",
" ~ - - - - - - - - - - - ; > , ' { ] ^ ^ / ( ",
" ~ - - - - - - - - - _ ; > : ' { < ^ [ [ } | ",
" 1 - - - - - - - - _ ; > : 2 { < ) [ 3 3 4 | ",
" = - - - - - - - - ; > , ' { ] ^ [ 5 6 6 7 8 ",
" 9 - - - - - - _ ; > : ' { < ^ [ 3 6 } } 9 0 ",
" a - - - - - _ ; > : 2 { < ) [ 3 / } 4 7 1 b ",
" 4 - - - - - ; > , ' { ] ^ [ 5 6 } c a 9 ~ d ",
" c - - - _ ; > : ' { < ^ [ 3 6 } 4 a e 1 f d ",
" g - - _ ; > : 2 { < ) [ 3 / } 4 9 e h f i j ",
" k - - ; > , ' { ] ^ [ 5 6 } c a e ~ l i m n ",
" / - ; > : ' { < ^ [ 3 6 } 4 a e h l m o p q ",
" / - > : 2 { < ) [ 3 / } 4 9 e h i m p r r b ",
" s ) - - - _ ; > : ' t u ) v w / c a = ~ f m x y ",
" z A d B C D E F G H I J K L s M N O x P Q R S T | F a U ",
" V 6 W X X X X X X X Y Y Z ` ` ...+.@.#.#.$.%.&.*.=.c % ",
" ) - - - - - - - - - - - - _ -., ' { < ;.5 6 g 7 9 i o >.( ",
" #.2 - - - - - - - - - ,.'.: 2 t u [ 3 / g 7 = h i o ).!.~.{. ",
" ].C ^.- - - - - - - - ; > : 2 t < ;.5 6 } 4 a 1 f V o ).!./.I .. ",
" x (.i ] - - - - - - - - - - - _ _ _ _ _ ,.,.,.,.,.,.; ; ; ; -.-.; ,.] m _... ",
" Q :.<.- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' [.Z ",
" 1 - }.|.1.2.- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - A ",
" 3.,.4.5.6.7.5.- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ - u Y ",
" (._ 8.9.0.a.b.- ,.; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ,._ @ ",
" c.9 '.-.d.e.f.g.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.'.,.9 h. ",
" K ] , , i.j.8.^., , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , ^.] X ",
" _.{ { ' ' ' 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 ' ' ' 2 u F ",
" :.;./ 5 u ] t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t t ] u v 6 5 % ",
" k.6 4 7 4 g / w v ;.) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ;.[ 3 / } c 4 4 6 l. ",
" m.4 = = = = e e = 9 c g k k / 6 w w w w w w w w w w w w w w 6 / k k } c a = e e e = = = g n. ",
" o.e f f f f f f f f l l f f f f h h ~ ~ 1 1 1 1 1 1 1 ~ h h f f f f l l f f f f f f f f a p. ",
" ~.f m m m m m m m m m m m m m m m m m o o o o o o o o m m m m m m m m m m m m m m m m m h l. ",
" [.m r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r r ).m + ",
" q.r.s.s.s.t.o h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h h r t.s.s.u.).v. ",
" w.!./././.u.x.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.y.z.u././.A u.O ",
" ].m.k.A.A.!.&.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.B.N !.A.A.k.A C. ",
" c.D.~.E.E.A @.B.B.B.B.F.G.j j j j j j j j j j j j j j {.{.{.{.{.{.n ( H.B.B.B.I./.E.E.J.p.K. ",
" & L.M.M.k.$.B.B.B.N.O.= f l l l l l l l l f l i o p ).!.s.A m.P./.Q.R.B.B.B.].~.S.S.T.U. ",
" U ~.M.V.W.Z X.X.X.Y.V 3 k k k k k k k k k k g 7 = e h i m p ).!.s.k.Z.`.X.X.].>.[.S.S. + ",
" L n.:.T.W.A.~.:.n.; _ _ _ _ _ _ _ _ _ _ -.> : 2 { < ;.v w k g 7 4 Q..+A.J.++V.:.l.y ",
" ! @+#+$+[.E.# J.- - - - - - - - - - ,.'.^.%+&+t ^ [ 5 6 } c a a m.z.L.V.z.E W *+ ",
" =+-+S U.&+- - - - - - - - - ,.'., %+&+] ^ [ 3 6 } 4 a 1 h m ;+].q >+ ",
" ,+- - - - - - - - - ; '., ' &+] ^ [ 3 / } 4 9 1 f V f '+ ",
" [ - - - - - - - - _ '.^.%+&+t u [ 5 6 } c a e h i o m J.)+ ",
" z.- - - - - - - - - - - _ -.^.%+&+] u ;.5 w } 4 a = ~ f 1 !+ ",
" @.~+y.y.y.y.y.y.y.@+{+{+{+{+W ]+^+^+X X X Z Z ` ` /+..../+(+ ",
" "};
Cuba-3.0/tools/quit.xpm 0000644 0000000 0000000 00000022552 10205046660 013601 0 ustar root root /* XPM */
static const char * quit_xpm[] = {
"48 48 295 2",
" c None",
". c #A62212",
"+ c #B03B2A",
"@ c #B95440",
"# c #BF644E",
"$ c #BE634D",
"% c #BE634C",
"& c #BE624C",
"* c #BE624B",
"= c #BE614A",
"- c #BD614A",
"; c #BD6049",
"> c #BD6048",
", c #BD5F48",
"' c #BD5F46",
") c #BD5E46",
"! c #BC5E45",
"~ c #BC5D44",
"{ c #BC5D43",
"] c #BC5C43",
"^ c #BB5C42",
"/ c #BB5A42",
"( c #BB5A41",
"_ c #BB5A40",
": c #BA5940",
"< c #B54B34",
"[ c #AE3623",
"} c #B95541",
"| c #D2997F",
"1 c #D9A88D",
"2 c #D8A78B",
"3 c #D8A68A",
"4 c #D8A689",
"5 c #D7A487",
"6 c #D7A286",
"7 c #D7A285",
"8 c #D5A082",
"9 c #D5A081",
"0 c #D49E7F",
"a c #D49E7E",
"b c #D49D7D",
"c c #D39B7B",
"d c #D39B79",
"e c #D39A78",
"f c #D29977",
"g c #D29775",
"h c #D19674",
"i c #D19573",
"j c #D09471",
"k c #CF936F",
"l c #CF926E",
"m c #CE916D",
"n c #CE906C",
"o c #CE8F6A",
"p c #CD8D69",
"q c #C8805D",
"r c #B44A31",
"s c #A92B1A",
"t c #CD8971",
"u c #D9A98F",
"v c #D09275",
"w c #C87E5E",
"x c #C97E5E",
"y c #C87E5D",
"z c #C87F5E",
"A c #C97F5D",
"B c #C87F5D",
"C c #C87F5C",
"D c #C9805D",
"E c #C8805C",
"F c #C9805C",
"G c #C8815C",
"H c #C9815C",
"I c #CA8861",
"J c #CC8B65",
"K c #CC8A64",
"L c #C26F4F",
"M c #A82918",
"N c #D2997C",
"O c #BD5E3B",
"P c #BA5531",
"Q c #BA5631",
"R c #BA5732",
"S c #BB5935",
"T c #BB5A36",
"U c #BB5C37",
"V c #BC5E38",
"W c #BD5F39",
"X c #BD603A",
"Y c #BD613B",
"Z c #BE633C",
"` c #BE643E",
" . c #BE653F",
".. c #BE6740",
"+. c #BF6841",
"@. c #C06A43",
"#. c #C06B44",
"$. c #C26D45",
"%. c #C26E46",
"&. c #C26F48",
"*. c #C27149",
"=. c #C4724B",
"-. c #C4744C",
";. c #C4744D",
">. c #C4754E",
",. c #C57750",
"'. c #C67B54",
"). c #CA8760",
"!. c #CA8962",
"~. c #BF6849",
"{. c #BB5836",
"]. c #C57852",
"^. c #C57953",
"/. c #C67D55",
"(. c #C9855F",
"_. c #C9865F",
":. c #B3462E",
"<. c #C67C54",
"[. c #C77D56",
"}. c #C77F58",
"|. c #C8835D",
"1. c #C47652",
"2. c #CF8667",
"3. c #E5B39E",
"4. c #FCE1D4",
"5. c #FFECE2",
"6. c #FFEDE3",
"7. c #F8D9C9",
"8. c #E2AF96",
"9. c #C77B56",
"0. c #C77E57",
"a. c #C8815A",
"b. c #C88059",
"c. c #AC3420",
"d. c #D49073",
"e. c #FFEBE2",
"f. c #FFFFFF",
"g. c #F9DACC",
"h. c #CF8967",
"i. c #B2442C",
"j. c #C36C49",
"k. c #FBDFD3",
"l. c #E4B39B",
"m. c #C8825C",
"n. c #C77C55",
"o. c #B54E32",
"p. c #FFF6EF",
"q. c #FFEEE4",
"r. c #FFF9F1",
"s. c #F9DCCE",
"t. c #C67B53",
"u. c #B54D31",
"v. c #DCA187",
"w. c #C97E59",
"x. c #E4B29A",
"y. c #FADECF",
"z. c #C9855E",
"A. c #C57850",
"B. c #B54C31",
"C. c #FFEBE1",
"D. c #DCA086",
"E. c #CA815D",
"F. c #E6B9A0",
"G. c #C87F59",
"H. c #C5764F",
"I. c #B54B30",
"J. c #DFA78F",
"K. c #D18B6B",
"L. c #D39374",
"M. c #E9C0AA",
"N. c #CE8B67",
"O. c #B54B2F",
"P. c #FFFFFC",
"Q. c #D79678",
"R. c #EEC7B3",
"S. c #FADED0",
"T. c #F0CEBA",
"U. c #C4734C",
"V. c #B44A2E",
"W. c #DA9C82",
"X. c #F7D7C8",
"Y. c #EFC8B4",
"Z. c #CD8964",
"`. c #C87F58",
" + c #C3714A",
".+ c #B4492D",
"++ c #F7D4C7",
"@+ c #CC815F",
"#+ c #EFC8B5",
"$+ c #F0CDBA",
"%+ c #E3B49B",
"&+ c #CD8B67",
"*+ c #C77F59",
"=+ c #FFFFFD",
"-+ c #FFF8F0",
";+ c #EFC9B5",
">+ c #D29574",
",+ c #F1D1BD",
"'+ c #B3482C",
")+ c #EDC3AF",
"!+ c #EFCAB6",
"~+ c #FFECDF",
"{+ c #CE906B",
"]+ c #C06C44",
"^+ c #B3462B",
"/+ c #EDC4B0",
"(+ c #F0CAB6",
"_+ c #FFF3EB",
":+ c #FFF6EC",
"<+ c #CF916D",
"[+ c #B3452A",
"}+ c #F0CCB8",
"|+ c #FFF5EB",
"1+ c #FFF6ED",
"2+ c #C87F5A",
"3+ c #B24429",
"4+ c #EDC5B1",
"5+ c #F0CCB9",
"6+ c #B24329",
"7+ c #FFEFE5",
"8+ c #D49C7B",
"9+ c #F3D4C3",
"0+ c #B24227",
"a+ c #FDE3D7",
"b+ c #EDC9B3",
"c+ c #E6BDA5",
"d+ c #BD623C",
"e+ c #B24126",
"f+ c #F3D1C0",
"g+ c #F0CEBB",
"h+ c #D19472",
"i+ c #BD613A",
"j+ c #B14126",
"k+ c #D49676",
"l+ c #F1CFBB",
"m+ c #F7DBCA",
"n+ c #FDE7DA",
"o+ c #D39C7C",
"p+ c #C97F5C",
"q+ c #B14025",
"r+ c #E8BCA6",
"s+ c #D59979",
"t+ c #D9A182",
"u+ c #E9C2AA",
"v+ c #DAA789",
"w+ c #BB5D37",
"x+ c #B13F24",
"y+ c #FFFAF2",
"z+ c #DBA587",
"A+ c #F2D2C0",
"B+ c #F0D0BC",
"C+ c #B03E23",
"D+ c #CA825E",
"E+ c #FADFD1",
"F+ c #D89E7F",
"G+ c #E8C0A8",
"H+ c #FFFDF7",
"I+ c #FDE8DB",
"J+ c #D7A185",
"K+ c #C97F5E",
"L+ c #BA5834",
"M+ c #B03C23",
"N+ c #FBE2D3",
"O+ c #F1D0BD",
"P+ c #D7A486",
"Q+ c #B03B22",
"R+ c #CD8863",
"S+ c #FFF2E8",
"T+ c #F5D8C7",
"U+ c #C97F5F",
"V+ c #B95530",
"W+ c #AF3A21",
"X+ c #E6BAA2",
"Y+ c #DEAF93",
"Z+ c #D9A88C",
"`+ c #C97E5F",
" @ c #B8532F",
".@ c #AC341D",
"+@ c #E3B49A",
"@@ c #F6D9C8",
"#@ c #FFF7EE",
"$@ c #EFCEBA",
"%@ c #DAA687",
"&@ c #C06848",
"*@ c #B8502E",
"=@ c #A92B18",
"-@ c #D5A085",
";@ c #B54A2A",
">@ c #BE6141",
",@ c #B84F2D",
"'@ c #AC321C",
")@ c #BF694A",
"!@ c #B14024",
"~@ c #C26D4D",
"{@ c #A72413",
" ",
" ",
" ",
" ",
" . . . . . . . . . . . . . . . . . . . . . . . . . . . . ",
" . . . + @ # # $ % & * = - ; > , ' ) ! ~ { ] ^ / ( _ : < [ . . . ",
" . . } | 1 2 3 4 5 6 7 8 9 0 a b c d e f g h i j k l m n o p q r . . ",
" . s t u 1 v w x y y z y A A A B C D E E F F E G G G G G H G I J K L M . ",
" . . t u N O P Q R S T U V W X Y Z ` ...+.@.#.$.%.&.*.=.-.;.>.,.'.).!.~.. . ",
" . } u N {.P Q R S T U V W X Y Z ` ...+.@.#.$.%.&.*.=.-.;.>.,.].^./.(._.:.. ",
" . . | 1 O P Q R S T U V W X Y Z ` ...+.@.#.$.%.&.*.=.-.;.>.,.].^.<.[.}.|.1.. . ",
" . + 1 v P Q R S T U V W X Y Z 2.3.4.5.6.6.6.7.8.9.=.-.;.>.,.].^.<.[.0.}.a.b.c.. ",
" . @ 2 w Q R S T U V W X Y d.e.f.f.f.f.f.f.f.f.f.f.g.h.>.,.].^.<.[.0.}.a.b.0.i.. ",
" . # 3 x R S T U V W X j.k.f.f.f.f.f.f.f.f.f.f.f.f.f.f.l.].^.<.[.0.}.a.m.b.n.o.. ",
" . # 4 y S T U V W X j.p.f.f.f.f.f.f.q.q.q.r.f.f.f.f.f.f.s.<.[.0.}.a.m.|.b.t.u.. ",
" . $ 5 y T U V W X j.p.f.f.f.f.6.v.$.%.&.*.=.w.x.f.f.f.f.f.y.0.}.a.m.|.z.b.A.B.. ",
" . % 6 z U V W X Y C.f.f.f.f.D.#.$.%.&.*.=.-.;.>.E.s.f.f.f.f.F.a.m.|.z.).G.H.I.. ",
" . & 7 y V W X Y J.f.f.f.f.K.#.$.%.&.8.f.f.L.>.,.].^.M.f.f.f.f.N.|.z.).I }.;.O.. ",
" . * 8 A W X Y Z P.f.f.f.Q.#.$.%.&.*.f.f.f.R.,.].^.<.[.S.f.f.f.T.z.).I !.}.U.V.. ",
" . = 9 A X Y Z W.f.f.f.X.#.$.%.&.*.=.f.f.f.Y.].^.<.[.0.Z.f.f.f.f.).I !.K `. +.+. ",
" . - 0 A Y Z ` ++f.f.f.@+$.%.&.*.=.-.f.f.f.#+^.<.[.0.}.a.$+f.f.f.%+!.K &+*+&..+. ",
" . ; a B Z ` .=+f.f.-+$.%.&.*.=.-.;.f.f.f.;+<.[.0.}.a.m.>+f.f.f.,+K &+p *+%.'+. ",
" . > b C ` ...f.f.f.)+%.&.*.=.-.;.>.f.f.f.!+[.0.}.a.m.|.z.f.f.f.~+&+p {+G.]+^+. ",
" . , c D ...+.f.f.f./+&.*.=.-.;.>.,.f.f.f.(+0.}.a.m.|.z.)._+f.f.:+p {+<+G.@.[+. ",
" . ' d E ..+.@.f.f.f./+*.=.-.;.>.,.].f.f.f.}+}.a.m.|.z.).I |+f.f.1+{+<+k 2++.3+. ",
" . ) e E +.@.#.f.f.f.4+=.-.;.>.,.].^.f.f.f.5+a.m.|.z.).I !.f.f.f.1+<+k i 2+ .6+. ",
" . ! f F @.#.$.=+f.f.7+-.;.>.,.].^.<.f.f.f.$+m.|.z.).I !.8+f.f.f.9+k i h 2+` 0+. ",
" . ~ g F #.$.%.a+f.f.f.h.>.,.].^.<.[.f.f.f.$+|.z.).I !.K b+f.f.f.c+i h f C d+e+. ",
" . { h E $.%.&.8.f.f.f.f+,.].^.<.[.0.f.f.f.g+z.).I !.K h+f.f.f.f.i h f d C i+j+. ",
" . ] i G %.&.*.=.f.f.f.f.k+^.<.[.0.}.f.f.f.l+).I !.K &+m+f.f.f.n+h f d o+p+W q+. ",
" . ^ j G &.*.=.-.r+f.f.f.f.s+[.0.}.a.$+f.f.t+I !.K &+u+f.f.f.f.v+f d o+a A w+x+. ",
" . / k G *.=.-.;.>.y+f.f.f.f.z+}.a.m.|.z.).I !.K &+A+f.f.f.f.B+f d o+a 9 z T C+. ",
" . ( l G =.-.;.>.,.D+f.f.f.f.f.E+F+|.z.).I !.K G+H+f.f.f.f.I+f d o+a 9 J+K+L+M+. ",
" . _ m G -.;.>.,.].^.s+f.f.f.f.f.f.f.N+O+O+|+f.f.f.f.f.f.I+f d o+a 9 J+P+z R Q+. ",
" . : n H ;.>.,.].^.<.[.R+S+f.f.f.f.f.f.f.f.f.f.f.f.f.f.T+f d o+a 9 J+P+4 U+V+W+. ",
" . < o G >.,.].^.<.[.0.}.a.X+f.f.f.f.f.f.f.f.f.f.f.7+Y+f d o+a 9 J+P+4 Z+`+ @.@. ",
" . [ p I ,.].^.<.[.0.}.a.m.|.z.+@@@|+f.f.f.f.#@$@%@h f d o+a 9 J+P+4 Z+u &@*@=@. ",
" . . q J '.^.<.[.0.}.a.m.|.z.).I !.K &+p {+<+k i h f d o+a 9 J+P+4 Z+u -@*@;@. . ",
" . r K )./.[.0.}.a.m.|.z.).I !.K &+p {+<+k i h f d o+a 9 J+P+4 Z+u 3 >@,@'@. ",
" . . )@!.(.}.}.a.m.|.z.).I !.K &+p {+<+k i h f d o+a 9 J+P+4 Z+u -@>@,@!@. . ",
" . M ~@_.|.a.b.b.b.b.G.}.}.`.*+*+G.G.2+2+2+C C p+A z K+z U+`+&@*@,@!@{@. ",
" . . :.1.b.0.n.t.A.H.;.U. +&.%.]+@.+. .` d+i+W w+T L+R V+ @*@;@'@. . ",
" . . . c.i.o.u.B.I.O.V..+.+'+^+[+3+6+0+e+j+q+x+C+M+Q+W+.@=@. . . ",
" . . . . . . . . . . . . . . . . . . . . . . . . . . . . ",
" ",
" ",
" ",
" "};